Sujet Précédent Sujet Suivant

Soucis de syntax isnot sur sql

Résolu
vinkey33 Messages postés 92 Date d'inscription mercredi 9 décembre 2015 Statut Membre Dernière intervention 23 janvier 2021 - 22 nov. 2017 à 11:03
vb95 Messages postés 3472 Date d'inscription samedi 11 janvier 2014 Statut Contributeur Dernière intervention 13 avril 2024 - 22 nov. 2017 à 20:35
Bonjour, j'ai un petit souci pour trouver la bonne syntaaxe pour isnull je m'explique, j'ai un formulaire avec trois liste déroulante. je voudrais que si je met rien dans une liste déroulante qui sera toujours celle-ci, j'aimerais qui insere sur la table de destination les deux choix que j'ai selectionné voici le code 
Dim strmysql As String
Dim RunMySQL As String
Dim VrEMEI As String
Dim VrSIM As String
Dim VrUSER_ID As String
VrUSER_ID = Me.Recherche_Employé
VrEMEI = Me.Liste_Equipement
VrSIM = Me.Liste_Abonnemen
 
If IsNull([Liste_Equipement]) Then
RunMySQL = "INSERT INTO [Affectation Equipement] ( User_ID, EMEI, SIM ) "
RunMySQL = RunMySQL & " SELECT """
RunMySQL = RunMySQL & VrUSER_ID
RunMySQL = RunMySQL & """, """
RunMySQL = RunMySQL & VrSIM
RunMySQL = RunMySQL & """ "
Else
RunMySQL = "INSERT INTO [Affectation Equipement] ( User_ID, EMEI, SIM ) "
RunMySQL = RunMySQL & " SELECT """
RunMySQL = RunMySQL & VrUSER_ID
RunMySQL = RunMySQL & """, """
RunMySQL = RunMySQL & VrEMEI
RunMySQL = RunMySQL & """, """
RunMySQL = RunMySQL & VrSIM
RunMySQL = RunMySQL & """ "
  End If
  DoCmd.RunSQL RunMySQL

1 réponse

Réponse 1 / 1
vb95 Messages postés 3472 Date d'inscription samedi 11 janvier 2014 Statut Contributeur Dernière intervention 13 avril 2024 169
22 nov. 2017 à 20:35
Si tes listes déroulantes sont des ListBox la syntaxe est la suivante : 

If Liste_Equipement.ListCount = 0 Then
0

Discussions similaires

Comment fonctionne la fonction FormulaR1C1
cs_razmokets -
wape -

2 réponses
fonction modulo en VBA
krisprolss -
Benouille -

2 réponses
Dernière cellule non vide d'une colonne
cs_falafala -
Luigi13013 -

5 réponses
A quoi sert la fonction Set ?
ICIoBRa -
ICIoBRa -

3 réponses
Modulo pour chiffres à virgule
cs_ebro -
Gally -

8 réponses
Rejoignez-nous