Utilisation incorrecte de 'nul'
piaf2000
Messages postés
1
Date d'inscription
mardi 27 avril 2010
Statut
Membre
Dernière intervention
27 avril 2010
-
27 avril 2010 à 14:46
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 27 avril 2010 à 16:23
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 27 avril 2010 à 16:23
A voir également:
- Utilisation incorrecte de 'nul'
- Incorrecte ✓ - Forum Visual Basic 6
- Instruction incorrecte à l'extérieur d'une procédure - Forum Visual Basic
- Utilisation invalide de la clause group - Forum SQL
- Erreur d'exécution 94 utilisation incorrecte de null - Forum VB.NET
- Problème : Erreur d'exécution '94' Utilisation non autorisée des NULL - Forum Visual Basic 6
2 réponses
houtas
Messages postés
116
Date d'inscription
jeudi 14 décembre 2006
Statut
Membre
Dernière intervention
29 août 2013
27 avril 2010 à 16:16
27 avril 2010 à 16:16
ton erreur se situe ici
Replace(rst.Fields(4), " ", "") <> ""
le test sur replace()<>""
si tu veux tester la valeur du champ:
Replace(rst.Fields(4), " ", "")
If rst.Fields(4) <> "" Then
nomPersSuivi = concat("[ ", nomPersSuivi)
End If
Replace(rst.Fields(4), " ", "") <> ""
le test sur replace()<>""
si tu veux tester la valeur du champ:
Replace(rst.Fields(4), " ", "")
If rst.Fields(4) <> "" Then
nomPersSuivi = concat("[ ", nomPersSuivi)
End If
Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
74
27 avril 2010 à 16:23
27 avril 2010 à 16:23
If rst.Fields(4) <> "" Then
te donneras la même chose...
le 'truc', c'est simplement que ton champs a pour valeur 'Null'
pas une chaine vide ...
faire :
Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
te donneras la même chose...
le 'truc', c'est simplement que ton champs a pour valeur 'Null'
pas une chaine vide ...
faire :
If Not IsNull(rst.Fields(4)) Then
If Replace(rst.Fields(4), " ", "") <> "" Then
nomPersSuivi = concat("[ ", nomPersSuivi)
End If
End If
Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
