ouvrir document word

Version imprimable

bonjour
je me suis servis de la FAQ pour trouver comment ouvrir un document word. j utilise le code ci dessous mais il plante : "Le projet a provoque une classe d execption EOleSysError ..." comment faire ? merci

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Variant vFileName, vLink, vReadOnly, vFormat, vReadPass, vWDocuments, vWDocument ;
    Variant vMSWord;
try
        {
 
    vMSWord = Variant::CreateObject("Word.Application");
        }
catch(...)
        {
    vMSWord = Variant::CreateObject("Word.Application");
        }
    vMSWord.OlePropertySet("Visible", true);
    vReadOnly = true; // lecture seule
 
    vFileName = "C:\Documents and Settings\Manu\Mes documents\C++ buikder\Anniv v3\Aide\Aide.doc";
    vWDocuments = vMSWord.OlePropertyGet("Documents");
    vWDocument = vWDocuments.OleFunction("Open", vFileName,vReadOnly);

10/12/2008, 11h46
pottiez

Salut,
déjà il y a une erreur dans ton chemin de fichier, tes antislash doivent être doublé pour que ça fonctionne :

Code:

vFileName = "C:\\Documents and Settings\\Manu\\Mes documents\\C++ buikder\\Anniv v3\\Aide\Aide.doc";
10/12/2008, 11h51
manworms2

D'accord le problème venait de la merci :D
Dernière question comment récupérer le chemin de l exécutable pour le placer dans le FileName.
Pour le jour on j installerai le programme sur un autre PC ou le chemin sera différent.

merci
10/12/2008, 11h54
pottiez

La réponse est dans la FAQ : http://cpp.developpez.com/faq/bcb/?p...oireexecutable ;)

j ai le message Type de variable incorrect . pourtant le chemin est bon je l ai tester dans un edit .

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
    AnsiString RepertoireApplication = ExtractFilePath(Application->ExeName);
    AnsiString CheminAide = (ExtractFilePath(Application->ExeName)+"Aide\\Aide.doc");
try
        {
 
    vMSWord = Variant::CreateObject("Word.Application");
        }
catch(...)
        {
    vMSWord = Variant::CreateObject("Word.Application");
        }
    vMSWord.OlePropertySet("Visible", true);
    vReadOnly = false; // lecture seule
 
 
    vFileName = CheminAide;
    vWDocuments = vMSWord.OlePropertyGet("Documents");
    vWDocument = vWDocuments.OleFunction("Open", vFileName,vReadOnly);

10/12/2008, 13h47
sat83

Code:

vFileName = StringToOleStr( CheminAide );
10/12/2008, 13h48
pottiez

Tu l'as à quel moment ? en exécution ou à la compilation ? sur quel ligne précisément ?
10/12/2008, 14h00
manworms2

Citation:

Envoyé par sat83

Code:

vFileName = StringToOleStr( CheminAide );

parfait merci , j avais chercher dans l'aide une conversion StrToVar ...
L ' erreur avait lieu a l'execution .
encore merci
10/12/2008, 14h05
sat83

Juste une remarque : l'utilisation de StringToOleStr() produit des fuites de mémoires.
Je te renvoi sur ce post où j'avais posé une question su le sujet.

Ah oui, et n'oublis pas de cliquer sur "Résolu" lorsque quelqu'un à répondu à ta question (sur ce poste, et sur les 3 ou 4 autres précédents)
10/12/2008, 16h56
blondelle

c'est le nom du chemin qui provoque l'erreur

Citation:

vWDocument = vWDocuments.OleFunction("Open", vFileName,vReadOnly);

Je ne sais pas si il y a une regle a respecter mais a tester en fonction de l'erreur " vFileName " peu se passer comme ceci " WideString(vFileName) " ou " vFileName.c_str() "
10/12/2008, 19h17
blondelle

Je viens de me heurter a ce type d'erreur
Si vFileName a ete declare en Variant est provoque une erreur alors il faut ecrire " WideString(vFileName) ", si vFileName a ete declare en String et provoque une erreur il faut ecrire " vFileName.c_str() "