Discussion :

[batosai]

Bonjour a tous,

Dans mon site web, je désirerais en cliquant sur un bouton, ouvrir par exemple word pour afficher le contenu d'un fichier dans une nouvelle fenêtre.
Je récupèrerais biensûre avant le chemin complet et valide de mon fichier.

Comment faire?

[maverickbj]

Hello

T'aurais pu chercher un peu plus sur ce coup
Voilà Monsieur :

1 Ajouter la référence Microsoft Word 9.0 object library ou plus récent je sais pas avec quoi tu bosses.

2 Tu mets le code qui suit

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
16
17
18
19
20
 
 
Dim WordApp As New Word.Application 
Dim WordDoc As Word.Document 
 
'Ouverture du document au chemin contenu dans Text1
'ATTENTION AUCUNE VERIFICATION SUR LE CHEMIN
dim obj as new object = ctype(textbox1.text, object)
Set WordDoc = WordApp.Documents.Open(obj) 
 
 
Stop 
'Fermeture du document SANS sauveagarde
Call WordDoc.Close(False) 
'Destcruction du document word
Set WordDoc = Nothing 
'Quitte l'application  Word
Call WordApp.Quit 
'Destrcution de l'objet Word Application
Set WordApp = Nothing

Je pense que ça devrait faire l'affaire . Bonne programmation

[batosai]

Le pb c'est que je n'ai pas de reference vers microsoft word dans visual studio 2005.

Commen je peux la retrouver?

[maverickbj]

Re Salut

Sur visual studio 2OO5 pour rajouter la référence tu suis ca:

Tu cliques Website puis /Add reference
Ensuite Clique sur le Tab COM c'est la que ça y est je l'ai fait hier.

Tu devrais trouver Microsoft Word 11.0 object library.
Si tu le trouves pas essai d'ajouter la référence Microsoft office 11 components d'abord et retourne sur la liste tu le trouveras normalement

Bon courage

[batosai]

ok merci je regarde ca....
merci

[batosai]

J'ai réussi a ouvrir word. Mais à chaque fois que je veux ouvirir un fichier, j'ai le message "Imposible d'ouvrir ..." puis il m'ouvre ensuite le fichier que je veux. Au moment de fermer il me demande si je veut remplacer le normal par le fichier que j'ai ouvert. Je ne sais pas a quoi correspond ce Normal.

C'est peut etre flou mais je vais vous donner mon code. J'aimerais que Word se ferme correctement. En me demandant a la limite si je veux bien enregistrer les modifications effectuées sur mon fichier mais pas autre chose.

voila comment je procede pour ouvir mon fichier:

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
16
17
18
19
20
 
Protected Sub GVAccueil_RowCommand(ByVal sender As Object, ByVal e As GridViewCommandEventArgs)
        If (e.CommandName.Equals("OuvrirFichier")) Then
            Dim path As String
            Dim wordApp As New Word.Application
            Dim WordDoc As New Word.Document
 
            'On récupère le chemin du fichier
            GVAccueil.SelectedIndex = e.CommandArgument
            path = GVAccueil.SelectedRow.Cells(1).Text + ".doc"
 
            'On ouvre Word
            wordApp.Documents.Open(CType(path, Object))
            WordDoc.Close(False)
            wordApp.ShowMe()
            wordApp.Visible = True
 
            GVAccueil.SelectedIndex = -1
        End If
    End Sub