Discussion :

[Yohann_x]

Bonjour,

qu'elle est la bonne façon d'après vous de retranscrire cette requête DAO Acccess en ADO sous VB6,

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

effectivement elle fonctionnait très bien en DAO, mais depuis que je suis passé en ADO je n'arrive plus à l'utiliser , cette requête permet de recupérer des données d'une table ODBC (ventes) pour les injecter dans une table Access (TBL), j'ai bien tenté ceci,

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")

mais la requête ne trouve pas la table "ventes", si j'inverse ça me dit que la requête ne trouve pas la table "TBL"...

qu'est-ce qu'il faut faire pour réunir les 2 en ADO ?

[Yohann_x]

autant pour moi la réponse était sous mes yeux...

[Vld44]

c'est à dire ?

[Yohann_x]

Salut,

dans cnxTBL.Execute qui est une table Access, il fallait lier la table "ventes" qui elle est sur le web, cette table liée est la source dans ma requête..., je pensais qu'il était possible de faire autrement en ADO, par exemple ouvrir la connexion sur "TBL" via JET et dans la même requête ouvrir une 2ème connexion sur "ventes", l'une en local l'autre sur le web...

mais apparament ADO ne le permet pas ou tout du moins si c'est faisable, ça sera pas aussi rapide..