Hallo,
ich bin dabei, ein Autostart-Script zu schreiben, zur Verwendung in der Firma. Ich möchte .jsp und .ica - Files starten, was mit Run nicht geht.
Kann ich irgendwie die Kommadozeile (windows_Start/Ausführen) versteckt öffnen, den Pfad eingeben und mit OK ausführen lassen?
Hier ist mein Code:
#include <GUIConstants.au3>
;Konfiguration
$Autostart_Folder = "U:\settings\autostart"
$Button1 = "Cube"
$Button2 = "Laptop"
$Button3 = "Metaframe"
$Button4 = "Meeting1"
$Button5 = "Meeting2"
$Button6 = "Neu"
;Code
Opt("GUIOnEventMode", 1) ; OnEvent Modus einschalten
$GUI_Autostart = GUICreate("Autostart", 430, 130)
GUISetOnEvent($GUI_EVENT_CLOSE, "Function_CLOSEClicked")
GUICtrlCreateLabel("Welches Profil soll gestartet werden?", 127, 30)
$Button_1 = GUICtrlCreateButton($Button1, 30, 70, 60)
$Button_1_Dir = $Autostart_Folder & "\" & $Button1
GUICtrlSetOnEvent($Button_1, "Function_Button_1")
$Button_2 = GUICtrlCreateButton($Button2, 90, 70, 60)
$Button_2_Dir = $Autostart_Folder & "\" & $Button2
GUICtrlSetOnEvent($Button_2, "Function_Button_2")
$Button_3 = GUICtrlCreateButton($Button3, 150, 70, 60)
$Button_3_Dir = $Autostart_Folder & "\" & $Button3
GUICtrlSetOnEvent($Button_3, "Function_Button_3")
$Button_4 = GUICtrlCreateButton($Button4, 210, 70, 60)
$Button_4_Dir = $Autostart_Folder & "\" & $Button4
GUICtrlSetOnEvent($Button_4, "Function_Button_4")
$Button_5 = GUICtrlCreateButton($Button5, 270, 70, 60)
$Button_5_Dir = $Autostart_Folder & "\" & $Button5
GUICtrlSetOnEvent($Button_5, "Function_Button_5")
$Button_6 = GUICtrlCreateButton($Button6, 330, 70, 60)
$Button_6_Dir = $Autostart_Folder & "\" & $Button6
GUICtrlSetOnEvent($Button_6, "Function_Button_6")
GUISetState(@SW_SHOW)
WinSetOnTop("$GUI_Autostart", "", 1)
While 1
Sleep(1000) ; dauerhafte GUI-Anzeige bis ein Button gedrückt wird
WEnd
Func Function_CLOSEClicked()
MsgBox(0, "Close", "Der Windows-Start wird dem Serverprofil fortgesetzt..")
Exit
EndFunc
Func Function_Button_1()
$search_autostartDat = FileFindFirstFile($Button_1_Dir & "\" & "*.*")
If $search_autostartDat = -1 Then
Exit
EndIf
While 1
$file = FileFindNextFile($search_autostartDat)
If @error Then ExitLoop
;MsgBox(4096, "Datei:", $search_autostartDat)
;MsgBox(4096, "Datei:", $file)
$shortcut = FileGetShortcut($Button_1_Dir & "\" & $file)
;MsgBox(4096, "Path:", $shortcut[0])
RunWait ($shortcut[0])
WEnd
FileClose($search_autostartDat)
Exit
EndFunc