Discussion :

[al_bert]

Bonjour,

je suis face à la problématique suivante : je désire alimenter une liste déroulante d'un formulaire à l'aide de la 2e ligne (et uniquement la 2e) d'un champ texte qui contient plusieurs lignes de texte. Cette liste déroulante est alimentée par une requête SQL qui va chercher directement dans une table liée les informations requises.

En ce moment, je n'ai aucun problème à aller récupérer le contenu du champ texte (à l'aide d'une simple requête SELECT), mais c'est la 1ere ligne qui s'affiche dans ma liste déroulante et j'aimerais y voir apparaître la 2e plutôt. Aussi, il m'est impossible d'inverser l'ordre des lignes dans le champ texte (pour mettre la 2e ligne en première position par exemple), car ce champ texte est réutilisé ailleurs et l'ordre des informations a de l'importance; il me faudrait donc configurer ma requête SQL pour extraire seulement la 2e ligne, si cela est possible.

Merci d'avance pour votre aide,
al_bert

[Psychopathe]

Comment sais-tu que quelle est la deuxième ligne? Possèdes-tu une clé (primaire) permettant d'identifier quelle ligne est la deuxième?

[al_bert]

Bonjour,

en fait il s'agit d'un champ de type mémo et non texte à proprement parler(désolé pour la confusion, je commence à être fatigué ). Chaque ligne est séparée par un "enter" (vbCrLf) de la suivante et de la précédente et c'est le seul moyen de les différencier les unes des autres.

Merci,
al_bert

[Psychopathe]

Ah oui. J'ai compris. Avec une requête, je n'ai aucune idée de comment faire car là en fait il s'agit d'une opération sur le contenu même du champ mémo. D'autant que le retour chariot doit en plus faire croire à Access qu'il y a plus de 255 caractères pour la liste déroulante (ce qui peut expliquer, si j'ai tout compris, pourquoi il n'y a que la première ligne qui apparait, et pas le reste)... Peut-être en programmant...

[Kawabaumga]

Bonjour,

en fait il s'agit d'un champ de type mémo et non texte à proprement parler(désolé pour la confusion, je commence à être fatigué ). Chaque ligne est séparée par un "enter" (vbCrLf) de la suivante et de la précédente et c'est le seul moyen de les différencier les unes des autres.

Merci,
al_bert

Bonjour,
en sachant ceci, pourquoi ne pas passer par du VBA?

[al_bert]

Bonjour,

c'est en effet une possibilité de passer par le VBA, mais je croyais qu'il était plus simple de passer par SQL que par VBA pour contrôler le contenu de ma liste déroulante. Je vais aller voir du côté du VBA en continuant mes recherches en parallèle.

Merci,
al_bert

[vodiem]

salut à tous,

il est possible d'utiliser des fonctions de manipulation de chaine dans les requetes:
un truc du genre:

Code SQL :

Sélectionner tout - Visualiser dans une fenêtre à part

select mid(machaine, instr(machaine,vbCrLf)) as aPartirLigne2 from matable

si vbCrLf n'est pas reconnu il est équivalent à chr(13)&chr(10)

[al_bert]

Bonjour,

merci beaucoup vodiem pour la réponse, ça fonctionne très bien! J'arrive en effet avec les fonctions "mid" et "instr" à aller récupérer la 2e ligne d'un champ texte avec succès!

Maintenant, il ne me reste qu'un petit souci. En fait, c'est que j'aimerais bien afficher dans ma liste déroulante la 2e et la 3e ligne du texte. Or, il semble que par défaut la fonction me retourne tout ce qui se trouve entre le 1er vbcrlf rencontré (soit le début de la 2e ligne) et le suivant (soit la fin de la deuxième ligne). Existe-t-il un moyen de compter les occurrences de vbcrlf afin de pouvoir aller récupérer l'extrait de "machaine" se situant après le 2e vbcrlf par exemple?

Merci encore,
al_bert

[vodiem]

tu as plusieurs possibilités:
.soit tu crées des champs ligne2, ligne3... basé sur Mid() Instr()
pour avoir la 3 ième linge tu fais partir le Mid à Instr(Instr(txt,vbCrLf)+1,txt, vbCrLf) et ainsi de suite... tu peux extraire entre les vbCrLf avec le Mid() en faisant la différence des positions de vbCrLf. la formulation sera longue surtout qu'il faudra peut être prévoir de rajouter des iif() si les valeurs des positions sont nulle... si cela reste quand même "simple" dans la mesure où tout se situe dans la requete il n'est pas envisageable s'il y a de nombreuses lignes à extraire...
.soit tu crée une fonction basé sur split() qui renverra la chaine correspondante à la ligne désiré à partir du tableau crée de la chaine découpé par les vbCrLf. c'est plus clair mais peut être un peu plus long à l'exécution et il te faut un module (pb maintenance, distribution)...

[al_bert]

Bonjour,

c'est parfait, ça fonctionne très bien! Comme je n'ai que deux lignes à sélectionner, la solution que vous me proposez en SQL est parfaite ici.

Encore une fois, merci énormément de votre aide!
al_bert

[slaterry]

Bonjour à tous,

J'ai besoin de votre aide concernant un problème du même genre :

Pour tout dire, j'essaie de copier une chaine qui appartient à la ligne X d'un champ de texte dans un autre.

Voici un exemple de chaine dans le champ A :
<DIV class=block id=statistique>
<UL class=ong>
<LI class=selected><A>Indicateurs techniques</A></LI></UL>
<DIV id=content_statistique>
<TABLE class=tableau00_content id=tab_statistique cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR class=impaire onmouseover=$hover(event); onmouseout=$_hover(event);>
<TH class=col1>Valeur intrinsèque</TH>
<TD>1,50970</TD></TR>
<TR onmouseover=$hover(event); onmouseout=$_hover(event);>
<TH class=col1>Valeur temps</TH>
<TD>0,00</TD></TR>



Donc comment copier la valeur 1,50970 de la ligne 9 et la coller dans le champ de texte B ?


Merci

[helas]

Bonjour,
pour slaterry cela pourrait se traduire par une requete Mise à jour

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
UPDATE Table1 SET Table1.b = Mid$(Mid$([a],InStr(1,[a],"Valeur intrinsèque")),InStr(1,Mid$([a],InStr(1,[a],"Valeur intrinsèque")),"<TD>")+4,InStr(1,Mid$([a],InStr(1,[a],"Valeur intrinsèque")),"</TD>")-InStr(1,Mid$([a],InStr(1,[a],"Valeur intrinsèque")),"<TD>")-4);

Table1 devra être remplacer par le nom de la table en cause
si on considère "Valeur intrinsèque" comme mots clés :
Mid$(Mid$([a],InStr(1,[a],"Valeur intrinsèque")) retourne la chaine à partir de "Valeur intrinsèque"
il faut ensuite repérer le premier <TD> et </TD> de cette nouvelle chaine, leur différence de position donnant le nombre de caractères à retourner

[slaterry]

Merci beaucoup helas pour votre aide ainsi que votre rapidité.