AutoItSetOption("TrayIconDebug", 1)		; oder Opt("TrayIconDebug", 1) ;0=no info, 1=debug line info
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#AutoIt3Wrapper_Add_Constants=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; Teil 1: Ziel-Ort-Abfrage
#include <Constants.au3>														; Inkludiere die Constants.au3
#include <MsgBoxConstants.au3>													; Inkludiere die MsgBoxConstants.au3 für die MSGBox
$zielpfaddef = "zielpfad"
$zielpfad = ""
Local $zielpfad = InputBox("Speicherort für Daten auswählen", "Bitte Pfad zum USB-Medium angeben", $zielpfaddef, "", _	;InputBox Abfrage nach dem aktuellen Swiss smile Standort
				- 1, -1, 0, 0)
MsgBox(64, "Zielort-Abfrage", $zielpfad & " wurde als Speicherort für die Daten gewählt!")
Sleep(500)
;Teil 2: Username-Abfrage
$usernamedef = "username"
Local $username = InputBox("Benutzerabfrage Swiss smile", "Bitte den verwendeten Benutzernamen (AD/Azure) eingeben", $usernamedef, "", _	;InputBox Abfrage nach dem aktuellen Swiss smile Nutzer/Benutzer
				- 1, -1, 0, 0)
MsgBox(64, "Benutzerabfrage", $username & " wurde als Benutzer gewählt!")
Sleep(500)
;Teil 3: Hostname-Abfrage
#include <Inet.au3>
$pcname=@ComputerName
MsgBox(64,"Hostname", "Dein Computername ist "&$pcname)
;Teil 4.1-Desktop-Teil
#include <FileConstants.au3>
#include <WinAPIFiles.au3>
#include <WinAPIShellEx.au3>
MsgBox(64, "Grossen Kopiervorgang starten?", "Für JA, drücke ENTER")
$cmd = "cmd"
$bcksl = "\"
$abst = " "
$hochk = '"'
$dt = "Desktop"
$quelle1 = "C:\users\"&$username&"\Desktop\"
$zielpfadcnew = "\"&$pcname&"\"
$zielpfadx = $zielpfad&$zielpfadcnew
$xcopycmd = "xcopy "
$xcopycmdatt = " /c /e /v /f /g /k /y"
$xcopycmdatt2 = "/c /i /y"
$xcopyallfiles = "*.* "
$zieluodt = $zielpfadx&$dt
_WinAPI_ShellCreateDirectory ( $zielpfadx )										; Hostname-Ordner anlegen
_WinAPI_ShellCreateDirectory ( $zielpfadx&$dt )									; Desktop Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(200)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Sleep(200)
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle1, 0)																; sendet den Inhalt der Variable $quelle1
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$dt&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $dt + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.2-Downloads-Teil
$dl = "Downloads"
$quelle2 = "C:\users\"&$username&"\Downloads\"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$dl )									; Downloads Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle2, 0)																; sendet den Inhalt der Variable $quelle2
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$dl&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $dl + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.3-Bilder-Teil
$bl = "Bilder"
$quelle3 = "C:\users\"&$username&"\Pictures\"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$bl )									; Pictures Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle3, 0)																; sendet den Inhalt der Variable $quelle3
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$bl&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $bl + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.4-Dokumente-Teil
$dkm = "Documents"
$quelle4 = "C:\users\"&$username&"\Documents\"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$dkm )								; Documents Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle4, 0)																; sendet den Inhalt der Variable $quelle4
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$dkm&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $dkm + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.5-ZaWin-Teil
$zw = "ZaWin"
$quelle5 = "C:\ProgramData\MartinEngineering\ZaWin\Lokal\Daten\"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$zw )									; ZaWin Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle5, 0)																; sendet den Inhalt der Variable $quelle5
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$zw&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $zw + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.6-Firefox LZ
$firfx = "Firefox"
$quelle6 = "C:\Users\"&$username&"\AppData\Roaming\Mozilla\Firefox\Profiles\"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$firfx )								; Firefox Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle6, 0)																; sendet den Inhalt der Variable $quelle6
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$firfx&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $firfx + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.7-Edge LZ
$edg = "MicrosoftEdge"
$quelle7 = "C:\Users\"&$username&"\AppData\Local\Packages\Microsoft.MicrosoftEdge_8wekyb3d8bbwe\AC\MicrosoftEdge\User\Default\Favorites\"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$edg )								; Edge Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle7, 0)																; sendet den Inhalt der Variable $quelle7
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$edg&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $edg + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.8-IE LZ
$mie = "MicrosoftIE"
$quelle8 = "C:\Users\"&$username&"\Favorites\"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$mie )								; IE Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($quelle8, 0)																; sendet den Inhalt der Variable $quelle8
Sleep(200)
Send($xcopyallfiles, 0)															; sendet den Inhalt der Variable $xcopyallfiles
Sleep(200)
Send($zielpfadx&$mie&$bcksl&$abst, 0)											; sendet den Inhalt der Variable $zielpfadx + $mie + $bcksl
Sleep(200)
Send($xcopycmdatt, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 4.9-Chrome LZ
$chm = "Google Chrome"
$quelle9 = "C:\Users\"&$username&"\AppData\Local\Google\Chrome\User Data\Default\Bookmarks"
_WinAPI_ShellCreateDirectory ( $zielpfadx&$chm )								; Chrome Ordner anlegen
Sleep(200)
Send("#r", 0)																	; Öffnet Windows+R (Kombination) == AUSFÜHREN
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send($cmd, 0)																	; Sendet den Inhalt der Varable $cmd
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// CMD öffnet (C:\WINDOWS\system32\cmd.exe)
Sleep(200)
WinWait('C:\WINDOWS\system32\cmd.exe')											; Warte bis dieses Fenster erscheint "cmd" dann geht es weiter
Sleep(300)
WinActivate('C:\WINDOWS\system32\cmd.exe')										; Zwinge dieses Fenster "cmd" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($hochk&$quelle9&$hochk&$abst, 0)											; sendet den Inhalt der Variable $quelle9
Sleep(200)
Send($hochk&$zielpfadx&$chm&$bcksl&$hochk&$abst, 0)								; sendet den Inhalt der Variable $zielpfadx + $chm + $bcksl
Sleep(200)
Send($xcopycmdatt2, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(1000)
;Teil 5-Printout-der-installierten-Programme (Liste aller installierten Programme)
$pshell = "powershell"
$installed = $pcname&"-Programme.txt "
$pshellstring = "Get-ItemProperty HKLM:\Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\* | Select-Object DisplayName, DisplayVersion, Publisher, InstallDate | Format-Table –AutoSize "
$pfeilre = ">> "
$pshellstringsavel ="C:\Users\"&$username&"\Desktop\"&$installed
$pshellstringsave = ">> "&$zielpfadx&$pcname&$bcksl&$installed
Sleep(200)
Send("#r", 0)
WinWait('Ausführen')															; Warte bis dieses Fenster erscheint "Ausführen" dann geht es weiter
WinActivate('Ausführen')														; Zwinge dieses Fenster "Ausführen" in den Vordergrund
Send("^a", 0)																	; Sendet "ALT+A" (Alles markieren)
Send("{DEL}", 0)																; Sendet "DEL" (Löscht das vorher markierte aus dem Feld)
Send ($pshell, 0)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// Windows PowerShell wird geöffnet
Sleep(200)
WinWait('Windows PowerShell')													; Warte bis dieses Fenster erscheint "Windows PowerShell" dann geht es weiter
Sleep(300)
WinActivate('Windows PowerShell')												; Zwinge dieses Fenster "Windows PowerShell" in den Vordergrund
Send($pshellstring, 0)
Sleep(200)
Send($pfeilre&$pshellstringsavel, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER /// Windows PowerShell wird geöffnet
Sleep(1000)
WinWait('Windows PowerShell')													; Warte bis dieses Fenster erscheint "Windows PowerShell" dann geht es weiter
Sleep(200)
WinActivate('Windows PowerShell')												; Zwinge dieses Fenster "Windows PowerShell" in den Vordergrund
Send($xcopycmd, 0)																; sendet den Inhalt der Variable $xcopycmd
Sleep(200)
Send($pshellstringsavel&$abst, 0)
Sleep(200)
Send($zielpfad&$pcname&$bcksl&$installed, 0)										; sendet den Inhalt der Variable $zielpfadx + $chm + $bcksl
Sleep(200)
Send($xcopycmdatt2, 0)
Sleep(200)
Send("{ENTER}", 0)																; Klicke auf "Weiter" durch senden von ENTER
Sleep(100)
Send("d", 0)
Sleep(1000)
MsgBox(64,"KOPIERVORGANG BEENDET", "SCRIPT BEENDEN DURCH DRÜCKEN AUF ENTER")