VB.Net - Prozess als anderer Benutzer

                Dim µScriptPath As String = ......   '<----- Pfad zum Script  
                Dim µDataFilePathAs String = ......   '<----- Pfad zu Daten  
                Dim µCred As NetworkCredential = gDatabase.GetReportCred()     '<----- Liefert die Anmeldedaten  

                Dim µP As New Process
                With µP
                  With .StartInfo
                    If µCred IsNot Nothing Then
                      .Domain = µCred.Domain
                      .UserName = µCred.UserName
                      .Password = µCred.SecurePassword

                      .WindowStyle = ProcessWindowStyle.Hidden
                      .CreateNoWindow = True
                      .UseShellExecute = False

                    Else
                      .WindowStyle = ProcessWindowStyle.Hidden
                      .CreateNoWindow = True
                      .UseShellExecute = False

                    End If

                    .WorkingDirectory = New FileInfo(µScriptPath).DirectoryName

                    Select Case µScriptPath.Split(".").Last.ToLower  
                      Case "cmd", "bat"  
                        .FileName = "cmd.exe"  
                        .Arguments = String.Format("""{0}"" ""{1}""", µScriptPath, µDataFilePath)  
                      Case "vbs"  
                        .FileName = "cscript.exe"  
                        .Arguments = String.Format("""{0}"" ""{1}""", µScriptPath, µDataFilePath)  
                      Case "ps1"  
                        .FileName = "powershell.exe"  
                        .Arguments = String.Format("-executionpolicy bypass -file ""{0}"" ""{1}""", µScriptPath, µDataFilePath)  
                      Case "exe"  
                        .FileName = µScriptPath
                        .Arguments = String.Format("""{0}""", µDataFilePath)  
                    End Select

                  End With

                  .Start()
                  .WaitForExit()
                End With