Re : ODBC l'appel a échoué
Re bonjour au forum,
Après pas mal de tentative en tout genre, j'ai réussi a contourner mon problème. En fessant la chose suivante.
Sub alao()
Dim Table_Transfert(60000, 25) As String 'définition nb ligne colone de la réponse de la requête
Dim wrkJet As Workspace
Dim DbSaisie As Database
Dim RecordSaisie As Recordset
Dim rstTemp As Recordset
Dim query As String
'-----------------------------------
'Récupération de la requete
'-----------------------------------
'connextion et lecture de la requete
Set WrkMySQL = CreateWorkspace("MySQL", "Admin", "", dbUseODBC)
Set TableMySQL = WrkMySQL.OpenDatabase("toto", , True, "ODBC;DSN=toto;UID=user;PWD=Password;database=Base ")
query = "ma requête"
Set rs = TableMySQL.OpenRecordset(query)
Vous allez me dire, ça marche, je peut donc avancer, mais j'aime pas rester sur une chose que je ne comprend pas...
Si quelqu'un peut m'expliquer pourquoi en écrivant directement ma requête dans le code ça fonctionne?
Surtout que cet outil me sert a lancer exécuter plusieurs requêtes a la suite...
Par avance merci!!