Discussion :

[dedella_al]

Bonjour a tous, je suis entrain de reprendre une vieille appli qu'une personne a developper et elle a utilisé les objet OLE notamment pour saisir du texte en incorporant une feuille Word dans son application. L'objet OLE est stocké au niveau de la base donc lorsqu'on ve récupérer le texte ce trouvant dans l'objet OLE on va chercher l'objet dans la base et le texte s'affiche automatiquement. Moi je souhaieterai récupérer juste le texte brute directement de mon objet pour le mettre dans une variable de type chaine afin d'effectuer des envoies de mails, je ne vois comment faire merci de votre aide.

[méphistopheles]

Si tu veux le text brut avec le code word, tu pux utiliser la function suivante:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
public function LirTXT( chemin as string) as string
dim ligne as string
 
open chemin for input as #1
 
lineinput #1,ligne
LirTXT=ligne
do while not eof(1)
lineinput #1 ligne
LirTXT=LirTXT & vbcrlf & LirTXT
loop
 
close #1
end function

j'ai peut-être oubvlié quelque-chose, j'ai pas le code sous les yeux

salut