muncherw

When I use _ExcelFindInRange it returns null. I must not be using this function correctly. What am I doing wrong? CODE#include <ExcelCOM_UDF.au3> ; Include the collection $sFilePath = @WorkingDir & "\Cardcount.xls" $oExcel = _ExcelBookOpen($sFilePath, 1, False, "", "") ;Open the Excel document $sFindWhat = "Epic" ;This is what I'm searching for $sRangeOrRowStart = "A1" ;This is the field I want the search to start at. $whatever = _ExcelFindInRange($oExcel, $sFindWhat, $sRangeOrRowStart, 1, 1, 1, 0, 2, False, "") MsgBox(4096, "Test", $whatever, "") _ExcelBookClose($oExcel, 1, 0)

http://www.autoitscript.com/forum/index.php?showtopic=70024 Scroll down to post 6. http://www.autoitscript.com/forum/index.php?showtopic=52575 This was the one I was thinking of.

I know I've seen this out there somewhere. I downloaded it and tried it. It created an INI file that had the locations of the desktop icons on it. I'll search around and see if I can find it again.

Thanks but that's not quite what I'm looking for. I don't want to download it and then use the image from it's location, but instead just show directly in the window. I realize that viewing an image downloads it to the cache anyway. I'm just not wanting to end up with a folder full of images. Does that make sense?

I feel like I should have been able to find this but I can't seem to. I want to put an image into my GUI but I want to pull it from a webpage. Thanks.

I'm giving it a try. Thanks.

I don't think your link works. What I was looking at was locodarwin's UDF. Have you used it?

Kerros, Thanks for the suggestion. I've used INIRead and INIWrite before so I know how usefule that can be, however I'm not sure if I'll only have those two fields in the future. Actually, now that I think about it there will be more because I'll have different classifications too. I was just throwing up a simplified idea of what I wanted to do. Someone, I see your point. I think I might mess around with that and see how it goes. I know what I will eventually want is bigger than what I'm asking for here but I need a starting place so I guess this is as good as any. My current inventory has about 10,000 items in it right now so I just want to get some simple testing done, ya know? Thanks to both of you for the quick responses and ideas!

I have an excel file that has basically two categories- "Item" and "Quantity". I'd like to make a script that will get the quantity from that excel document and that I can change in my script (using GuiCtrlCreateInput ) and save back to the document. I found an excel udf but that seems more for manipulating open excel worksheets. I'd like to not ever mess with excel, but rather use a gui interface I create. How can I do this? Or should I use some other way to keep track of this inventory? Maybe I could do it in Access but then the same question arrises. I've played around with my gui to get it to kind of look the way I want but not of the real meat of the programming is done so I'm open to any kind of suggestions you might have. Thanks -Muncher

Here is my attempt: #Include <Misc.au3> $dll = DllOpen("user32.dll") While 1 $pos = MouseGetPos() If _IsPressed("68", $dll) Then MouseMove ($pos[0], $pos[1]-1) ElseIf _IsPressed("62", $dll) Then MouseMove ($pos[0], $pos[1]+1) ElseIf _IsPressed("66", $dll) Then MouseMove ($pos[0]+1, $pos[1]) ElseIf _IsPressed("64", $dll) Then MouseMove ($pos[0]-1, $pos[1]) EndIf Wend

I want to change the names of some windows. I can do this easily enough with WinSetTitle. I'd like to be able to right click a button on the taskbar and choose a custom item (probably Rename) and have it launch my script. Basically I need to added the Rename option as a contxt menu item on those buttons but I can't figure out how. I know how to add context menu items in general I just can't find where those registry keys are for buttons in the taskbar. So, yes, I know this isn't really an autoit question but I hoped since I was using for a script I have that I wouldn't get scolded too badly and I'm guessing someone in here must have done somethign like this before. I find a lot of people hiding the taskbar but nothing specifically about the buttons themselves. Also google hasn't yielded the proper results and I can't seem to think of any new and different was to word what i'm searching for. Thanks in advance. -Muncher

Oooooh. I thought you misunderstood what I was saying. I didn't realize that the seperator at the beggining made any difference. I made that change and a small change to the code and that worked perfectly. Thanks very much. Sorry I dismissed that at first, I just didn't get what you were telling me or why. I really appreciate this, GEOSoft.

I am using that when I initially create the gui. I guess I'm confused at to what you're suggesting. Can you elaborate?

Thanks for the quick reply GeoSoft. This part actually functions perfectly for me. My problem is more getting this information to overwrite a combo box that already exists.

At work we have a lot of servers with a few key folders I map to a lot. I thought making a program to map directly where I wanted would be easier than constantly mapping them manually. Currently I have an input box that asks me which letter I want to map to but i'd like to make that a little nicer. I know how to do this (currently not programmed) with a combo box I have ut I don't know how to refresh the combo box. I am scanning to see what drives are mapped and I create a combo box that lists them. I want people to be able to choose them and unmap or re-map to those letters. I can do that fine, however once I connect a new drive or disconnect an existing drive I'd like the combo box to be updated. I can get the new information no problem. It's all about refreshing the combo box with that info that befuddles me. I didn't find anything in the forums. I thought maybe I could use _GUICtrlComboBoxEx_ResetContent or something like that but that doesn't do what I want (or I don't know how to make it work properly. Any help would be appreciated. Thank you, Muncher This is how I get my drives: $list = "" For $i = Asc("I") to Asc("Z") $drive = Chr($i) & ":" $list = $list & $drive & " " & DriveMapGet($drive) & "|" $DriveName = $drive & DriveMapGet($drive) ;MsgBox(4096,"Drive is mpped to", $DriveName) Next This is my combo box: $combo = GuiCtrlCreateCombo("Select a Drive",30, 75, 220, 200) $DriveLettersList = StringLeft($list,StringInStr($list,":"));the first drive letter GuiCtrlSetData($combo, $list) Below is the full code if you want to see what I'm talking about in it's environment. #include <GUIConstants.au3> #include <Array.au3> Opt("WinTitleMatchMode", 2) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase $myProg = "Busey Server Mapper" ;Looks to see it the program is already open so If WinExists($myProg) Then WinActivate("Busey Server Mapper") Exit ; It's already running endif AutoItWinSetTitle($myProg) $list = "" For $i = Asc("I") to Asc("Z") $drive = Chr($i) & ":" $list = $list & $drive & " " & DriveMapGet($drive) & "|" $DriveName = $drive & DriveMapGet($drive) ;MsgBox(4096,"Drive is mpped to", $DriveName) Next ;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%5 ;*******************Begining of GUI*********************** $dlgTabbed = GUICreate("Busey Server Mapper", 400, 149, 193, 120) $PageControl1 = GUICtrlCreateTab(15, 8, 255, 55) ;GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT) $radioVol1 = GUICtrlCreateRadio("Vol1_share", 300, 15, 113, 17) $radioApps = GUICtrlCreateRadio("apps_share", 300, 35, 113, 17) $radioGroup = GUICtrlCreateRadio("group_share", 300, 55, 113, 17) $radioUsers = GUICtrlCreateRadio("users_share", 300, 75, 113, 17) GUICtrlSetState(-1,$GUI_CHECKED) ;Default users_share to being checked $mapDrive = GUICtrlCreateButton("Map Drive", 20, 118, 75, 25) $unmapDrive = GUICtrlCreateButton("UnMap Drive", 110, 118, 75, 25) $Ping = GUICtrlCreateButton("Ping Server", 200, 118, 75, 25) $EXIT = GUICtrlCreateButton("Close", 290, 118, 75, 25) ;Champaign Tab $ChampTab = GUICtrlCreateTabItem("Champaign") GUICtrlSetState(-1,$GUI_SHOW) ;Sets this tab as the default one to show $ChampDropdown = GUICtrlCreateCombo("NONE", 30, 33, 220, 25) GUICtrlSetData(-1, "Champaign- 303 Kirby|Champaign- 909 Kirby|Champaign- Campus|Champaign- Executive Center|Champaign- Fox Drive|Champaign- Fox Drive- Ops|Champaign- Fox Drive- 2302|Champaign- Marketview|Champaign- SPC|Champaign- SPR|Champaign- University|Champaign- Windsor|Gibson City|Indianapolis|LeRoy- Cedar|Mahomet- Main|Paxton|Rantoul- Grove|Rantoul- Sangamon|St Joseph|Savoy- Arbors|Thomasboro|Tolono- Holden|Urbana- Main Bank|Urbana- Pines|Urbana- Sunnycrest") GUICtrlSetFont(-1, 8, 400, 0, "Arial") ;Macon Tab $MaconTab = GUICtrlCreateTabItem("Macon") $Macondropdown = GUICtrlCreateCombo("NONE", 30, 33, 220, 25) GUICtrlSetData(-1, "Decatur- Ash|Decatur- First Plaza|Decatur- Main|Decatur- MLK|Decatur- North (Water)|Decatur- Park|Fairbury|Mt Zion- Plaza|Mt Zion- Main|Shelbyville- Main|Shelbyville- West (County Market)") GUICtrlSetFont(-1, 8, 400, 0, "Arial") ;Mclean Tab $McleanTab = GUICtrlCreateTabItem("McLean") $McleanDropdown = GUICtrlCreateCombo("NONE", 30, 33, 220, 25) GUICtrlSetData(-1, "Bloomington- Eastland|Bloomington- East Washington|Bloomington- Fairway|Bloomington- Hamilton|Bloomington- Parkway|Bloomington- Veterans|Normal- Fort Jesse|Normal- College") GUICtrlSetFont(-1, 8, 400, 0, "Arial") ;Peoria Tab $PeoriaTab = GUICtrlCreateTabItem("Peoria") $PeoriaDropdown = GUICtrlCreateCombo("NONE", 30, 33, 220, 25) GUICtrlSetData(-1, "East Peoria|Pekin|Peoria- Adams|Peoria- Kumpf|Peoria- Sheridan|Peoria- Grand Prairie") GUICtrlSetFont(-1, 8, 400, 0, "Arial") ;Florida Tab $FloridaTab = GUICtrlCreateTabItem("Florida") $FloridaDropdown = GUICtrlCreateCombo("NONE", 30, 33, 220, 25) GUICtrlSetData(-1, "Cape Coral- Del Prado|Cape Coral- Parkway|Cape Coral- Santa Barbara|Englewood|Ft Myers- Cypress Terrace|Ft Myers- San Carlos|Ft Myers- Summerlin|North Port|Port Charlotte- Murdock|Port Charlotte- Ops|Punta Gorda") GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateTabItem("") GUISetState(@SW_SHOW) $combo = GuiCtrlCreateCombo("Select a Drive",30, 75, 220, 200) $DriveLettersList = StringLeft($list,StringInStr($list,":"));the first drive letter GuiCtrlSetData($combo, $list) ;****************************End of GUI ******************************** While 1 $id = _getBOX() Select ; Champaign Location Case GUICtrlRead($id) = "Champaign- 303 Kirby" $server = "svrchamp303" ; Cases removed because they aren't relevant to the question and it ; is a long list EndSelect Switch GUIGetMsg() ;************************** The Map Drive button was clicked ******************* Case $mapDrive $driveLetter = InputBox("Get Drive", "Enter Drive letter you want to map to:", "") ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& ;If they click cancel some error checking needs to happen ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& $driveLetter = $driveLetter & ":" If WinExists($driveLetter) Then WinClose($driveLetter) WinWaitClose($driveLetter) Endif $id = _getBOX() ;MsgBox(1, "ComboBox controlID: " & $id, GUICtrlRead($id) & " was selected.") If IsChecked($radioVol1) Then $folder = "vol1_share" ElseIf IsChecked($radioApps) Then $folder = "apps_share" ElseIf IsChecked($radioGroup) Then $folder = "group_share" ElseIf IsChecked($radioUsers) Then $folder = "users_share" EndIf ; Check to see if the drive they are mapping to is already mapped. ; If it is then delete the mapping ; Possibly change this to ask if they want to map to a different drive While 1 Sleep(500) DriveMapGet($driveLetter) If @Error = 1 then ;MsgBox(4096, "Test", "No drive mapped. Exiting loop.", 10) ExitLoop else ;MsgBox(0, "Drive P: is mapped to", DriveMapGet($driveLetter) & ". We need to unmap it.") DriveMapDel($driveLetter) Sleep(500) endIf Wend If GUICtrlRead($id) = "NONE" Then MsgBox(0, "No Server Selected", "Please choose a server and try to map again. ") ElseIf GUICtrlRead($id) = "Shelbyville- West (County Market)" Then MsgBox(0, "Shelbyville, really?", "Yeah, I don't think so. You'll be waiting for a week just to get connected. /n Pick a different server because I refuse to map to this one.") Else DriveMapAdd($driveLetter, "\\" & $server & "\" & $folder) _waitDriveMap() Run('c:\windows\explorer.exe ' & $driveLetter & '\') EndIf Case $unmapDrive Select Case $result = "I" Case $result = "J" Case $result = "K" Case $result = "L" Case $result = "M" Case $result = "N" Case $result = "O" Case $result = "P" Case $result = "Q" Case $result = "R" Case $result = "S" Case $result = "T" Case $result = "U" Case $result = "V" Case $result = "W" Case $result = "X" Case $result = "Y" Case $result = "Z" EndSelect ;********************** The Ping button was clicked ****************** Case $Ping $id = _getBOX() If GUICtrlRead($id) = "NONE" Then MsgBox(0, "No Server Selected", "Please choose a server and try your ping again. ") Else RunWait(@COMSPEC & " /k ping " & $server & " /t" , @WorkingDir) EndIf ;*********** The Close button was clicked *************************** Case $GUI_EVENT_CLOSE, $EXIT ExitLoop EndSwitch Wend ; Checks to see which dropdown is selected Func _getBOX() Switch GUICtrlRead($PageControl1) Case 0 ;Champaign $box = $ChampDropdown Case 1 ;Macon $box = $Macondropdown Case 2 ;Mclean $box = $McleanDropdown Case 3 ;Peoria $box = $PeoriaDropdown Case 4 ;Florida $box = $FloridaDropdown EndSwitch Return $box EndFunc ; Checks to see if the radio button is checked Func IsChecked($control) Return BitAnd(GUICtrlRead($control),$GUI_CHECKED) = $GUI_CHECKED EndFunc ;Checks to see if the drive has been mapped Func _waitDriveMap() While 1 DriveMapGet($driveLetter) If @Error = 1 then MsgBox(0, "Drive isn't mapped. Let's try again.") Sleep(500) else ;MsgBox(0, "Success!!", DriveMapGet($driveLetter) & ".") ExitLoop endIf Wend EndFunc Func _GetFreeDriveLetters() Dim $aArray[1] For $x = 69 To 90 ;E through Z If DriveStatus(Chr($x) & ':\') = 'INVALID' Then ReDim $aArray[uBound($aArray) + 1] $aArray[uBound($aArray) - 1] = Chr($x) & ':' EndIf Next $aArray[0] = UBound($aArray) - 1 Return($aArray) EndFunc

Thanks, Martin! It didn't occur to me to create a hotkey to put in the middle. I was thinking that I might be doing so mething wrong. I'm not a programmer at all, I just dabble here and there when I need something so my brain isn't very good at outside-the-box thinking when it comes to coding. I really appreciate your addition to this. Now to try and figure out exactly what it is you did. I didn't expect you to actually do it for me so that's a nice little treat. Thanks!

This is a simple search that points to a file out on one of my servers and let's me search through users on my network. It works fine but one irritation I have is that when I type a name (or any search criteria) into the search field hitting 'Enter' doesn't trigger the search, instead I have to click the button to search. (Actually the very first search I do when it's opened will allow me to hit the 'Enter' key but that's the only time it works). I'd be greatful for any help. I'm using the latest of both production and beta versions of AutoIt. CODE;------------------------------------------------------------------------------ ; NAME: INFOLOG.AU3 ; Author: TSHII ; DESCRIPTION: Searches a given logfile for a substring. It does so by ; checking each individual line and returning all lines that have the ; substring. ;------------------------------------------------------------------------------ ;---------------------------------------------------------------------- ; INCLUDES ;---------------------------------------------------------------------- #include <GUIConstants.au3> Opt("TrayAutoPause",0) ;0=no pause, 1=Pause TraySetIcon("Shell32.dll", 23) ;Magnifying Glass ;---------------------------------------------------------------------- ; VARIABLES ;---------------------------------------------------------------------- $SEARCHSTRING = "" $LOGFILEPATH = "\\mserver\users_share\super\log\" ;$LOGFILEPATH = "y:\super\log\" $LOGFILENAME = "Login.txt" $LOGFILESTR = $LOGFILEPATH & $LOGFILENAME $ss = "" $lf = "" $FILE = "" ;---------------------------------------------------------------------- ; CREATE GUI LOG WINDOW ;---------------------------------------------------------------------- Opt("GUIOnEventMode", 1) ; Change to OnEvent mode $mainwindow = GUICreate("Lookup User", 650, 430) GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked") $labelSearchStr = GuiCtrlCreateLabel("Search String:", 10, 20, 80, 20) $getSearchStr = ("", 90, 20, 200, 20) GUICtrlSetData($getSearchStr, $SEARCHSTRING) $SearchButton = GUICtrlCreateButton("Search", 310, 17, 60) GUICtrlSetOnEvent($SearchButton, "SearchButton") GUICtrlSetState($SearchButton, $GUI_DEFBUTTON) $labelLogFile = GuiCtrlCreateLabel("Log File:", 10, 55, 80, 20) $getLogFile = GuiCtrlCreateInput("", 90, 55, 200, 20) GUICtrlSetData($getLogFile, $LOGFILESTR) $LogFileButton = GUICtrlCreateButton("Log File", 310, 52, 60) GUICtrlSetOnEvent($LogFileButton, "LogFileButton") $EditBox = GUICtrlCreateEdit( "", 10, 90, 630 , 300 , $WS_VSCROLL) GUICtrlSetFont($EditBox, 9, 400, 0, "Courier New") $labelStatus = GuiCtrlCreateLabel("No Searches Performed", 10, 400, 200, 20) ;GUICtrlSetData($labelStatus, $LOGFILEPATH & $LOGFILENAME, "x") GUISetState(@SW_SHOW) While 1 Sleep(1000) ; Idle around WEnd Func SearchButton() ; Note: at this point @GUI_CTRLID would equal $okbutton GUICtrlSetData($EditBox, "") $ss = GUICtrlRead($getSearchStr) $lf = GUICtrlRead($getLogFile) ;MsgBox(0, "GUI Event", "You pressed Search! " & $ss & " " & $lf ) $FILE = FileOpen($lf, 0) ; Check if file opened for reading OK If $FILE = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf $lc = 0 ; Read in lines of text until the EOF is reached While 1 $line = FileReadLine($FILE) If @error = -1 Then ExitLoop ;MsgBox(0, "Line read:", $FILE) If ($ss == "*") Then $pos = 1 Else $pos = StringInStr($line, $ss) EndIf If ($pos > 0) Then GUICtrlSetData($EditBox, $lc & " ", "x") GUICtrlSetData($EditBox, $line & @CRLF, "x") $lc += 1 EndIf $pos = 0 Wend FileClose($FILE) GUICtrlSetData($labelStatus, $lc & " occurances of " & $ss & " found." ) EndFunc Func LogFileButton() ;MsgBox(0, "GUI Event", "You pressed Log File! Nothing to see here yet.") $ss = FileOpenDialog("Locate Log File", $LOGFILEPATH, "All (*.*)", 1+2) $LOGFILEPATH = StringLeft($ss, StringInStr($ss, "\", 0, -1)) $LOGFILENAME = StringRight($ss, StringLen($ss) - StringInStr($ss, "\", 0, -1)) $LOGFILESTRING = $ss ;MsgBox(0, "Log File", $ss & @CRLF & $LOGFILEPATH & @CRLF & $LOGFILENAME) GUICtrlSetData($getLogFile, $ss) EndFunc Func CLOSEClicked() ;Note: at this point @GUI_CTRLID would equal $GUI_EVENT_CLOSE, ;@GUI_WINHANDLE will be either $mainwindow or $dummywindow If @GUI_WINHANDLE = $mainwindow Then ;MsgBox(0, "GUI Event", "You clicked CLOSE in the main window! Exiting...") Exit EndIf EndFunc

When I right click on an .au3 file I do not get the Compile Script option. I'm using Vista Ultimate 64-bit and have installed the 64 bit version of Auto-It so I think maybe it has something to do with that. I can compile my scripts by right clicking on my XP VMWare session. Is this a Vista issue or 64-bit version of Auto-It or something else? Am I just doing something stupid (and if so what I can I do fix it)?