Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
- Dim ps = Process.GetProcessesByName("MAT.exe")
- Dim f As String = ps(0).MainModule.FileName
- Try
- Dim proc As Process = New Process
- proc.StartInfo.FileName = f
- proc.StartInfo.Arguments = "192.168.1.1"
- proc.StartInfo.UseShellExecute = False
- proc.Start()
- Catch ex As Exception
- MsgBox("Sorry ")
- End Try
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement