
15-04-2017, 03:21
|
|
Registered User
|
|
Join Date: May 2015
Location: India
Posts: 33
Thanks: 10
Thanked 0 Times in 0 Posts
|
|
Quote:
Originally Posted by felice2011
Try this way ...
Code:
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
If File.Exists(Application.StartupPath & "\inside episode 2\My_Install_II.exe") Then
Dim _Exe As Process
Dim My_exe As New ProcessStartInfo(Path.Combine(Directory.GetParent(Application.ExecutablePath).FullName, "inside episode 2\My_Install_II.exe"))
My_exe.WorkingDirectory = Application.StartupPath
_Exe = Process.Start(My_exe)
_Exe.WaitForExit()
Me.Close()
Else
MsgBox("File not found!!!", +vbExclamation, "Episode 2")
End If
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
If My.Computer.FileSystem.FileExists(Application.StartupPath & "\inside episode 3\My_Install_III.exe") Then
Process.Start(Path.Combine(Directory.GetParent(Application.ExecutablePath).FullName, "inside episode 3\My_Install_III.exe"))
Me.Close()
Else
MsgBox("File not found!!!", +vbExclamation, "Episode 3")
End If
End Sub

|
Sorry but ur code showing error
1.jpg
|