Discussion :

[Christophe P.]

Bonjour,

dans une base MySQL (l'accès fonctionne bien) j'ai stocké une requête sous forme de chaine de caractères. Elle fait 1 624 caractères et semble ne pas être récupérée correctement dans un String.

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
    Dim strRequete As String, strResultatReq As String   
    Dim oDb As DAO.Database
    Dim oRst As DAO.Recordset
    Set oDb = CurrentDb
 
    strRequete = "SELECT etc. "
    MsgBox strRequete
 
    Set oRst = oDb.OpenRecordset(strRequete, dbOpenSnapshot)
    strResultatReq = oRst.Fields(0)
    MsgBox strResultatReq
 
    Me.ListeResultat.RowSourceType = "Table/Query"
    Me.ListeResultat.RowSource = strResultatReq
    Me.ListeResultat.Requery

strRequete est la requête permettant de sélectionner la requête finale (qui fait 1 624 caractères). Elle est OK et testée directement elle renvoie bien le bon résultat (celle de 1624 caractères).
strResultatReq devrait être une chaine de caractères contenant la requête faisant 1 624 caractères.
"MsgBox strResultatReq" ne renvoie que les 94 derniers caractères et ListeResultat est vide. Je n'ai pas de message d'erreur.

[marot_r]

Bonjour.

Un chaîne peut accomoder plus 32000 cararctères.

Après la fin de ta création de SQL ajoute une instruction Msgbox(len(strRequete)). Cela va te donner le nombre de caractères que contient actuellement ta variable.

si ce n'est pas 1604 vérifie le code qui crée ton SQL. Il manque peut-être un oppérateur de concaténation quelque part.

si c'est Ok, c'est peut-être ton SQL généré qui est invalide. Fait afficher strRequete dans la fenêtre d'exécution immédiate (debug.print strRequete). Sélectionne le texte et copie le dans une requête vierge en mode SQL. Cela devrait te donner une piste.

A+

[loufab]

Bonjour,

Le premier test à faire est de faire un copier de la requête dans la table d'origine (celle où tu vois la requête dans son intégralité) et faire un coller dans Notepad++ ou autre éditeur ayant la capacité de voir les caractères de contrôle.
S'il faut tu as simplement des sauts de lignes (CR/LF) qui ne te montre que la première ligne.

Cordialement,

[Christophe P.]

La première requête (strRequete) est OK (syntaxe et exécution).
La deuxième requête (strResultatReq, qui est le résultat de la première) n'a pas la bonne taille et ne contient que les derniers caractères de la chaine normalement retournée.
Avec MsgBox et Debug.print, la taille comme la chaine de strResultatReq ne sont pas bons (64 et fin de la chaîne seulement).
Cette nuit, au lieu de dormir, je me suis rendu compte que 1624 = 255 x 6 + 94. C'est comme si le String ne contenait que 255 caractères (j'ai vu qu'il y avait des problèmes à ce sujet dans les anciennes versions) et qu'il découpe et écrase la chaîne par morceau.

La chaine dans la base contient des retours à la ligne. Les enlever n'a rien changé.

Édition : j'ai écrit dans le code strResultatReq = "<chaine de 430 caractères>" et là ça passe. La chaîne de 1624 caractères ne passe pas car l'éditeur la découpe automatiquement.
J'espère ne pas être obligé de découper ma centaine de requêtes en bouts de 255 caractères !

[loufab]

255 c'est la taille maxi d'un champ Text pour JET.

Si tu utilises ADO au lieu de DAO peut-être que tu n'auras plus ce problème.

[Christophe P.]

OK je test ADO (que je ne connais pas mais il y des des tuto sur dvp).

[Christophe P.]

Ça fonctionne avec ADO !
Merci à tous.