MikahS

#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <GUIListBox.au3> #include <ListViewConstants.au3> #include <GuiListView.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <Array.au3> ;Global $hGuiAddServer = 9999 ; Dummystring Local $aServers = IniReadSection (@ScriptDir & "\Servers.ini", "Servers") ; Create Main GUI and TabControl $Form1 = GUICreate("IT Tools", 365, 553, @DesktopWidth - 380,@DesktopHeight - 1195) $PageControl1 = GUICtrlCreateTab(8, 8, 350, 539) ; Servers Tab------------------------------------------------------------------------------------------------------------------------ $Servers = GUICtrlCreateTabItem("Servers") $listview_srv = GUICtrlCreateListView("Server|IP", 20, 49, 222, 482, $LVS_SINGLESEL,$LVS_EX_GRIDLINES+$LVS_SORTDESCENDING) _GuiCtrlListView_SetColumnWidth($listview_srv,0,130) _GuiCtrlListView_SetColumnWidth($listview_srv,1,88) ;_GUICtrlListView_HideColumn($listview_srv, 2) GetServers() $btn_srv_AddServer = GUICtrlCreateButton("Add Server", 252, 51, 92, 25) GUICtrlSetOnEvent(-1, "AddServer") $btn_srv_RemoveServer = GUICtrlCreateButton("Remove Server", 252, 81, 94, 25) GUICtrlSetOnEvent(-1, "RemoveServer") $btn_srv_RefreshList = GUICtrlCreateButton("Refresh List", 252, 113, 94, 25) GUICtrlSetOnEvent(-1, "RefreshServer") $btn_srv_Connect = GUICtrlCreateButton("Connect", 252, 145, 94, 25) GUICtrlSetOnEvent(-1, "ConnectToServer") $btn_srv_Ping = GUICtrlCreateButton("Ping", 252, 178, 94, 25) GUICtrlSetOnEvent(-1, "PingServer") ; Main GUI Control------------------------------------------------------------------------------------------------------------------- GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateTabItem("") GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $btn_srv_AddServer addServer() Case $btn_srv_RefreshList RefreshServer() Case $btn_srv_RemoveServer RemoveServer() Case $btn_srv_Connect ConnectToServer() Case $btn_srv_Ping PingServer() EndSwitch WEnd ; Add Server ------------------------------------------------------------------------------------------------------------------ Func addServer () $hGuiAddServer = GUICreate ("Add Server", 100, 100, 100, 100) $NewServer = InputBox ("Add Server","Please type hostename","","","","",@DesktopWidth - 1100,@DesktopHeight - 800,"",$hGuiAddServer) TCPStartup() $ipAddress = TCPNameToIP ($NewServer) TCPShutdown() if Not $NewServer="" Then IniWrite (@ScriptDir & "\Servers.ini", "Servers", $NewServer, $ipAddress) EndIf While 2 $sMsg = GUIGetMsg($NewServer) Switch $sMsg Case $GUI_EVENT_CLOSE GUICtrlDelete($hGuiAddServer) EndSwitch ExitLoop WEnd _GUICtrlListView_DeleteAllItems($listview_srv) $sItem_srv = GUICtrlRead(GUICtrlRead($listview_srv)) GetServers() EndFunc ; Remove Server -------------------------------------------------------------------------------------------------------------------- Func RemoveServer() Local $hot_Item = _GUICtrlListView_GetSelectionMark($listview_srv) Local $sItem_srv = _GUICtrlListView_GetItemText($listview_srv, $hot_Item) Local $iniRead = IniReadSection (@ScriptDir & "\Servers.ini", "Servers") ;MsgBox (0, "",""&$sItem_srv&"") if not @error Then For $i = 1 To $iniRead[0][0] MsgBox (0,"List Hosts","Hostname: " & $iniRead[$i][0] & @CRLF & "IP: " & $iniRead[$i][1]) Next EndIf IniDelete (@ScriptDir & "\Servers.ini","Servers",$sItem_srv) _GUICtrlListView_DeleteAllItems($listview_srv) $sItem_srv = GUICtrlRead(GUICtrlRead($listview_srv)) GetServers() EndFunc ; Connect to Server --------------------------------------------------------------------------------------------------------------- Func ConnectToServer() $sItem_srv = GUICtrlRead(GUICtrlRead($listview_srv)) if $sItem_srv = "" Then MsgBox(0, "Connect to Server or Host","Please choose a host") Else $Host = StringSplit($sItem_srv,"|",1) MsgBox(0,"",$Host) ShellExecute("mstsc.exe","/admin /v "&$sItem_srv) EndIf EndFunc ; Refresh Serverlist ------------------------------------------------------------------------------------------------------------- Func RefreshServer() _GUICtrlListView_DeleteAllItems($listview_srv) $sItem_srv = GUICtrlRead(GUICtrlRead($listview_srv)) GetServers() EndFunc ; Get Servers from ini file -------------------------------------------------------------------------------------------------- Func GetServers() Local $aServers = IniReadSection (@ScriptDir & "\Servers.ini", "Servers") If Not @error Then For $i = 1 To $aServers[0][0] GUICtrlCreateListViewItem($aServers[$i][0] & '|' & $aServers[$i][1], $listview_srv) ;GUICtrlSetOnEvent(-1, '_ListViewHandler') Next EndIf EndFunc ; Ping Server -------------------------------------------------------------------------------------------------- Func PingServer() $sItem_srv = GUICtrlRead(GUICtrlRead($listview_srv)) $sItem_srv = StringTrimRight($sItem_srv, 3) Local $iPing = Ping ($sItem_srv) ShellExecute("C:\Windows\System32\cmd.exe",$iPing) EndFunc You must delete them by the key name, which you were trying to delete by the Key & Value name.
All good?
EDIT: Fixed grammar.

To update the picture after the dialog box is displayed just use GUICtrlSetImage(). Have a look at the helpfile for
GUICtrlCreatePic there are many useful tips in the Remarks section.

Use the AutoIt tabs and not the UDF like so:
#include <GUITab.au3> #include <WindowsConstants.au3> #include <GUIConstantsEx.au3> #include <Array.au3> #include <GUIListView.au3> ;Begin Main Gui Global $Home = GUICreate("Welcome", 635, 477, 192, 114, $WS_MAXIMIZEBOX) ;Menus $MenuFile = GUICtrlCreateMenu("File") $Start = GUICtrlCreateMenuItem("Start", $MenuFile) GUICtrlCreateMenuItem("", $MenuFile) ; Create a separator line $ExitMenu = GUICtrlCreateMenuItem("Exit", $MenuFile) GUISetState(@SW_SHOW) WinSetState($Home, '', @SW_MAXIMIZE) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE, $ExitMenu Exit Case $Start Example() EndSwitch WEnd Func Example() $MainForm = GUICreate("DAS Search Utility", 925, 327, 192, 114, -1, $WS_EX_MDICHILD, $Home) $TypeLabel = GUICtrlCreateLabel("Search Type", 8, 8, 65, 17) $SearchInput = GUICtrlCreateCombo("", 16, 26, 257, 25) GUICtrlSetData(-1, "Person Name|ID search|Entity Name") $InputValLabel = GUICtrlCreateLabel("Input Value", 8, 56, 58, 17) $InputVal = GUICtrlCreateInput("", 16, 80, 257, 21) $StartSearch = GUICtrlCreateButton("Search", 8, 284, 75, 25) $aLabel = GUICtrlCreateLabel("Date", 8, 112, 84, 17) $aInput = GUICtrlCreateDate("", 19, 132, 259, 21, (0x00)) $aReportBox = GUICtrlCreateCheckbox("Generate report", 11, 168, 169, 17) GUICtrlSetState(-1, $GUI_HIDE) $MarkDead = GUICtrlCreateCheckbox("Mark Dead", 11, 192, 169, 17) GUICtrlSetState(-1, $GUI_HIDE) $UserOutput = GUICtrlCreateButton("Output", 188, 284, 75, 25) GUICtrlSetState($UserOutput, $GUI_HIDE) $bEnterDummy = GUICtrlCreateDummy() Local $bAccelKeys[1][2] = [["{ENTER}", $bEnterDummy]] GUISetAccelerators($bAccelKeys) GUICtrlCreateTabItem("") GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE, $ExitMenu GUIDelete($MainForm) ExitLoop Case $StartSearch, $bEnterDummy If GUICtrlRead($InputVal) = "" Then MsgBox(0, "ERROR", "You must input a parameter") Else SplashTextOn("Processing...", "Processing" & @CRLF & @CRLF & "Please wait", 200, 150, Default, Default, 1, Default, 25) $type = GUICtrlRead($SearchInput) $Parameter = GUICtrlRead($InputVal) GUICtrlSetData($InputVal, "") Local $IDs[2][2] = [["1", "A"], ["2", "B"]] SplashOff() If UBound($IDs) > 0 Then SplashTextOn("Processing...", "Processing" & @CRLF & @CRLF & "Please wait", 200, 150, Default, Default, 1, Default, 25) Local $ResultList[UBound($IDs)] Local $Tab[UBound($IDs)] $AcctResults = GUICreate("", 620, 344, 294, 0, $WS_CHILD, -1, $MainForm) $Tabs = GUICtrlCreateTab(0, 10, 609, 300) ;Loop for each Result For $p = 0 To UBound($IDs) - 1 Local $Fullresult[3][7] = [[Random(1, 10), "Tester", "123456", GUICtrlRead($aInput), '', '', ''], ["Hello", "There", "My", "Fine", "Friend", "", ""], ["GoodBye", "There", "My", "Hated", "Enemy", "", ""]] $Tab[$p] = GUICtrlCreateTabItem($Fullresult[0][0]) $ResultList[$p] = GUICtrlCreateListView("", 7, 128, 594, 174) _GUICtrlListView_AddColumn($ResultList[$p], 'Col0') _GUICtrlListView_AddColumn($ResultList[$p], 'Col1') _GUICtrlListView_AddColumn($ResultList[$p], 'Col2') _GUICtrlListView_AddColumn($ResultList[$p], 'Col3') _GUICtrlListView_AddColumn($ResultList[$p], 'Col4') _GUICtrlListView_AddColumn($ResultList[$p], 'Col5') _GUICtrlListView_AddColumn($ResultList[$p], 'Col6') Local $aWriter = $Fullresult _ArrayDelete($aWriter, 0) _GUICtrlListView_AddArray($ResultList[$p], $aWriter) Next Hide(1, $aLabel, $aInput, $UserOutput, $aReportBox, $MarkDead) SplashOff() GUISetState(@SW_SHOW) While 2 ExitLoop WEnd EndIf EndIf Case $UserOutput If _GUICtrlTab_GetItemState($Tabs, 0) = 1 Then; First tab MsgBox(0, "", _GUICtrlTab_GetItemText($Tabs, 0)) $test = _GUICtrlListView_CreateArray($Tab[0]) _ArrayDisplay($test) EndIf EndSwitch WEnd EndFunc ;==>Example Func Hide($toggle, $aLabel, $aInput, $UserOutput, $aReportBox, $MarkDead) GUICtrlSetState($aLabel, $toggle = 1 ? $GUI_SHOW : $GUI_HIDE) GUICtrlSetState($aInput, $toggle = 1 ? $GUI_SHOW : $GUI_HIDE) GUICtrlSetState($UserOutput, $toggle = 1 ? $GUI_SHOW : $GUI_HIDE) GUICtrlSetState($aReportBox, $toggle = 1 ? $GUI_SHOW : $GUI_HIDE) GUICtrlSetState($MarkDead, $toggle = 1 ? $GUI_SHOW : $GUI_HIDE) EndFunc ;==>Hide ; #FUNCTION# ==================================================================================================================== ; Name ..........: _GUICtrlListView_CreateArray ; Description ...: Creates a 2-dimensional array from a listview. ; Syntax ........: _GUICtrlListView_CreateArray($hListView[, $sDelimeter = '|']) ; Parameters ....: $hListView - Control ID/Handle to the control ; $sDelimeter - [optional] One or more characters to use as delimiters (case sensitive). Default is '|'. ; Return values .: Success - The array returned is two-dimensional and is made up of the following: ; $aArray[0][0] = Number of rows ; $aArray[0][1] = Number of columns ; $aArray[0][2] = Delimited string of the column name(s) e.g. Column 1|Column 2|Column 3|Column nth ; $aArray[1][0] = 1st row, 1st column ; $aArray[1][1] = 1st row, 2nd column ; $aArray[1][2] = 1st row, 3rd column ; $aArray[n][0] = nth row, 1st column ; $aArray[n][1] = nth row, 2nd column ; $aArray[n][2] = nth row, 3rd column ; Author ........: guinness ; Remarks .......: GUICtrlListView.au3 should be included. ; Example .......: Yes ; =============================================================================================================================== Func _GUICtrlListView_CreateArray($hListView, $sDelimeter = '|') Local $iColumnCount = _GUICtrlListView_GetColumnCount($hListView), $iDim = 0, $iItemCount = _GUICtrlListView_GetItemCount($hListView) If $iColumnCount < 3 Then $iDim = 3 - $iColumnCount EndIf If $sDelimeter = Default Then $sDelimeter = '|' EndIf Local $aColumns = 0, $aReturn[$iItemCount + 1][$iColumnCount + $iDim] = [[$iItemCount, $iColumnCount, '']] For $i = 0 To $iColumnCount - 1 $aColumns = _GUICtrlListView_GetColumn($hListView, $i) $aReturn[0][2] &= $aColumns[5] & $sDelimeter Next $aReturn[0][2] = StringTrimRight($aReturn[0][2], StringLen($sDelimeter)) For $i = 0 To $iItemCount - 1 For $j = 0 To $iColumnCount - 1 $aReturn[$i + 1][$j] = _GUICtrlListView_GetItemText($hListView, $i, $j) Next Next Return SetError(Number($aReturn[0][0] = 0), 0, $aReturn) EndFunc ;==>_GUICtrlListView_CreateArray Not sure why it doesn't work with the Tabs UDF functions. 

Have you tried anything yet?
This can be done with the Excel UDF functions and File functions such as FileOpen, FileClose, _FileWriteFromArray or FileWrite.

GUICtrlCreateDate Look at example 4.

Local $title = "Problem Ejecting USB Mass Storage Device" While 1 If WinExists("[TITLE:" & $title & "]") Then    WinClose("[TITLE:" & $title & "]") EndIf WEnd something like this?

Why not try out:
#include <File.au3>   _FileReadToArray("C:\file.csv", $oneDarray, 1, ",") ?

By default, when you go to Tools -> Go (F5) it will run your script and show the console at the bottom like so:

Something like this:
Local $hotKey = 0 While 1     If WinActive("MyWindow") Then         $hotKey = HotKeySet("{ESC}", "DoNothing")     Else If $hotKey = 0 Then ContinueLoop Else         $hotKey = HotKeySet("{ESC}") EndIf     EndIf WEnd   Func DoNothing() ;0/0 EndFunc Does that help?

Try this:
local $GUI = GuiCreate("",100,40) local $testDate = GUICtrlCreateDate("",15,10,70,20,9,-1) local $test = GUIctrlSetData($testDate,"2015/01/14 09:00:00 AM") ConsoleWrite($test & @CR) GUIsetState(@SW_SHOW) While 1    switch GUIgetMsg()       Case -3         Exit    EndSwitch WEnd
EDIT: It just wasn't in the proper date format of YYYY/MM/DD HH:mm:ss.

$oExcel.Quit() or
$oExcel.Application.Quit

Np, it's my pleasure.
Try this:
Local $SQL_verify = True ;<<<<<<<<<<<<<<<<<<<<< Flag If $slq8 = "" And $sql12 = "" Then     GUICtrlSetState($radio3, $GUI_DISABLE)     GUICtrlSetState($radio4, $GUI_DISABLE) $SQL_verify = False ;<<<<<<<<<<<<<<<<<<<<<<<< If empty strings make the verify flag false EndIf While 1     $msg = GUIGetMsg()     Switch $msg         Case $GUI_EVENT_CLOSE             Exit         Case $goButton             Select                 Case GUICtrlRead($radio1) = $GUI_CHECKED                     MsgBox(0, "", "Just radio 1 is checked")                     Exit                 Case $slq8 = "" And $sql12 = "" And GUICtrlRead($radio2) = $GUI_CHECKED And GUICtrlRead($radio5) = $GUI_CHECKED                     MsgBox(0, "", "$slq8 = "" And $sql12 = "" And $radio2 And $radio6")                     Exit                 Case $slq8 = "" And $sql12 = "" And GUICtrlRead($radio2) = $GUI_CHECKED And GUICtrlRead($radio6) = $GUI_CHECKED                     MsgBox(0, "", "$slq8 = "" And $sql12 = "" And $radio2 And $radio6")                     Exit                 Case $slq8 = "10.3.5500.0" And $sql12 = "11.0.2100.60" And GUICtrlRead($radio2) = $GUI_CHECKED And GUICtrlRead($radio4) = $GUI_CHECKED And GUICtrlRead($radio5) = $GUI_CHECKED                     MsgBox(0, "", "$slq8 = 10.3.5500.0 And $sql12 = 11.0.2100.60 And $radio2 And $radio4 And $radio5")                     Exit                 Case $slq8 = "10.3.5500.0" And $sql12 = "11.0.2100.60" And GUICtrlRead($radio2) = $GUI_CHECKED And GUICtrlRead($radio3) = $GUI_CHECKED And GUICtrlRead($radio6) = $GUI_CHECKED                     MsgBox(0, "", "$slq8 = 10.3.5500.0 And $sql12 = 11.0.2100.60 And $radio2 And $radio3 And $radio6")                     Exit                 Case $slq8 = "10.3.5500.0" And $sql12 = "11.0.2100.60" And GUICtrlRead($radio2) = $GUI_CHECKED And GUICtrlRead($radio4) = $GUI_CHECKED And GUICtrlRead($radio6) = $GUI_CHECKED                     MsgBox(0, "", "$slq8 = 10.3.5500.0 And $sql12 = 11.0.2100.60 And $radio2 And $radio4 And $radio6")                     Exit             EndSelect             Case $radio1 If $SQL_verify = True Then ;<<<<<<<<<<<<<<<<<<<<<<<< check the flag              GUICtrlSetState($radio3, $GUI_DISABLE)              GUICtrlSetState($radio4, $GUI_DISABLE) EndIf             GUICtrlSetState($radio5, $GUI_DISABLE)             GUICtrlSetState($radio6, $GUI_DISABLE)             GUICtrlSetState($radio3, $GUI_UNCHECKED)             GUICtrlSetState($radio4, $GUI_UNCHECKED)             GUICtrlSetState($radio6, $GUI_CHECKED)             GUICtrlSetState($radio6, $GUI_UNCHECKED)         Case $radio2 If $SQL_verify = True Then ;<<<<<<<<<<<<<<<<<<<<<<<< check the flag              GUICtrlSetState($radio3, $GUI_ENABLE)              GUICtrlSetState($radio4, $GUI_ENABLE) EndIf             GUICtrlSetState($radio5, $GUI_ENABLE)             GUICtrlSetState($radio6, $GUI_ENABLE)             GUICtrlSetState($radio6, $GUI_CHECKED)     EndSwitch WEnd That should make it so whenever you click the go button it should delete the GUI and stop the script.
If you wanted the script to keep going, use GUIDelete($GUI) instead of Exit. Also, above the while loop is the check for the SQL is not found, and then disable if that is the case.

Welcome to the AutoIt forum SwissWrist!
First off, having two different loops to catch events in a GUI is mute as you'll never be able to catch events on the radio if your in the GUI loop and vise versa.
Secondly, when the radio buttons are clicked, they will give off the same event as any other event on a GUI. Here is your loop put together (and I checked the first radio and disabled 4 and 5 to show you).
GUICtrlSetState($radio_1, $GUI_CHECKED) GUICtrlSetState($radio_4, $GUI_DISABLE) GUICtrlSetState($radio_5, $GUI_DISABLE) Local $msg While 1     $msg = GUIGetMsg()     Switch $msg         Case $GUI_EVENT_CLOSE, $idClose             Exit         Case $radio_1             GUICtrlSetState($radio_4, $GUI_DISABLE)             GUICtrlSetState($radio_5, $GUI_DISABLE)         Case $radio_2             GUICtrlSetState($radio_4, $GUI_ENABLE)             GUICtrlSetState($radio_5, $GUI_ENABLE)         Case $radio_3             GUICtrlSetState($radio_4, $GUI_ENABLE)             GUICtrlSetState($radio_5, $GUI_ENABLE)     EndSwitch WEnd

Did you use
TCPStartup() above TCPNameToIP?
EDIT: Glad you figured it out

Have a look at Melba23's UDF >GUIListViewEx
Taken from the description:
Permits insertion, deletion, moving, dragging, sorting and editing of items within activated ListViews It is a great library, and I use it almost anytime I use ListViews

something like this?
#Include <GDIPlus.au3> _GDIPlus_Startup() $hImage = _GDIPlus_ImageLoadFromFile(@SystemDir & "\DirectX\Dinput\act_rs.png") $sCLSID = _GDIPlus_EncodersGetCLSID("BMP") _GDIPlus_ImageSaveToFileEx($hImage, @ScriptDir & "\act_rs.bmp", $sCLSID) _GDIPlus_ShutDown() taken from: >link

Adlib example:
#include <Misc.au3> Local $hDLL = DllOpen("user32.dll")   AdlibRegister('Pressed')   OnAutoItExitRegister('Quit')   While 1     ; run indefinitely WEnd   Func Pressed()     If _IsPressed("04", $hDLL) Then Send("^!C") EndFunc   Func Quit()     DllClose($hDLL) EndFunc

Try just
$filehandle = FileOpen("C:\mmt.log", 1) ; write mode should create the file if it doesn't exist.

does this work for you?
Local $computerName, $fDel $computerName = GUICtrlRead($Input1) ; must declare the variable and set it if your going to use it first $fDel = FileDelete ("\\is1127000\c$\Windows\System32\spool\PRINTERS\") If $fDel = 0 Then     MsgBox(0, "", "first File delete didn't work because it didn't exist or didn't delete the file") EndIf $fDel = FileDelete ("\\" & $computerName & "\c$\Windows\System32\spool\PRINTERS\") If $fDel = 0 Then     MsgBox(0, "", "second File delete didn't work because it didn't exist or didn't delete the file") EndIf $fDel = FileDelete ("\\" & $computerName & "\c$\Windows\System32\spool\PRINTERS\") If $fDel = 0 Then     MsgBox(0, "", "third File delete didn't work because it didn't exist or didn't delete the file") EndIf $fDel = FileDelete ( "\\" & $computerName & "\c$\Windows\System32\spool\PRINTERS\" ) If $fDel = 0 Then     MsgBox(0, "", "fourth File delete didn't work because it didn't exist or didn't delete the file") EndIf EDIT: Also, welcome to the AutoIt forum woody619

I don't like _IsPressed. I just used this in my app, and I did not like it as it will not work once a key has already been pressed. Very crude, but using Accelerators is they way to go:
Local $aAccelKeys[1][1] = [["{TAB}", $exTab]] GUISetAccelerators($aAccelKeys, $hwnd) ; example While 1 $msg = GUIGetMsg() Switch $msg Case $exTab ; run whatever you want here EndSwitch WEnd

>This should help

Anytime

Why not just use:

@DesktopDir instead of "%userprofile%Desktop" ?

Use a MsgBox anywhere you are not sure of something. I'm sorry, but I barely understood your statements

Heres a link to a UDF for getting html from the clipboard link
Also, You can use this function to see what the types of formats your clipboard has:
_Clipboard_EnumFormats