Problème de champs vide.Résolu

Question

Salut je g&#232;re une base de donn&#233;es via OleDb de ADO.NET !

Descriptif de l'application:
Les donn&#233;es 'Nom' et 'Pr&#233;nom' de ma table 'Clientold' sont affich&#233;es dans des textbox ('Nom.text' et 'Prenom.text') et j'ai des boutons 'pr&#233;c&#233;dent' et 'suivant' pour passer d'un enregistrement &#224; l'autre. Certains pr&#233;noms ne sont pas rempli dans la base de donn&#233;es ( des gens ont un nom mais pas de pr&#233;nom en gros )

Probl&#232;me:
Quand je veux lire ma base de donn&#233;es cela fonctionne si je demande que le nom mais pas quand je demande le pr&#233;nom car le champ est NULL s&#251;rement.

Je ne sais pas o&#249; mettre ma requ&#234;te pour annuler les contraintes de champs NULL sachant que sur ma base de donn&#233;es la contrainte champ null est autoris&#233;.

Si il faut une requ&#234;te Sql voici ce que j'ai trouver dites moi si c'est bon si il faut bien ce code Sql SVP merci!

Solution 1:
ALTER TABLE Clientold CHANGE 'Pr&#233;nom' 'Prenom' TEXT
Solution 2:
ALTER TABLE Clientold CHANGE 'Pr&#233;nom' VARCHAR( 100 ) ;

La question:
Comment enlev&#233; la contrainte de champ non null 

Merci d'avnce de vos nombreux messages que j'attends avec impatience!

boy77000 · Accepted Answer

J'ai revérifier et en fait je mettais tromper de table quand j'avais vérifier et autorisé les champs vide je l'avais fait pour la table de  sauvegarde.

Donc maintenant ca fonctionne. Merci ++

asecher · Answer

Un truc qui ne marche pas mal, c'est :

prenom.text = "" & rs!Prenom
(les joies du empty, null & c&#176;)

Cordialement,

Alain 31

boy77000 · Answer

@ mcs2006 :
Ta derni&#232;re solution est bien, j'y avais pas pensais, mais je suis pas sur qu'il accepte que j'update sous pr&#233;texte que c'est un champ vide. Faut que je regarde mais le Update fonctionne pas &#224; cause des champs vides! Donc il faut que je l'autorise avant toutes manipulations!

@ asecher :
D&#233;sol&#233; de para&#238;tre ignare  Mais rs: c'est RecordSet  
Et que fait ta fonction: 
prenom.text = "" & rs!Prenom
Quoi si tu peut m'expliquer vite fait et me dire dans quoi je dois le mettre! (update, form load, read, ... )

En tout cas merci d'avoir r&#233;pondu aussi vite.

asecher · Answer

1 : rs est bien un recordset

Sinon, n'ayant pas ton code sous les yeux, ce n'est pas &#233;vident.

Tu peux enlever la contrainte NOT NULL en faisant un :
ALTER TABLE Clientold
ALTER Prenom  SET  NULL

Normalement "vide" n'est pas &#233;quivalent &#224; Null (ce que fait mcs2006 en mettant '' (vide) sur tous les premons qui sont &#224; Null).

A+

Alain 31

boy77000 · Answer

Attention les yeux je me lance, je postes le code de mon read.

''''''''''Voir un enregistrement'''''''''' ' 'Update' lock les table, le fait de faire un Close puis Open les délock Me.ObjetConnection.Close() Me.ObjetConnection.Open() strSql = "SELECT Clientold.* FROM Clientold ORDER BY Nom" Pour info le ORDER BY fonctionne pas mais ceci est une autre histoire! lol ObjetCommand = New OleDbCommand(strSql) ObjetDataAdapter = New OleDbDataAdapter(ObjetCommand) ObjetCommand.Connection() = ObjetConnection Me.ObjetDataAdapter.Fill(ObjetDataSet, "Clientold") ObjetDataTable = ObjetDataSet.Tables("Clientold") If RowNumber < 0 Then ObjetConnection.Close() Exit Sub End If 'Lors de l'ouverture de la BD, s'il yn'y a aucun enregistrement If RowNumber > ObjetDataTable.Rows.Count - 1 Then ObjetConnection.Close() Exit Sub End If 'ObjetTable.Rows(Numéro de lignes).Item(Nom de colonne) donne le contenu d'un champ dans une case donnée 'Item peut avoir en paramètre le nom de la colonne ou son index Me.Nom.Text = ObjetDataTable.Rows(RowNumber).Item("Nom").ToString If Not isnull (ObjetDataSet, "Prénom") Then Prenom.Text = ObjetDataTable.Rows(RowNumber).Item("Prénom").ToString Else Prenom.Text = "" End If 'affichage des données dans le datagrid DataGrid1.SetDataBinding(ObjetDataSet, "Clientold") Me.ObjetConnection.Close()

En bleu la partie changée! En vert ce qui n'est pas accepter! Je rappel que je suis sous VB.NET et je n'ai pas fait de RecordSet mais un DataSet! Voilà donc ce que mcs2006 ne va pas je sais pas pourquoi j'ai fais un Imports System.DBNull au début donc ca ne viens pas de là! Ce n'est pas contre toi mcs2006 lol J'y peux rien si ca veux pas moi @ asecher: Je te l'ai dit par MP mais je redis ici au cas ou quelqu'un d'autre puisse me répondre! le : ALTER TABLE Clientold ALTER Prenom SET NULL Cà se met où? (read, update, form load,..) et dans quoi? (dataset, dataadapter,...) car je suis pas en Sqlserver mais OleDb!

asecher · Answer

Moi, je mettrais  
Prenom.Text =  "" & ObjetDataTable.Rows(RowNumber).Item("Pr&#233;nom").ToString

&#224; la place de
        If Not  isnull (ObjetDataSet, "Pr&#233;nom") Then
            Prenom.Text  = ObjetDataTable.Rows(RowNumber).Item("Pr&#233;nom").ToString
        Else
            Prenom.Text = ""
        End If

D'autre part, pour le Alter Table (qui n'est &#224; faire qu'une fois) :
Soit tu as ma main sur la base de donn&#233;es et tu enl&#232;ve la contrainte Not Null sur le pr&#233;nom, soit tu le met dans un strSQL avec un GO &#224; la fin.
je n'utilise pas l'OLEDB donc je ne connais pas les syntaxes.

Cordialement,

Alain 31

boy77000 · Answer

If Not IsDBNull( ObjetDataSet!Prénom ) Then Prenom.Text = "" & ObjetDataTable.Rows(RowNumber).Item("Prénom").ToString Else Prenom.Text = "" End If

C'est bien IsDBNull maintenant qu j'y repense! lol Mais cette fois c'est çà qu'il veut pas! Mais moi j'ai un DataSet aors est-ce que c'est pareil avec un DataSet et un RecordSet !?!? Ensuite j'ai tester un changement car le '!' m'a parut bizarre je me suis dit que c'était peut être du VB6 çà aussi, car dans mon code j'écrivais pas de cette façon. lol: ObjetDataSet!Prénom ===> ObjetDataSet, "Prénom" Mais ca ne marche pas non plus ! lol Pour les Imports je penses qu'il vaut mieu en appeler trop que pas assez alors j'ai appeler tout çà:

Imports System Imports System.Data Imports System.Data.DataSet Imports System.Data.OleDb Imports Microsoft.VisualBasic Imports System.DBNull Imports Microsoft.VisualBasic.Information

Si ca n'est pas bien d'en appeler pour une certaines raison merci de me dire! En rouge celle que j'ai appelées pour notre partie du code! Car System.VisualBasic.Information ne fonctionne pas sûrement en VB6 Merci de m'avoir aider et de continuer à me supporter encore un peu car je sais que je suis relou! On peut croire que j'atends tout sans chercher mais je vous assure avoir chercher et c'est la première fois que j'utilise VB.NET, je dois faire une gestion de base de données pour mon stage de fin d'étude! Et je penses m'en être bien sortit jusque là car j'ai réussi un read update ..... Je dis çà pour montrer que je suis pas là pour demander à chaue fois sans chercher avant! Voilà ++ Et merci d'avance!

Problème de champs vide.

7 réponses

Discussions similaires