cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200621 16 févr. 2006 à 22:07
Salut,
Cherche sur le site avec l'api ShellExecute.
Un exemple :
Dans c:\temp, un fichier texte : essai.txt
Une form avec un bouton : command1
Et ce code dans ta form :
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1
Private Sub Command1_Click()
ShellExecute Me.hwnd, vbNullString, "c:\temp\essai.txt", vbNullString, "C:\temp", SW_SHOWNORMAL
End Sub
Ca aura pour effet de lancer le bloc-note (ou autre éditeur avec lequel est associé l'extension .txt).
Si tu mets "tonchemin\tonfichier.htm" à la place de "c:\temp\essai.txt", ça te lancera ton navigateur pour afficher ta page.
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?