@Schnuffel danke für deine Hilfe, es war nicht genau das was ich wollte mit der Combobox, aber ich habe eine für mich praktikabele Lösung gefunden.
Spoiler anzeigen
Opt('GUIOnEventMode', 1)
Func readFile()
GUICtrlSetOnEvent(-1, "_LV1_ItemSelected")
_GUICtrlListView_Scroll($idListview, 0, 500)
$linecount = _FileCountLines(@ScriptDir & "\data.cfg" )
$file = FileOpen(@ScriptDir & "\data.cfg", 0 )
For $i = $linecount to 1 Step -1
$strFileLine = FileReadLine( $file, $i )
$strsplitted=StringSplit($strFileLine, ",")
Local $idItem1 = GUICtrlCreateListViewItem($strsplitted[1] & "|" & $strsplitted[2] & "|" & $strsplitted[3] , $idListview)
Next
FileClose( $file )
EndFunc
Func _LV1_GetSelected()
$toSplit=GUICtrlRead(GUICtrlRead($idListview), 1)
$strsplitted=StringSplit($toSplit, "|")
Run("C:\Program Files (x86)\SCCM_Remote\CmRcViewer.exe")
WinWaitActive("Configuration Manager Remote Control")
WinMenuSelectItem("Configuration Manager Remote Control","","&File","&Connect")
send($strsplitted[1])
send("{ENTER}")
EndFunc
Func _Connect()
If GUICtrlRead($remote_name)=="DEBI-" Then
MsgBox(48, "Achtung!", "Please insert a correct machine name!")
Else
Run("C:\Program Files (x86)\SCCM_Remote\CmRcViewer.exe")
WinWaitActive("Configuration Manager Remote Control")
WinMenuSelectItem("Configuration Manager Remote Control","","&File","&Connect")
send(GUICtrlRead($remote_name))
send("{ENTER}")
$date=_DateTimeFormat(_NowCalc(), 2)
$time=_NowTime()
FileWrite(@ScriptDir & "\data.cfg", GUICtrlRead($remote_name) & "," & $time & "," &$date & @CRLF)
_GUICtrlListView_DeleteAllItems(GUICtrlGetHandle($idListview))
readFile()
EndIf
EndFunc
Func _Exit()
Exit
EndFunc
Func _Delete()
FileDelete(@ScriptDir & "\data.cfg")
_GUICtrlListView_DeleteAllItems(GUICtrlGetHandle($idListview))
readFile()
EndFunc
remote()
Func remote()
Local $hGUI = GUICreate("SCCMHistroy 1.0", 260, 375, 242, 505)
Global $idListview = GUICtrlCreateListView("Host | Time | Date ", 10,60, 240, 200)
_GUICtrlListView_SetColumnWidth($idListview, 0, 111)
$filemenu = GUICtrlCreateMenu("File")
$delete = GUICtrlCreateMenuItem("Delete History", $filemenu)
GUICtrlSetOnEvent(-1, "_Delete")
readFile()
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$remote_start=GUICtrlCreateButton("Connect", 10, 308, 240, 40)
GUICtrlSetImage(-1, "shell32.dll", 14)
GUICtrlSetOnEvent(-1, "_Connect")
GUICtrlCreateButton("Connect From List",10,10, 195, 40)
GUICtrlSetOnEvent(-1, "_LV1_GetSelected")
GUICtrlSetImage(-1, "shell32.dll", 152)
GUICtrlCreateButton("close", 211, 10, 40, 40, $BS_ICON)
GUICtrlSetImage(-1, "shell32.dll", 28)
GUICtrlSetOnEvent(-1, "_Exit")
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
Local $sFont = "Arial"
GUISetFont(16, 400, "", $sFont)
Global $remote_name = GUICtrlCreateInput("DEBI-", 10, 270, 240, 35)
GUISetState(@SW_SHOW, $hGUI)
While 1
Switch GUIGetMsg()
)
Case $remote_start
If @error Then
ContinueLoop
EndIf
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
GUIDelete($hGUI)
EndFunc ;==>Example