Leaderboard

Hi Laurynelis, Also take a look in the Excel wiki (click on water signature "Reveal hidden contents") and also look at the examples. This will help you alot with excel automation. And for your second question, you can start here https://msdn.microsoft.com/en-us/library/office/ee861528.aspx

All ADO related stuff (including example scripts) can be found in the wiki too.

Did you have a look at the Excel UDF that comes with AutoIt? Function _Excel_RangeFind should do what you need.

Hmm... _ADO_GetProvidersList() ???? But this function not list connections but drivers/providers. Active connection you can list with relation to server, but for this you should first connect to this server. mLipok

You would need something like this: #include <Array.au3> Global $sTitle = "ArrayDisplay" ; <== Set the title of your window here Global $iItemCount = ControlListView($sTitle, "", "[Class:SysListView32]", "GetItemCount") Global $aHeadCode[$iItemCount] Global $aDescription[$iItemCount] Global $aDepart[$iItemCount] For $i = 0 To $iItemCount - 1 $aHeadCode[$i] = ControlListView("ArrayDisplay", "", "[Class:SysListView32]", "GetText", $i, 0) $aDescription[$i] = ControlListView("ArrayDisplay", "", "[Class:SysListView32]", "GetText", $i, 1) $aDepart[$i] = ControlListView("ArrayDisplay", "", "[Class:SysListView32]", "GetText", $i, 2) Next _ArrayDisplay($aHeadCode) _ArrayDisplay($aDescription) _ArrayDisplay($aDepart)

;If you change that one : ;Local $sData, $asKeyWords[11] ;U need change the max $i value here : ;For $i = 0 To 10 Keywords() Func Keywords() Local $sData, $asKeyWords[2] ;For $i = 0 To 10 For $i = 0 To Ubound($asKeyWords) - 1; That line fix : "if I reduced it to 10 I received an error array variable exceeded." For $j = 1 To 5 $asKeyWords[$i] &= Chr(Random(65, 90, 1)) Next $sData &= $asKeyWords[$i] & "|" Next MsgBox(0, "", $sData) EndFunc ;==>Keywords

$hWnd = WinGetHandle("Internet Protocol Version 4 (TCP/IPv4) Properties") ControlCommand($hWnd, "", "Button3", "Check", "") ; this will select the radio button "Use the following IP address" Sleep(200) ControlSetText($hWnd, "", "SysIPAddress321", '192.168.168.8') ;this will set the IP address. ControlSetText($hWnd, "", "SysIPAddress322", '255.255.255.0') ;this will set the IP address. ControlSetText($hWnd, "", "SysIPAddress323", '192.168.168.168') ;this will set the IP address. ControlSetText($hWnd, "", "SysIPAddress324", '66.51.205.101') ;this will set the IP address. ControlSetText($hWnd, "", "SysIPAddress325", '66.51.206.101') ;this will set the IP address. ControlClick($hWnd, "", "Button9") Exit

In the source code of the main page I saw this : function tarihSecildi (item) { var url = 'cekilisler/sanstopu/' + item.value + '.json'; <<<<<<<<<<<<<<<<<<<<<<<<<<<< jQuery.getJSON(url, function(json) { jQuery('#sanstopu-hafta').html(json.data.hafta); <<<<<<<<<<<<<<<<<<<<<<<<<<<< "item.value" = date, "cekilisler/sanstopu/+date+.json" = name of the json, "#sanstopu-hafta" = data to get

Good work tarre³ I really need to start to learn the basics of oop.

Docfxit, They suggested you a better way to accomplish what you want. But if you insist, try this: $hWnd = WinGetHandle("Internet Protocol Version 4 (TCP/IPv4) Properties") ControlCommand($hWnd, "", "Button3", "Check", "") ; this will select the radio button "Use the following IP address" Sleep(200) ControlSetText($hWnd, "", "SysIPAddress321", '28.255.28.255') ;this will set the IP address.

Thanks for the tip, Distrophy. The following code copies text to the clipboard using plain old CTRL-A and CTRL-C, then uses StringInStr() to search the contents of the clipboard. Dave CODE#comments-start This script periodically checks a Firefox web page for a certain word or phrase. When the text is found, the word or phrase is highlighted, and the browser window is copied to the clipboard. Press the "`" key to exit the script. On many keyboards, that's the key to the left of the number 1 key in the upper left corner of the keyboard. #comments-end ; Press the "`" key to exit the script. HotKeySet("`", "End") ; Enter text to watch for. $lookfor = InputBox("Enter search text", "Enter search text") ; Exit if cancel button is pushed. If @error = 1 Then Exit $rate = InputBox("Check how often?", "Enter rate in milliseconds at which to check. Entering 2000 will check every two seconds.", "2000") ; Note: This script does not check if $rate is a valid number. ; Exit if cancel button is pushed. If @error = 1 Then Exit ; Select window to watch. ; 262144 + 1 = Message box stays on top so user can click the OK or cancel button. ; after clicking window to watch. $which_window = MsgBox(262145, "Select window to watch", "Click on the window to watch for " & $lookfor & ", then click OK. Press the ` key to exit the script.") ; Exit if cancel button is pushed. If $which_window = 2 Then Exit ; Get the title so we can activate this window later. $lookhere = WinGetTitle("") WinActivate($lookhere) ; Watch for desired text. Do ; Pause for $rate milliseconds. Sleep($rate) ; Optional: Use WinActivate to switch to $lookhere window ; in case another window has become active since the last search. ; WinActivate($lookhere) ; Select All and copy to clipboard Send("^a^c") ; Deselect all. Send("{LEFT}") ; Put text from clipboard into a string. ; Images are ignored. ; This will copy at least the first 1on the page. ; Note: Script tested OK with 15,000 characters. ; There's probably a limit to how many characters you can copy. $text = ClipGet() Until StringInStr($text, $lookfor) > 1 ; Until desired text is found. MsgBox(4096, "'" & $lookfor & "' found.", "'" & $lookfor & "' found.") WinActivate($lookhere) ; In case window has lost focus. ; Go To top of page Send("^{HOME}") ; Highlight desired text by searching for it using Find. Send("^f") Sleep(100) Send($lookfor) ; Close Find dialog Send("{ESC}") ;Copy screen contents to clipboard Send("!{PRINTSCREEN}") MsgBox(4096, "Screen capture status", "Desired text is highlighted. Image of browser window has been copied to the clipboard.") Func End() MsgBox(0, "Script ended", "` key pressed. Script ended") Exit EndFunc ;==>End