VB.Net Requête SQL qui ne fonctionne pas DBNull
cs_MagDix
Messages postés
531
Date d'inscription
lundi 5 juin 2006
Statut
Membre
Dernière intervention
6 octobre 2012
-
1 oct. 2008 à 15:00
cs_thierry la fronde Messages postés 351 Date d'inscription mercredi 21 juillet 2004 Statut Membre Dernière intervention 12 août 2009 - 1 oct. 2008 à 15:17
cs_thierry la fronde Messages postés 351 Date d'inscription mercredi 21 juillet 2004 Statut Membre Dernière intervention 12 août 2009 - 1 oct. 2008 à 15:17
A voir également:
- VB.Net Requête SQL qui ne fonctionne pas DBNull
- Requete paramétrée sql - Conseils pratiques -C# / .NET
- Requete sql between ✓ - Forum SQL
- Syntaxe requête sql pour recherche entre deux dates ✓ - Forum VB.NET
- Requete sql update ✓ - Forum PHP
- Between avec date format français et format anglais avec SQL Server ✓ - Forum Visual Basic 6
1 réponse
cs_thierry la fronde
Messages postés
351
Date d'inscription
mercredi 21 juillet 2004
Statut
Membre
Dernière intervention
12 août 2009
1 oct. 2008 à 15:17
1 oct. 2008 à 15:17
bonjour,
C'est parce que tu dois essayé d'affecter une variable (qui n'est pas initialisé et qui a la valeur DBNull) à un champ qui reçoit un String. (ou l'inverse)
test tous tes champs avant de les affecter :
if not IsDBNull (MonTexte) then
'je fais ce que je veux
end if
cela peut t'obliger à scinder la construction de ta chaine de requête
voici un exemple de code que j'ai pu faire :
ChaineSqlInsert = "INSERT INTO T_Apprenant("
ChaineSqlValues = "VALUES ('"
If MonTitre <> "" Then
ChaineSqlInsert &= "Titre"
ChaineSqlValues &= MonTitre
Else
EstValide = False
End If
If EstValide And MonNom <> "" Then
ChaineSqlInsert &= ",Nom"
ChaineSqlValues &= "','" & MonNom
Else
EstValide = False
End If
.....
'puis à la fin :
If EstValide Then
ChaineSqlInsert &= ")"
ChaineSqlValues &= "');"
LaRequete = ChaineSqlInsert & ChaineSqlValues
End If
thierry la fronde
C'est parce que tu dois essayé d'affecter une variable (qui n'est pas initialisé et qui a la valeur DBNull) à un champ qui reçoit un String. (ou l'inverse)
test tous tes champs avant de les affecter :
if not IsDBNull (MonTexte) then
'je fais ce que je veux
end if
cela peut t'obliger à scinder la construction de ta chaine de requête
voici un exemple de code que j'ai pu faire :
ChaineSqlInsert = "INSERT INTO T_Apprenant("
ChaineSqlValues = "VALUES ('"
If MonTitre <> "" Then
ChaineSqlInsert &= "Titre"
ChaineSqlValues &= MonTitre
Else
EstValide = False
End If
If EstValide And MonNom <> "" Then
ChaineSqlInsert &= ",Nom"
ChaineSqlValues &= "','" & MonNom
Else
EstValide = False
End If
.....
'puis à la fin :
If EstValide Then
ChaineSqlInsert &= ")"
ChaineSqlValues &= "');"
LaRequete = ChaineSqlInsert & ChaineSqlValues
End If
thierry la fronde
