Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Const DEBUG_ROOT = _
- "Z:Kiosk_JCKioskSignIn.rootKioskSignInKioskSignInKioskSignInbinDebug"
- Dim oKiosk As New System.Diagnostics.Process
- oKiosk.StartInfo.UserName = oEnc.Decrypt(Username)
- oKiosk.StartInfo.Password = oEnc.DecryptSecure(Password)
- oKiosk.StartInfo.Domain = oEnc.Decrypt(Domain)
- ''// The AddBS function appends a '' to the passed string if it is not present
- oKiosk.StartInfo.WorkingDirectory = AddBS(DEBUG_ROOT)
- oKiosk.StartInfo.FileName = "KioskSignIn.exe"
- oKiosk.StartInfo.UseShellExecute = False
- Dim proc As Process = Nothing
- proc = System.Diagnostics.Process.Start(oKiosk.StartInfo)
Add Comment
Please, Sign In to add comment