Discussion :

[souketou]

Bonjour,

J'ai une requête insert into que je souhaite exécuter en vba lors d'un clic sur bouton.

D'autre requête s'exécute lorsque je clic mais au niveau des insert into cela m'affiche une erreur. (Instruction SQL non valide; 'DELETE','INSERT',..., Attendus)

Voila mon code: je sais que c'est à partir du DoCmd.RunSQL (Extract_table) que ça plante (c'est ma requête insert into).

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
Private Sub Commande0_Click()
On Error GoTo Err_Commande0_Click
 
DoCmd.RunSQL "delete * from 4D"
DoCmd.TransferText acImportDelim, "FormImport", "4D", "C:\Documents and Settings\test.TXT", -1
DoCmd.RunSQL "update 4D set Frs='4D'"
DoCmd.RunSQL (Extract_table)
MsgBox ("Importation terminée!")
 
Exit_Commande0_Click:
    Exit Sub
 
Err_Commande0_Click:
    MsgBox Err.Description
    Resume Exit_Commande0_Click
 
End Sub

Je ne pense pas qu'il y est de problème avec mes requêtes car en exucution directe elle fonctionne toutes.

Merci pour vos réponses.

[Access Newbie]

Bonjour,

A quoi correspond extract_table ? une fonction ? une chaine de caractere globale ?

Si vous faites un docmd.runsql la chaine qui suit doit comporter select, update ou delete.

[souketou]

Extract_table correspond au nom d'une requête. je pensais qu'il été possible via l'instruction docmd.runsql (nom de la requête) d'exécuter une requête écrite en sql dans access.

Suis-je obligé de copier le code de ma requête à la suite de l'instruction docmd.runsql ?

[Access Newbie]

Si Extract_Table est une requete access, il faut utiliser la commande

Code :

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

docmd.openquery nomDeLaRequete

[souketou]

Super merci beaucoup.