Besoin d'aideeee !!!!!!!!!!!!!!!!!!!!!!!!!!

Question

Salut tt le monde j'ai vraiment besoin de votre aide 
bein mon projet consiste gestion des entreprises et j'ai eu un probleme avec la verification du personnel 
par exemple si j'ai  une  personne dans une autre societé il faut que je voi apparaitre un msg d'ereur 

bon voila mon code  mai il ya une ereur L'opérateur '=' n'est pas défini pour chaîne "" et type 'DBNull'

con.Open()

cmd.Connection = con
cmd.CommandText "select* from personnel "dtr cmd.ExecuteReader()

While dtr.Read

If TextBox73.Text = dtr(
"respoBE") 
ThenMsgBox(

"Il existe d‚j… un responsable bureau d'‚tudes nomm‚ " & TextBox73.Text 

End
If

If TextBox72.Text = dtr(
"dessinateur") 
ThenMsgBox(

"Il existe d‚j… un dessinateur nomm‚ " & TextBox72.Text 

End
If

If TextBox71.Text = dtr(
"assistantD") 
ThenMsgBox(

"Il existe d‚j… un assistant direction nomm‚ " & TextBox71.Text

End
If

If TextBox1.Text = dtr(
"topographe") 
ThenMsgBox(

"Il existe d‚j… un topographe nomm‚ " & TextBox1.Text 

End
If
end while
dtr.close
con.close

If TextBox69.Text = dtr(
"aidetopographe") 
ThenMsgBox(

"Il existe d‚j… un aide topographe nomm‚ " & TextBox69.Text 

End
If

s'il vous plait aidez moi pour resoudre ce problemeee le plus vite possible 

mercii
amicalement

Renfield · Answer

- ce genre de titre 'tape a l'oeil' n'est pas le bienvenu
- ta base de données semble etre très étrangement structurée (engendrera tot ou tard des soucis)
- nommes tes contrôles de manière plus claire
- évite les Select *
- comment peux tu tester le 'aidetopographe' ? le recordset est fermé deux lignes plus haut...


concernant ton probleme... il ne faut pas confondre "" et un champ non renseigné (DbNull)
tu ne peux pas récupérer la valeur d'un tel champ.

faire :

If Not IsNull(dtr.Fields("topographe").Value) Then
    If TextBox1.Text = dtr.Fields("topographe").Value Then
        MsgBox "Il existe déjà un topographe nommé '" & TextBox1.Text & "'", vbExclamation
    End If
End If

cs_Jack · Answer

Salut 
Si tu nous disais sur quelle ligne apparait cette erreur, ce serait plus pratique !
Je vois que, vers la fin, tu fais un 
   dtr.Close
et que juste après, tu l'utilise dans un If : Là, c'est sur qu'il ne doit pas aimer ...

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

dodofolie · Answer

c seulement une ereur de frappe le fermeture du datareader c a la fin de tt le  code bein  ca marche tjs pas !!!!!

Renfield · Answer

as tu effectué un test avec la condition utilisant IsNull, comme je te l'ai indiqué ?

dodofolie · Answer

bein oui j'ai essayé mai il ne reconnait pas 
 IsNull ni dtr.fields en me donnant comme ereur que fields n'appartient pas au system.sql.datareader

Renfield · Answer

ok, t'es en .NET, j'avais pas noté ^^

dodofolie · Answer

ok c pas grave merci pour votre aide !!!!

dodofolie · Answer

re salut bein j'ai essayé une autre methode et je croi ke ca marche bien 
j'ai utilisé le mode deconecté 

merci bien !!!!

Besoin d'aideeee !!!!!!!!!!!!!!!!!!!!!!!!!!

8 réponses

Votre réponse