Bonjour à tous
Voila, j'ai un fichier excel qui discute avec une base MySql (c'est pour des exports spécifiques sur des données de Mantis).
Il y a déjà quelques requêtes qui fonctionnent bien.
Mais pour certaines :
- en ayant suivi le même schéma de code que celles qui fonctionnent
- en ayant fait la requête directement sous mysql (et que cela fonctionne)
--> le nombre d'enregistrements est nul (le recorcount retourne -1).
je croyais au début que c'était parce que j'utilisai le même recordset. Alors j'en ai créé un pour chaque requêtes (que je ferme ensuite avec la connexion). Mais cela n'a rien changé :'(
Auriez vous d'autres pistes?
PS :
Voici le code d'une des requêtes qui ne marche pas : J'ai directement recopier le contenu de la variable "laRequete" à partir du sqlQuery de mysql (qui me retourne bien des résultats). J'ai aussi posé un espion sur "idProjet" qui est correct.
Voila voila
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
18
19
20
21
22
23
24
25
26
27
28 Private Sub chargerComboUsers() Dim requeteUser As New ADODB.Recordset laRequete = "" laRequete = laRequete & "SELECT mantis_project_table.id, mantis_project_table.name, mantis_user_table.realname" laRequete = laRequete & " FROM mantis_project_table, mantis_project_user_list_table, mantis_user_table" laRequete = laRequete & " where mantis_project_table.ID = mantis_project_user_list_table.project_id" laRequete = laRequete & " and mantis_project_user_list_table.user_id = mantis_user_table.id" laRequete = laRequete & " and mantis_project_table.id = " & idProjet & ";" cmbChoixSec.Clear ProceduresDiv.initConnectionMysql Set objetConnexion = New ADODB.Connection objetConnexion.Open chaineConnection requeteUser.Open laRequete, objetConnexion MsgBox (requeteUser.RecordCount) requeteUser.MoveFirst If requeteUser.RecordCount > 0 Then While Not (requeteUser.EOF) cmbChoixSec.AddItem requeteUser("realname") requeteUser.MoveNext Wend End If requeteUser.Close objetConnexion.Close End Sub
Merci beaucoup d'avance
@++
Partager