View Single Post
  #17  
Old 15-04-2017, 03:21
bairagyakushal4 bairagyakushal4 is offline
Registered User
 
Join Date: May 2015
Location: India
Posts: 33
Thanks: 10
Thanked 0 Times in 0 Posts
bairagyakushal4 is on a distinguished road
Cool

Quote:
Originally Posted by felice2011 View Post
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
Reply With Quote