Spoiler anzeigen
#cs ----------------------------------------------------------------------------
AutoIt Version...: 3.3.8.1
Author...........: ich
Version..........: 0.2
Datum............: 2012-09-19
Script Function..: Remotedesktop starten...
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]#include <ComboConstants.au3>
#include <GuiConstantsEx.au3>
#include <GUIConstants.au3>
; ##############################################################################
; SCRIPT START
; ##############################################################################
Global $hFile = FileOpen("Z:\irgendwo\rdp\log\rdp.log", 1)
Global $sStartDatei
GUICreate(".rdp", 250, 200)
[/autoit] [autoit][/autoit] [autoit]GUICtrlCreateLabel("Benutzername:", 20, 10)
Global $cInput_1 = GUICtrlCreateInput("", 20, 25, 200, 20)
GUICtrlCreateLabel("Server:", 20, 60)
Global $cProgram = GUICtrlCreateCombo("", 20, 75, 200, 20, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "Test1|Test2|Test3")
GUICtrlCreateLabel("Grund:", 20, 110)
Global $cInput_3 = GUICtrlCreateInput("", 20, 125, 200, 20)
Global $cSave = GUICtrlCreateButton("Starten", 20, 160, 80, 25)
[/autoit] [autoit][/autoit] [autoit]Global $cExit = GUICtrlCreateButton("Beenden", 140, 160, 80, 25)
[/autoit] [autoit][/autoit] [autoit]GUISetState()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]While 1
If GUICtrlRead($cInput_1) <> "" And GUICtrlRead($cProgram) <> "" And GUICtrlRead($cInput_3) <> "" Then
If BitAND(GUICtrlGetState($cSave), $GUI_DISABLE) Then GUICtrlSetState($cSave, $GUI_ENABLE)
Else
If BitAND(GUICtrlGetState($cSave), $GUI_ENABLE) Then GUICtrlSetState($cSave, $GUI_DISABLE)
EndIf
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
FileClose($hFile)
Exit
Case $cSave
$sTime = @YEAR & "-" & @MON & "-" & @MDAY & "/" & @HOUR & ":" & @MIN & ":" & @SEC
FileWriteLine($hFile, $sTime & ":" & @TAB & GUICtrlRead($cInput_1) & @TAB & GUICtrlRead($cProgram) & @TAB & GUICtrlRead($cInput_3))
Run ($sStartDatei)
Case $cProgram
Switch GUICtrlRead($cProgram)
Case "Test1"
$sStartDatei = "mstsc.exe Z:\irgendwo\rdp\test1.rdp"
Case "Test2"
$sStartDatei = "mstsc.exe Z:\irgendwo\rdp\test2.rdp"
Case "Test3"
$sStartDatei = "mstsc.exe Z:\irgendwo\rdp\test3.rdp"
EndSwitch
Case $cExit
FileClose($hFile)
Exit
EndSwitch
WEnd
da ich das script ja als exe compiliere und es abunan neue rdp's hinzukommen, wie kann ich den ordner auslesen wo die rdp's sind, sodass er die selbständig zur Combobox hinzufügt
sodass ich dann wie hier
Spoiler anzeigen
#include <GUIConstantsEx.au3>
$Form1 = GUICreate("RDP Session", 222, 116, 212, 116)
$Combo1 = GUICtrlCreateCombo("", 24, 24, 145, 25)
$Button1 = GUICtrlCreateButton("Start", 24, 72, 75, 25, 0)
$Button2 = GUICtrlCreateButton("Cancel", 120, 72, 75, 25, 0)
GUICtrlSetData ($Combo1, "Server1|Server2|Server3", "Server1")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Run ("%SystemRoot%\system32\mstsc.exe /v:" & GUICtrlRead ($Combo1))
Exit
Case $Button2
Exit
EndSwitch
WEnd
mir die "run" einträge einzeln sparen kann