Discussion :

[Yohann_x]

Bonjour,

la requête ci-dessous permet en une passe de transférer des données d'une table Web vers une table Access, mais j'aurai besoin de savoir si elle est réalisable en ADO, et si oui comment...

Code :

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

1
2
3
4
5
6
sMySQL = "INSERT INTO TBL (id, num_fact) "
sMySQL = sMySQL + "SELECT id, num_fact "
sMySQL = sMySQL + "FROM ventes "
sMySQL = sMySQL + "ORDER BY id;"
 
db.Execute sMySQL

perso avec ce code je n'y arrive pas,

Code :

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

Set rs = cnxTBL.Execute("INSERT INTO TBL (id, num_fact) SELECT id, num_fact FROM ventes ORDER BY id")

ça me met comme erreur que le Moteur jet ne trouve pas la table ou requête source "ventes", effectivement le Execute ouvre la table Access pour le INSERT, par contre ça fonctionne avec la méthode ci-dessous,

Code :

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

1
2
rs.Open "SELECT id, num_fact FROM ventes", cnxVentes, adOpenForwardOnly, adLockReadOnly
Set rs = cnxTBL.Execute("INSERT INTO TBL (id, num_fact) VALUES (" & rs!id & ", " & rs!num_fact & ")")

mais à mon avis c'est pas aussi rapide..., est-ce le seul moyen en ADO ?

merci pour vos réponses

[Yohann_x]

autant pour moi j'ai la réponse, dans cnxTBL.Execute il fallait lier la table "ventes" cette table est la source dans ma requête, je pensais qu'il était quand même possible de faire autrement en ADO, par exemple ouvrir la connexion sur "TBL" et dans la même requête ouvrir une 2ème connexion sur "ventes" l'une en local l'autre sur le web...

++