Bonjour,

Je me connecte à MySql via ODBC sur mon serveur dédié LAMP. La partie attachement des tables au frontal ACCESS fonctionne très bien. La connexion fonctionne.

Maintenant j'ai besoin de lancer des opérations SQL coté serveur. Je veux donc écrire une fonction à laquelle je passe un SQL et je récupère un recordset ADO.

Mais ça ne marche pas ! Voila le 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
Dim Cnn1 As ADODB.Connection, MonRs As ADODB.Recordset, s As String
 
Set Cnn1 = New ADODB.Connection
 
s = "DRIVER={MySQL ODBC 8.0 Unicode Driver};" & "SERVER=xxx.xxx.xxx.xxx  ;" & "DATABASE=mabase;" & "uid=user;" & "pwd=password;" & "Option=3;"
Cnn1.ConnectionString = s
Cnn1.Open
MsgBox (Cnn1.Errors.Count) 'donne 0
 
Set MonRs = New ADODB.Recordset
MonRs.Open "SELECT * FROM t_staff", Cnn1, adOpenDynamic, adLockPessimistic
MonRs.MoveLast
 
MsgBox (MonRs.RecordCount) 'donne toujours -1, et le SQL exécuté dans PHPMyAdmin renvoie 3 enregistrements
Quand je lance le SQL coté serveur je récupère 3 enregistrements. Ici il me renvoie toujours -1. Par ailleurs je n'ai pas d'erreur sur la connexion à la base.

Qu'est-ce que je fais mal ???

Christian