Lieber Besucher, herzlich willkommen bei: AutoIt.de - Das deutsche AutoIt-Forum. Falls dies dein erster Besuch auf dieser Seite ist, lies bitte die Hilfe durch. Dort wird dir die Bedienung dieser Seite näher erläutert. Darüber hinaus solltest du dich registrieren, um alle Funktionen dieser Seite nutzen zu können. Benutze das Registrierungsformular, um dich zu registrieren oder informiere dich ausführlich über den Registrierungsvorgang. Falls du dich bereits zu einem früheren Zeitpunkt registriert hast, kannst du dich hier anmelden.
Benutzerinformationen überspringen
Registrierungsdatum: 23. April 2006
Wohnort: 82362 Weilheim i. OB
Spoiler
![]()
AutoIt-Quellcode
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 ;~ StartUp.au3 ; Anmeldeinformationen Const $szUser = "Benutzername" Const $szPasswd = "Anmeldepasswort" Const $szDomain = "Anmeldedomain" ; Zwischen 23:00 Uhr und 02:00 Uhr automatisch anmelden Const $szALStart = "23:00" Const $szALEnd = "02:00" $szCurrentTime = @HOUR & ":" & @MIN $szAutoLogon = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon") If ($szCurrentTime >= $szALStart) Or ($szCurrentTime <= $szALEnd) Then 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", $szUser) RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword", "REG_SZ", $szPasswd) RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName", "REG_SZ", $szDomain) If $szAutoLogon = "0" Or $szAutoLogon = "" Then Shutdown(6) Else RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName") EndIf Else RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName") If $szAutoLogon = "1" Then sleep(30000) Shutdown(4) EndIf EndIf

Spoiler
![]()
AutoIt-Quellcode
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 ;~ StartUp.au3 ; Anmeldeinformationen Const $szUser = "UserX" Const $szPasswd = "UserXpasswort" Const $szDomain = "Domainame" ; Zwischen Startzeit (Uhr) und Stopzeit (Uhr) automatisch anmelden $ini_file = @ScriptDir & "\Autologon.ini" $szALStart = IniRead($ini_file, "SETTINGS", "Start_time", "01:00") $szALEnd = IniRead($ini_file, "SETTINGS", "Stop_time", "04:00") $szCurrentTime = @HOUR & ":" & @MIN $szAutoLogon = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon") If ($szCurrentTime >= $szALStart) And ($szCurrentTime <= $szALEnd) Then 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", $szUser) RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword", "REG_SZ", $szPasswd) RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName", "REG_SZ", $szDomain) If $szAutoLogon = "0" Or $szAutoLogon = "" Then Shutdown(6) EndIf EndIf
Spoiler
![]()
AutoIt-Quellcode
1 2 3 4 5 6 7 8 9 10 11 12 13 #NoTrayIcon If Not IsAdmin() Then RunAsSet("Adminname","Domainname","Adminpasswort") Run(@ScriptFullPath, @ScriptDir, @SW_HIDE) RunAsSet() Exit EndIf RunAsSet() $Defaultusername = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon") if $Defaultusername="UserX" then RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword")
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »milko« (22. Juni 2007, 21:43)
Benutzerinformationen überspringen
Registrierungsdatum: 23. April 2006
Wohnort: 82362 Weilheim i. OB
