第一次用VB:请问如何用VB调用一个Console.msi的安装程序??

[sundy26]

顺祝大家中秋节快乐!

[rainstormmaster]

Option Explicit
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
Private Const SW_SHOWNORMAL = 1
'DirectorMX_Installer(1).msi
Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "d:\mc\DirectorMX_Installer(1).msi", vbNullString, vbNullString, SW_SHOWNORMAL
End Sub

[sundy26]

Thanks very much

[betagain]

不知道shell行不行