Discussion :

[jbidou88]

Bonjour,

Je fais une requete insert avec des variables à ajouter a ma table, mais le problème est qu'une de mes variables peut être vide. Comment faire ???

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
    'requete sql (le order by, tu 'nes pas obligé, c'est juste pr trier..au cas ou..
     reqSel = "SELECT * FROM " & table1 & " ORDER BY id "
    
    'tu definis ton recordset qui va contenir le resultat de la requete
     Set myrst = db.OpenRecordset(reqSel)
     
    'si le recordset n'est pas vide
     If Not myrst.EOF Then
         ' tant qu'il n'est pas vide
         Do While Not myrst.EOF
             
             'recuperation des valeurs pour tes 3 champs
              vId = myrst.Fields("id").Value
              vImage = myrst.Fields("image").Value
              vParent = myrst.Fields("pk_fk_parent").Value
              vSort = myrst.Fields("sort_order").Value
              vDate = myrst.Fields("date_ajout").Value
              vLast = myrst.Fields("dern_modif").Value
              
              For a = 0 To i
              
                a = a + 1
                If (vParent = vPk(a)) Then
                    vParent = vPk(a)
                End If
                
              Next
             
             'requete d'insertion (j'en ecris une bidon, elle ne correspond pas forcement a ce   que tu veux faire)
             reqIns = "INSERT INTO " & table2 & " (id,image,parent_id,sort_order,date_ajout,last_modif) VALUES (" & vId & " , '0' ," & vParent & " , 0 , 0 , 0)"
             MsgBox (reqIns)
             'tu envoies l'execution de la requete insert
             db.Execute reqIns, dbFailOnError
    
    
         'tu passes a l'enregistrement suivant
         myrst.MoveNext
            
        Loop
    End If

C'est vParent, et ça me donne la requete suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Insert into table (id,toto,titi,etc) values (1,'0',,0,0,0)

et cela me fait une erreur. Comment faire ??

Merci de votre aide

[toutyx]

Tu as plusieurs solutions,

. Soit tu testes ta variable et tu construit ta requete au fur et a mesure que tes variables ne sont pas vide

. Soit alors si tu récupères dans ta variable un null alors tu met sur toutes tes variables

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Nz(variable,"")

comme ca tu met "" si ta variable est nulle

. Soit alors tu autorises dans tes tables le null

Il y a surement d'autre solution...

A+ antony

[jbidou88]

MErci j'ai utilisé le Nz