Doch ich will es ja gelöst haben, ich arbeite mich gerade bei AutoIt ein und viele Funktionen muss ich erst noch googlen.
Ich will ja nicht ständig fragen. Und dazu kommt ja noch mein Tagesgeschäft.
Wie ist der Befehl damit das Skript ein komplettes Log schreibt damit ich das später auswerten kann ?
Gibt nur das Laufwerk C:
Hier mal das ganze Skript:
#include <MsgBoxConstants.au3>
Local $iTimeout = 5
$name = "administrator"
$password = "password"
$installdir = "C:\Temp_Inst"
$autostart = "C:\Temp"
DirCreate($installdir)
DirCreate($autostart)
FileInstall("join_domain.ps1",$installdir & "\join_domain.ps1",0)
FileInstall("regwrite.exe",$installdir & "\regwrite.exe",0)
FileInstall("regdelete.exe",$installdir & "\regdelete.exe",0)
FileInstall("autostart.exe",$autostart & "\autostart.exe",0)
RunAsWait( $name, @ComputerName, $password, 2, "regwrite.exe", $installdir)
ProcessWaitClose("regwrite.exe")
RunAsWait( $name, @ComputerName, $password, 0, "powershell -command set-executionpolicy -scope LocalMachine -executionPolicy Unrestricted -force", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "powershell.exe -file join_domain.ps1", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "C:\Windows\SysWOW64\SGMCMDIntn.exe -WOLstart", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "powershell -command set-executionpolicy -scope LocalMachine -executionPolicy Unrestricted -force", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "powershell.exe -file join_domain.ps1", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "C:\Windows\SysWOW64\SGMCMDIntn.exe -WOLstart", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "powershell -command set-executionpolicy -scope LocalMachine -executionPolicy Unrestricted -force", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "powershell.exe -file join_domain.ps1", $installdir)
RunAsWait( $name, @ComputerName, $password, 0, "C:\Windows\SysWOW64\SGMCMDIntn.exe -WOLstart", $installdir)
MsgBox(64,"", "Willkommen in der Domäne" & @CRLF & "Der Rechner wird in " & $iTimeout & " Sekunden neu gestartet", $iTimeout)
Shutdown(2)Danke für die Hilfe, aber "2" bringt auch nichts 
Soeben probiert, kein Erfolg.
Wenn ich die "regwrite.exe" einfach nur so ausführe ohne Skript dann kommt auch die Inputbox :-/
naja ich habe das so interpretiert
0 bedeutet für mich das der Benutzer zwar vorhanden ist aber es kann ja sein das noch kein Profil existiert.
1 Benutzer und Profil müssen exisitieren
was ist der genaue Unterschied zwischen 0 und 1 ?
Als GPO wird ein lokaler Admin-User auf allen Notebooks automatisch angelegt.
Ich habe ja noch zwei weitere Anwendungen die als Admin ausgeführt werden müssen und bei denen funktioniert auch die Ausführung als Admin.
Nur bei dieser Anwendung nicht. Das ist es ja was mich so stutzig macht.
Hallo zusammen,
ich weiß momentan nicht weiter. Ich habe ein Skript geschrieben das noch neben ein paar anderen Dingen ein paar Werte in die Registrierung schreiben soll.
Da normale Benutzer dieses Skript ausführen sollen, habe ich es so gelöst das ich zwei Skripte daraus gemacht habe und
das zweite Skript als Administrator ausgeführt wird da sonst die Reg-Einträge nicht geschrieben werden können.
Auf meinem Test-System funktioniert dieser Aufruf auch. Nur auf den restlichen Clients nicht.
Die erste Anwendung startet die zweite Anwendung per folgenden Befehl:
RunAsWait( $name, @ComputerName, $password, 0, "regwrite.exe", $installdir)
zur Absicherung habe ich noch ein
ProcessWaitClose("regwrite.exe")eingebaut.
In der "regwrite.exe" steht folgendes
$uname = InputBox("Benutzereingabe", "Bitte geben Sie ihr Benutzernamen ein")
$upassword1 = InputBox("Passworteingabe", "Bitte geben Sie ihr Kennwort ein", "", "*")
$upassword2 = InputBox("Passworteingabe", "Bitte geben Sie ihr wiederholt das Kennwort ein", "", "*")
Func Passwort()
$upassword1 = InputBox("Passworteingabe", "Bitte geben Sie ihr Kennwort ein", "", "*")
$upassword2 = InputBox("Passworteingabe", "Bitte geben Sie ihr wiederholt das Kennwort ein", "", "*")
EndFunc
If $upassword1 <> $upassword2 Then
MsgBox(0, "Fehler", "Passwörter stimmen nicht überein, bitte wiederholen!")
Passwort()
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "Domain", "REG_SZ", "C:\Temp\autostart.exe")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon", "REG_SZ", "1")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName", "REG_SZ", $uname)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName", "REG_SZ", "domain")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserPassword", "REG_SZ", $upassword2)Auf dem Test-System erscheint die Inputbox aber auf den restlichen Clients nicht.
Hat jemand eine Idee woran das liegen könnte ?
Greetings
Hab den Fehler gefunden. Das Array hat mir die Antwort gegeben. Bei meinem System ist der Admin der 2. User und bei den Test-System ist der der 0. User.
Trotzdem danke für die Hilfe!
Habe ich auch schon probiert. Die Ausgabe per _ArrayDisplay und MsgBox funkioniert nur auf meinem System und nicht auf dem Test-System
Der Administrator-Account ist auf allen Test-Systemen aktiviert und das Kennwort ist vergeben.
dann versteh ich nur nicht warum es auf meinem System funktioniert und auf dem Test-System nicht
Hallo,
wenn ich folgenden Code kompiliere und auf meinem Test-System ausführe bekomme ich diese Fehlermeldung:
Auf meinem System funktioniert es aber 
#include <Array.au3>
Dim $password
$installdir = "C:\Temp_Inst"
DirCreate($installdir)
FileInstall("wpp.cer",$installdir & "\wpp.cer",0)
Local $objDomain = ObjGet("WinNT://" & @ComputerName & "" )
Dim $filter[2] = ["user"]
$objDomain.Filter = $filter
$list = ""
For $aUser In $objDomain
$list = $list & $aUSer.Name & @CRLF
Next
$Users=stringsplit($list,@crlf,1+2)
ReDim $Users[Ubound($Users)-1]
For $i=0 to ubound($Users)-1 step 1
ConsoleWrite($Users[$i]&@crlf)
next
Local $iIndex1 = _ArraySearch($Users, "Administrator", 0, 0)
If $iIndex1 > 0 Then
$name = $Users[$iIndex1]
EndIf
If $name = "Administrator" Then
$password = "password"
EndIf
RunAs( $name, @ComputerName, $password, 0, "certutil.exe -addstore root wpp.cer", $installdir)
RunAs( $name, @ComputerName, $password, 0, "certutil.exe -addstore TrustedPublisher wpp.cer", $installdir)
[Blockierte Grafik: http://fs1.directupload.net/images/150304/kmvnofhk.jpg]
Greetings Doc
selbst gelöst!
Hallo,
ich möchte ein Zertifikat an zwei Stellen importieren:
#include <Process.au3>
$sCommand = ('certutil.exe -addstore root zertifikat1.cer')
_RunDOS( $sCommand)
$sCommand = ('certutil.exe -addstore TrustedPublisher zertifikat1.cer')
_RunDOS( $sCommand)mit #RequireAdmin funktioniert es aber das erfordert die Eingabe des Administrator die ich eigentlich umgehen möchte.
Wie kann ich _RunDOS mit Admin Berechtigung ausführen ?
Greetings Doc
Genau das habe ich gebraucht, danke !
wie die Schleife arbeitet habe ich fast verstanden.
ich will aber das der erste Username in $name1 geschrieben wird der zweite in $name2 usw.
Hallo,
ich bin absoluter Anfänger was AutoIt angeht.
Bisjetzt konnte ich mich auch mit Hilfe des Forums ganz gut durchklicken.
Nur jetzt komme ich nicht weiter. Wahrscheinlich zu viel Input 
Ich habe erfolgreich die User auslesen können mit folgenden Skript:
Local $objDomain = ObjGet("WinNT://" & @ComputerName & "" )
Dim $filter[2] = ["user"]
$objDomain.Filter = $filter
$list = ""
For $aUser In $objDomain
$list = $list & $aUSer.Name & @CRLF
Next
MsgBox(0,"User Accounts",$list)Wie bekomme ich aber die Werte in Variablen ?
Greetings Doc