Sign in to follow this  
Followers 0
uber125

For/ If/ Next HELP please

10 posts in this topic

#1 ·  Posted (edited)

This is just a little bit of code from a file search GUI I'm trying to make. How can I get this update button to work so if another drive is added (like a floppy or USB flash drive) it will see it with out restarting the program. I have tried to make a button to get the function to at least work, so then I can just set it on a auto update with the sleep function to refresh by it self. Obviously I'm too dumb to figure it out... Can anyone help me out please??? ;)

#include <GuiConstants.au3>
#include <GuiCombo.au3>
#include <GuiListView.au3>

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GIU<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
GuiCreate("File Search", 420, 540)
GuiSetIcon(@SystemDir & "\magnify.exe", 0)




; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Opt ('MustDeclareVars', 1)
Dim $DriveSearch, $msg, $UPDATE
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<






$DriveSearch = GUICtrlCreateButton ("UPDATE", 300, 500, 100, 20)
$UPDATE = $DriveSearch 

 For $UPDATE = 1 to 5
       If $DriveSearch  = 2 Then ContinueLoop  
$DriveSearch = GUICtrlCreateCombo ("*:\", 235, 50, 36, 600)
 
If FileExists("A:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"A:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf


If FileExists("B:\") Then

$DriveSearch = GUICtrlSetData(-1,"B:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("C:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"C:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
Endif

If FileExists("D:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"D:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf
NEXT
GUISetState ()
$msg = 0

While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    Select
    Case $msg = $UPDATE 

        Exitloop
    EndSelect
Wend
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GIU END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Edited by uber125

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

See if this will help:

#include <GuiConstants.au3>

_Main()

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GIU<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Func _Main()
 GUICreate("File Search", 420, 540)
 GUISetIcon(@SystemDir & "\magnify.exe", 0)

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 opt('MustDeclareVars', 1)
 Local $DriveSearch, $msg, $UPDATE
 Local $num_drives
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

 $UPDATE = GUICtrlCreateButton("UPDATE", 300, 500, 100, 20)

 $DriveSearch = GUICtrlCreateCombo("", 235, 50, 100, 600)
 _UpdateDrives($num_drives,$DriveSearch)
 GUISetState()

 While $msg <> $GUI_EVENT_CLOSE
  $msg = GUIGetMsg()
  Select
   Case $msg = $UPDATE
    _UpdateDrives($num_drives,$DriveSearch)
  EndSelect
 WEnd
EndFunc
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GIU END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

Func _UpdateDrives(ByRef $num_drives,$DriveSearch)
 Local $drives
 Local $var = DriveGetDrive( "all" )
 If NOT @error Then
  If $num_drives <> $var[0] Then 
   $num_drives = $var[0]
   For $i = 1 to $var[0]
    $drives = $drives & $var[$i] & "|"
   Next
   $drives = "|" & StringTrimRight($drives,1)
   GUICtrlSetData($DriveSearch,$drives)
  EndIf
 EndIf
EndFunc
Edited by gafrost

SciTE for AutoItDirections for Submitting Standard UDFs

 

Don't argue with an idiot; people watching may not be able to tell the difference.

 

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

works nicely with by it self but when i put it with the rest of the code my buttons, scrolling text don't work until i his the X in the top right to close the window. then the text will scroll and i get a error saying

$msg = 0

^ERROR

Error: Variable used with out being declared.

but i did declare it

Local $UPDATE, $Exit, $msg, $current, $SearchField

I guess it's my fault for not posting the entire code. Anyways here it is with gafrost code in it.

Did i just miss something?

Here is the curent code that has the error.

#include <GuiConstants.au3>
#include <GuiCombo.au3>
#include <GuiListView.au3>

_Main()
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GIU<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Func _Main()
GuiCreate("File Search", 420, 540)
GuiSetIcon(@SystemDir & "\magnify.exe", 0)
GUICtrlSetResizing (-1,$GUI_DOCKLEFT+$GUI_DOCKTOP)

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$SearchField = GuiCtrlCreateInput("", 10, 50, 150, 20)

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Opt ('MustDeclareVars', 1)
Local $mylist, $DriveSearch, $Search, $num_drives 
Local $UPDATE, $Exit, $msg, $current, $SearchField
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT COLOR<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
GUICtrlSetColor(-1,0x0000FF);Blue
GUISetState ()
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT COLOR END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>OUTPUT<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

$mylist = GUICtrlCreateListView("File                       |Path                                       ", 10, 100, 400, 350, BitOR($LVS_SINGLESEL, $LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER), BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_REGIONAL, $LVS_EX_TRACKSELECT))
GUICtrlCreateListViewItem("line1|data1", $mylist)
GUICtrlCreateListViewItem("line2|data2", $mylist)
GUICtrlCreateListViewItem("line3|data3", $mylist)
GUICtrlCreateListViewItem("line4|data4", $mylist)
GUICtrlCreateListViewItem("line5|data5", $mylist)

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>OUTPUT END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>BUTTONS<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$Exit = GUICtrlCreateButton ("Exit", 100, 500, 100, 20)
$Search = GUICtrlCreateButton ("Search", 200, 500, 100, 20)
$UPDATE = GUICtrlCreateButton ("UPDATE", 300, 500, 100, 20)
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>BUTTONS END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>DRIVE SELLECTION<<<<<<<<<<<<<<<<<<<<<<<<<<<<
  
$UPDATE = GUICtrlCreateButton("UPDATE", 300, 500, 100, 20)

$DriveSearch = GUICtrlCreateCombo("", 235, 50, 36, 600)
_UpdateDrives($num_drives,$DriveSearch)
GUISetState()

While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $UPDATE
_UpdateDrives($num_drives,$DriveSearch)
EndSelect
WEnd
EndFunc

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>DRIVE SELLECTION END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

Func _UpdateDrives(ByRef $num_drives,$DriveSearch)
Local $drives
Local $var = DriveGetDrive( "all" )
If NOT @error Then
If $num_drives <> $var[0] Then 
$num_drives = $var[0]
For $i = 1 to $var[0]
$drives = $drives & $var[$i] & "|"
Next
$drives = "|" & StringTrimRight($drives,1)
GUICtrlSetData($DriveSearch,$drives)
EndIf
EndIf
EndFunc

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>SCROOLLING TEXT <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
; Wait for the Internet Explorer become active - it is titled "File Search" on English systems
WinWaitActive("File Search")

     Send("F")
Sleep(50) 
     Send("i")
Sleep(50)
     Send("l")
Sleep(50)
     Send("e")
Sleep(50)
    Send("{SPACE}")
Sleep(50)
    Send("S")
Sleep(50)
    Send("e")
Sleep(50)
    Send("a")
Sleep(50)
    Send("r")
Sleep(50)
    Send("c")
Sleep(50)
    Send("h")
Sleep(50)
    Send("{SPACE}")
Sleep(50) 
    Send("F")
Sleep(50) 
    Send("i")
Sleep(50) 
    Send("e")
Sleep(50) 
    Send("l")
Sleep(50) 
    Send("d")
Sleep(50) 

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>SCROOLLING TEXT END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

GUISetState ()
$msg = 0

While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    Select
    Case $msg = $UPDATE 
    Case $msg = $Search
For $Search = 1 to 10
       If $Search = 7 Then ContinueLoop 
        GUICtrlSetData($mylist,"L")
        Sleep(50)
        GUICtrlSetData($mylist,"Lo")
        Sleep(50) 
        GUICtrlSetData($mylist,"Loo")
        Sleep(50) 
        GUICtrlSetData($mylist,"Look")
        Sleep(50) 
        GUICtrlSetData($mylist,"Looki")
        Sleep(50) 
        GUICtrlSetData($mylist,"Lookin")
        Sleep(50) 
        GUICtrlSetData($mylist,"Looking") 
        Sleep(50) 
        GUICtrlSetData($mylist,"Looking.") 
        Sleep(50) 
        GUICtrlSetData($mylist,"Looking..") 
        Sleep(100) 
        GUICtrlSetData($mylist,"Looking...") 
    Next
    GUICtrlSetData($mylist,"Is This Right?")
        Case $msg = $Exit
         
        Exitloop
    EndSelect
Wend


; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GUI END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

Here is how I want it to run with gafrost code in it.

#include <GuiConstants.au3>
#include <GuiCombo.au3>
#include <GuiListView.au3>

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GIU<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
GuiCreate("File Search", 420, 540)
GuiSetIcon(@SystemDir & "\magnify.exe", 0)
GLOBAL $MESSAGE = ""
GUICtrlSetResizing (-1,$GUI_DOCKLEFT+$GUI_DOCKTOP)

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$SearchField = GuiCtrlCreateInput("", 10, 50, 150, 20)

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Opt ('MustDeclareVars', 1)
Dim $mylist, $DriveSearch, $Exit, $Search, $msg, $current
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INCLUDE END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT COLOR<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
GUICtrlSetColor(-1,0x0000FF);Blue
GUISetState ()
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>INPUT COLOR END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>OUTPUT<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

$mylist = GUICtrlCreateListView("File                       |Path                                       ", 10, 100, 400, 350, BitOR($LVS_SINGLESEL, $LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER), BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_REGIONAL, $LVS_EX_TRACKSELECT))
GUICtrlCreateListViewItem("line1|data1", $mylist)
GUICtrlCreateListViewItem("line2|data2", $mylist)
GUICtrlCreateListViewItem("line3|data3", $mylist)
GUICtrlCreateListViewItem("line4|data4", $mylist)
GUICtrlCreateListViewItem("line5|data5", $mylist)

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>OUTPUT END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>BUTTONS<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$Exit = GUICtrlCreateButton ("Exit", 100, 500, 100, 20)
$Search = GUICtrlCreateButton ("Search", 200, 500, 100, 20)
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>BUTTONS END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$DriveSearch = $Search
; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>DRIVE SELLECTION<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 
$DriveSearch = GUICtrlCreateCombo ("*:\", 235, 50, 36, 600)

If FileExists("A:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"A:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("B:\") Then

$DriveSearch = GUICtrlSetData(-1,"B:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("C:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"C:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
Endif

If FileExists("D:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"D:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("E:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"E:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("F:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"F:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("G:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"G:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("H:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"H:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("I:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"I:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("J:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"J:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("K:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"K:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("L:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"L:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("M:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"M:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("N:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"N:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("O:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"O:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("P:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"P:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf
If FileExists("Q:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"Q:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("R:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"R:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("S:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"S:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("T:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"T:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("U:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"U:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("V:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"V:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("W:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"W:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("X:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"X:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("Y:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"Y:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

If FileExists("Z:\") Then
    
$DriveSearch = GUICtrlSetData(-1,"Z:\")

; will display an empty dialog box with a combo control with focus on
GUISetState ($DriveSearch)    
Else
EndIf

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>DRIVE SELLECTION END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>SCROOLLING TEXT <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
; Wait for the Internet Explorer become active - it is titled "File Search" on English systems
WinWaitActive("File Search")

$SearchField = Send("F")
Sleep(50) 
$SearchField = Send("i")
Sleep(50)
$SearchField = Send("l")
Sleep(50)
$SearchField = Send("e")
Sleep(50)
$SearchField = Send("{SPACE}")
Sleep(50)
$SearchField = Send("S")
Sleep(50)
$SearchField = Send("e")
Sleep(50)
$SearchField = Send("a")
Sleep(50)
$SearchField = Send("r")
Sleep(50)
$SearchField = Send("c")
Sleep(50)
$SearchField = Send("h")
Sleep(50)
$SearchField = Send("{SPACE}")
Sleep(50) 
$SearchField = Send("F")
Sleep(50) 
$SearchField = Send("i")
Sleep(50) 
$SearchField = Send("e")
Sleep(50) 
$SearchField = Send("l")
Sleep(50) 
$SearchField = Send("d")
Sleep(50) 

; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>SCROOLLING TEXT END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

GUISetState ()
$msg = 0

While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    Select
        Case $msg = $Search
For $Search = 1 to 10
       If $Search = 7 Then ContinueLoop 
        GUICtrlSetData($mylist,"L")
        Sleep(50)
        GUICtrlSetData($mylist,"Lo")
        Sleep(50) 
        GUICtrlSetData($mylist,"Loo")
        Sleep(50) 
        GUICtrlSetData($mylist,"Look")
        Sleep(50) 
        GUICtrlSetData($mylist,"Looki")
        Sleep(50) 
        GUICtrlSetData($mylist,"Lookin")
        Sleep(50) 
        GUICtrlSetData($mylist,"Looking") 
        Sleep(50) 
        GUICtrlSetData($mylist,"Looking.") 
        Sleep(50) 
        GUICtrlSetData($mylist,"Looking..") 
        Sleep(100) 
        GUICtrlSetData($mylist,"Looking...") 
    Next
    GUICtrlSetData($mylist,"Is This Right?")
        Case $msg = $Exit
        Exit
    EndSelect
Wend


; >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>GUI END<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

No it will not search yet.

Edited by uber125

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

i always use Dim rather than Local... so without reading all of the script try this

replace this

Local $UPDATE, $Exit, $msg, $current, $SearchField

with this

Dim $UPDATE, $Exit, $msg, $current, $SearchField

8)

EDIT

I just noticed that "Dim" in gafrost's script also

Edited by Valuater

NEWHeader1.png

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

uber125-

Just add your "cases" to gafrost's while-wend...

Also, am I missing something or did you leave out your actual search statements? I see the search loop, but it doesn't seem to look for the target file... ;)

Edited by jefhal

...by the way, it's pronounced: "JIF"... Bob Berry --- inventor of the GIF format

Share this post


Link to post
Share on other sites

uber125-

Just add your "cases" to gafrost's while-wend...

Also, am I missing something or did you leave out your actual search statements? I see the search loop, but it doesn't seem to look for the target file... ;)

I have not even started the search statement yet I just couldn't get the drive to refresh. I'm still working on it. (damn customer keep calling me for help lol and interrupting me) Your idea worked that you have up earlier but I will also try the "cases" to gafrost's while-wend and see how that works. I'm still new to autoit 3 thanks for helping me out this is my 1st GUI.

Share this post


Link to post
Share on other sites

.....Your idea worked that you have up earlier ... thanks for helping me out this is my 1st GUI.

was that the Dim idea???

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

... man i have absolutely no friggin idea how to get this to look for File.* on *:\ then if found make GUICtrlCreateListViewItem("File.*|Path", $mylist)

for $SearchField = 1 to 50

$drivename = chr($driveletter)&":\"

If FileExists($SearchField) Then

$DriveSearch = GUICtrlCreateListViewItem(-1"????", $mylist)

; will display an empty dialog box with a combo control with focus on

GUISetState ($SearchField)

Else

EndIf

Next

lol anyone wanna tell me how far off I am? ;)

Edited by uber125

Share this post


Link to post
Share on other sites

This should get you close to what your trying to do.

Gary

Hay I have not had time to look at what you have done yet (damn work) anyways just wanted to say thank you to all that are helping me. B)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0