Discussion :

[veens777]

Bonjour,

Je souhaite que l'utilisateur puisse ouvrir un document word a partir d'une openfiledialog.
J'ai écrit le code suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
    Private Sub BT_Ouvrir_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Ouvrir.Click
        Dim fn As String
        OpenFileDialog1.Filter = "Word Documents|*.doc;*.docx"
        openFileDialog1.Title = "OUVRIR"
        openFileDialog1.ShowDialog()
        If OpenFileDialog1.ShowDialog() = DialogResult.OK Then 'si l'utilisateur a bien cliqué sur ok
            fn = OpenFileDialog1.FileName
            FileOpen(1, fn, OpenMode.Random)
        End If
    End Sub

Lorsque je clique sur le bouton ouvrir après avoir selectionné un document word l'openfiledialog se ferme puis réapparait avec le chemin du fichier dans la zone de texte...mais aucun fichier s'ouvre...

Merci pour votre aide.

Cordialement.