#include <AutoItConstants.au3>
#include <Crypt.au3>

Global Const $inifile = "ExcelStarterConfig.ini"
Global Const $key = "Passwort" ; hier ein sicheres Passwort zur Verschlüsselung hinterlegen, NICHT bei diesem belassen!!!

Func _Encrypt($string)
	If $string <> "" Then
		Return _Crypt_EncryptData($string, "Pass", $CALG_RC4)
	Else
		Return ""
	EndIf
EndFunc

Func _Decrypt($string)
	If $string <> "" Then
		Return BinaryToString(_Crypt_DecryptData($string, "Pass", $CALG_RC4))
	Else
		Return ""
	EndIf
EndFunc

$process = "" ; Prozessnamen festlegen ( voller Pfad )

$username = _Decrypt(IniRead($inifile, "admin", "user", ""))
If $username = "" Then
	MsgBox(16, "Fehler", "Leerer Benutzername")
	Exit
EndIf

$password = _Decrypt(IniRead($inifile, "admin", "pass", ""))
If $password = "" Then
	MsgBox(16, "Fehler", "Leeres Passwort")
	Exit
EndIf

RunAs($username, @ComputerName, $password, 0, $process)