2017-09-14 4 views
0

ich den folgenden CodeEröffnung AD von vb.net mit anderen Anmeldeinformationen

Dim p As New ProcessStartInfo With { 
     .FileName = "c:\Windows\System32\dsa.msc", 
     .Arguments = "/SAVECRED /user:DOMAIN\username" 
    } 


    ' Start the process 
    Process.Start(p) 

Ich möchte folgendes cmd in der Lage sein gefunden zu übergeben, die

c:\Windows\System32\runas.exe /SAVECRED /user:DOMAIN\username "c:\Windows\System32\mmc.exe c:\Windows\System32\dsa.msc" 

, die durch Öffnung arbeitet für Benutzeraufforderungen die App, aber nicht den Benutzernamen oder die Eingabeaufforderung für das Passwort, ich kann nicht herausfinden, wie man die verschiedenen Gläubigen zusammen mit Argumenten.

Ideen?

Antwort

0

Ok es heraus - hier der Code i verwendet wird, ist

Function ConvertToSecureString(ByVal str As String) 
    Dim password As New SecureString 
    For Each c As Char In str.ToCharArray 
     password.AppendChar(c) 
    Next 
    Return password 
End Function 

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 

    Dim passwordString As String 
    passwordString = "..........." 
    Dim password As SecureString = ConvertToSecureString(passwordString) 


    ' New ProcessStartInfo created 
    Dim p As New ProcessStartInfo 

    ' Specify the location of the binary 
    p.FileName = "mmc.exe" 
    p.WorkingDirectory = "c:\Windows\System32\" 
    ' Use these arguments for the process 
    p.Arguments = "dsa.msc" 
    p.Domain = "........" 
    p.UserName = "......." 
    p.Password = password 
    p.UseShellExecute = False 
    ' Start the process 
    Process.Start(p) 


End Sub 
Verwandte Themen