Discussion :

[riesseg]

imaginons que je veuille envoyé un mail auto, preformaté:

j'ai ma chaine de caractere

Code :

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

1
2
 
"Ceci est un mail automatique, merci de ne pas répondre" & Chr(13) & Chr(13) & Chr(13) & "Ce mail vous est envoyé, car vous avez souhaité être averti de l'évenement suivant:" & Chr(13) & Chr(13) & "--------------------------------------------------------------------------------------------" & Chr(13) & Chr(13) & mdiMain.sbrMain.Panels(1).Text & Chr(13) & Chr(13) & "--------------------------------------------------------------------------------------------" & Chr(13) & "Ce service vous est offert par Telecommunication de l'Est" & Chr(13)

Comme vous pouvez le voir, elle est du genre super longue.

Est-ce qu'il existe une methode dans le code pour l'ecrire sur plusieurs lignes ??
Un espece de:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
"Ceci est un mail automatique, merci de ne pas répondre" & _
Chr(13) & Chr(13) & Chr(13) &_
 "Ce mail vous est envoyé, car vous avez souhaité être averti de l'évenement suivant:" _
& Chr(13) & Chr(13) & _
 "--------------------------------------------------------------------------------------------"_
 & Chr(13) & Chr(13) & _
mdiMain.sbrMain.Panels(1).Text & Chr(13) & Chr(13) &_
 "--------------------------------------------------------------------------------------------"_
 & Chr(13) &_
 "Ce service vous est offert par Telecommunication de l'Est"_
 & Chr(13)

comme il existe pour les fonctions, mais avec une chaine de caractere qui doit etre contenu entre ""

[méphistopheles]

j'ai pas compris ce que tu veux faire:tu veux écrire une chaine de caractères:

• Dans le code ce qui reviens à donner le deuxième code que tu à mis et dont je ne vois pas l'inconvénient

• Dans la réalité, mais je ne te ferais pas l'injure de te parler du vbcrlf...

bref: quel est ton problème...

[jmfmarques]

Oui !
Mais le plus clair est ceci :
toto = "blablablabla................................................"
toto = toto & "blobloblo................"
toto = toto & "bliblibli....................................."
le résultat est le même, mais la maintenance s'en trouve plus aisée !
Tout celà en plus de l'emploi préférenciel de VBCRLF !

[riesseg]

mouais...

en fait, c'est uniquement un probleme de maintenance ( comme l'a compris jmf)

^^

Donc la seconde solution me convient tout a fait
Mais comme je suis un gars super serieux, je vais jeter un coup d'oeil a cette fameuse fonction ^^

pour repondre clairement a ta question mephistopheles, je chechais un moyen pour eviter d'avoir une ligne de 1km de long dans mon code

[méphistopheles]

ben oui mais dans ce cas, ta solution ne me paraissais pas particulièrement moche.
sans vouloir l'ofensser, je la trouve même meilleure que celle de jfmarques...

[riesseg]

ouais mais elle marche pas ma solution...

alors aue celle de jfm ouais ^^

[méphistopheles]

je ne vois pas pourquoi: chez moi ça marche. à moins que tu oublie de rajouter dans quelle variable tu la rentre...

[riesseg]

Oo

Chez moi ca avait pas marché...
J'ai donc pris la solution de jfm :p

[méphistopheles]

je viens de voir pourquoi: tu oublie des espaces:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
toto="Ceci est un mail automatique, merci de ne pas répondre" & _
Chr(13) & Chr(13) & Chr(13) & _
 "Ce mail vous est envoyé, car vous avez souhaité être averti de l'évenement suivant:" _
& Chr(13) & Chr(13) & _
 "--------------------------------------------------------------------------------------------" _
 & Chr(13) & Chr(13) & _
mdiMain.sbrMain.Panels(1).Text & Chr(13) & Chr(13) &_
 "--------------------------------------------------------------------------------------------" _
 & Chr(13) & _
 "Ce service vous est offert par Telecommunication de l'Est" _
 & Chr(13)

voilà, ça devrais marcher. (attention, il suprimme parfois les espaces avant les "_" lors des débogages.)

[riesseg]

ok.

merki