za to se koristi ShellExecute API funkcija, o tome je pisano vec milion puta ovde na forumu, mogao si da koristis pretragu :)
skini API-Guide (imash link u TOP temi) u njemu imash primere, evo paste iz njega:
Code:
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 Form_Load()
'KPD-Team 1998
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
'Send an E-Mail to the KPD-Team
ShellExecute Me.hwnd, vbNullString, "mailto:KPDTeam@Allapi.net", vbNullString, "C:\", SW_SHOWNORMAL
End Sub
ovo je kod koji ce da ti otvori default mail klijent, a da bi otvorio bilo koji tip fajla (u default programu za taj tip fajlova) onda treba da prosledis "open" kao lpOperation:
Code:
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 Form_Load()
ShellExecute Me.hwnd, "open", "C:\document1.doc", vbNullString, "C:\", SW_SHOWNORMAL
End Sub
ovo ce ti pokrenuti Word i otvoriti C:\document1.doc fajl...
Kako otvoriti ne-exe program ili fajl ?
