revtex

You seem like you know what your doing ) Thanks for this btw... I have an issue tho, I added a WWW link to a word doc but I need to change the font,font size, and bold it.... not to sure how I would go about doing that... any help would be GREAT!

Ok, here's what i'm trying to do... I want to creat a gui interface that will "change/resize" based on whats been checked to be displayed.. so say I have 6 check boxes displayed when the program is run, the user then selects what items he wants displayed by checking the boxes, the user then hits the OK button to display then, in turn th GUI changes size to display what he just selected (by adding buttons, edit boxes, labels, ext) to the gui. ok.. I hope that makes sense :"> Here's kinda what im looking for in the whole big picture of it... just imagine the gui being smaller when first run and growing based on whats selected #include <GuiConstants.au3> If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000 GuiCreate("MyGUI", 609, 527,(@DesktopWidth-609)/2, (@DesktopHeight-527)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $Group_1 = GuiCtrlCreateGroup("", 0, -10, 610, 80) $Checkbox_2 = GuiCtrlCreateCheckbox("Checkbox2", 10, 10, 80, 20) $Checkbox_3 = GuiCtrlCreateCheckbox("Checkbox3", 10, 40, 90, 20) $Checkbox_4 = GuiCtrlCreateCheckbox("Checkbox4", 120, 10, 80, 20) $Checkbox_5 = GuiCtrlCreateCheckbox("Checkbox5", 120, 40, 80, 20) $Checkbox_6 = GuiCtrlCreateCheckbox("Checkbox6", 220, 10, 80, 20) $Checkbox_7 = GuiCtrlCreateCheckbox("Checkbox7", 220, 40, 70, 20) $Button_8 = GuiCtrlCreateButton("Button8", 480, 20, 90, 40) $Group_9 = GuiCtrlCreateGroup("Group9", 10, 100, 580, 80) $Group_10 = GuiCtrlCreateGroup("Group10", 10, 200, 580, 80) $Group_11 = GuiCtrlCreateGroup("Group11", 10, 300, 580, 80) $Group_12 = GuiCtrlCreateGroup("Group12", 10, 400, 580, 80) GuiSetState() While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case Else ;;; EndSelect WEnd Exit

perfect! Just what I was looking for BTW... after you changed it to Run() its not reporting in @error, like if I change Cleaning.exe to Clleaning.exe.. it should report 1 but it keeps returning 0 and RunErrorsFatal is set to 0

One more thing.. maybe you can help me on this one too.. I have a func that copies files to a temp dir and I want the same effect as the last func.. how does one track the progess of the func DirCopy()? Func InstallFiles() UpdateProgress("Installing program files...", "10") $i = DirCopy(".\files\", "c:\tempfiles", 1) If @error Or $i = 0 Then Return 0 Exit Else Return 1 EndIf EndFunc ;==>InstallFiles

Very cool, thank you my friend everything is working great now! looks cleaner now too

Ok, Im a n00b when it comes to this stuff.. still kinda learning.. problem is a have some code that updates my progress bar but the code wont end when I need it to. Also im not even sure if a while loop is the best way to do this. Func CleanSystem() $x = 1 $z = 20 UpdateProgress("Purging temp files.", $z) $i = RunWait("c:\tempfiles\Programs\cleanup\Cleanup.exe /AutoRun") While 1 $p = ProcessExists("Cleanup.exe") If NOT $p = 1 And $x = 1 Then UpdateProgress("Purging temp files.", $z) $x = 2 Sleep(500) ContinueLoop EndIf If NOT $p = 1 And $x = 2 Then UpdateProgress("Purging temp files..", $z) $x = 3 Sleep(500) ContinueLoop EndIf If NOT $p = 1 And $x = 3 Then UpdateProgress("Purging temp files...", $z) $x = 1 Sleep(500) ContinueLoop EndIf If $p = 0 Then ExitLoop WEnd If @error = 1 Then Return 0 Else Return 1 EndIf EndFunc ;==>CleanSystem

Nevermind... found out the problem... it was the "&Fix selected issues..." and "E&xit" ... Didnt know the "&" was a big deal.. :">

ok.. What im trying to do is run a automated script that goes through and "clicks" on each stage of the script. The problem im having is here: While 1 $func1 = ControlCommand("CCleaner", "Fix selected issues...", 4, "IsEnabled", "") $func2 = ControlCommand("CCleaner", "Exit", 6, "IsEnabled", "") If $func1 = 1 And $func2 = 1 Then ExitLoop If $func1 = 0 And $func2 = 1 Then;ContinueLoop MouseMove(575,45) MouseDown("left") MouseUp("left") Sleep(2000) Exit EndIf WEnd I get this code from Valuater Automated CrapCleaner v1.19.108 script, Automate cleaning process Problem im having is when it gets to the "Issues" part of the scan it wont let the scan finnish and run this code "If $func1 = 0 And $func2 = 1 Then" even tho its not yet true. Can anyone help me out with this? #region --- ScriptWriter generated code Start --- $m1 = "No issues were found" Run('C:\Program Files\CCleaner\ccleaner.exe') WinWait("CCleaner","") If Not WinActive("CCleaner","") Then WinActivate("CCleaner","") WinWaitActive("CCleaner",""); <== Click "Run Cleaner" MouseMove(536,368) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("classname=ThunderRT6FormDC","This process will permanently delete files from your system.") If Not WinActive("classname=ThunderRT6FormDC","") Then WinActivate("classname=ThunderRT6FormDC","") WinWaitActive("classname=ThunderRT6FormDC","") ; MouseMove(17,131) ; MouseDown("left") ; MouseUp("left") ; Sleep(1000) MouseMove(356,39) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("CCleaner","CLEANING COMPLETE") If Not WinActive("CCleaner","") Then WinActivate("CCleaner","") WinWaitActive("CCleaner","") MouseMove(196,111) MouseDown("left") MouseUp("left") Sleep(1000) MouseMove(533,368) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("classname=ThunderRT6FormDC","This process will permanently delete files from your system.") If Not WinActive("classname=ThunderRT6FormDC","") Then WinActivate("classname=ThunderRT6FormDC","") WinWaitActive("classname=ThunderRT6FormDC","") ; MouseMove(17,131) ; MouseDown("left") ; MouseUp("left") ; Sleep(1000) MouseMove(356,39) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("CCleaner","CLEANING COMPLETE") If Not WinActive("CCleaner","") Then WinActivate("CCleaner","") WinWaitActive("CCleaner","") MouseMove(46,178) MouseDown("left") MouseUp("left") Sleep(1000) MouseMove(373,369) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("CCleaner","") If Not WinActive("CCleaner","") Then WinActivate("CCleaner","") WinWaitActive("CCleaner","") Sleep(1000) While 1 $func1 = ControlCommand("CCleaner", "Fix selected issues...", 4, "IsEnabled", "") $func2 = ControlCommand("CCleaner", "Exit", 6, "IsEnabled", "") If $func1 = 1 And $func2 = 1 Then ExitLoop If $func1 = 0 And $func2 = 1 Then;ContinueLoop MouseMove(575,45) MouseDown("left") MouseUp("left") Sleep(2000) Exit EndIf WEnd MouseMove(537,370) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("CCleaner","Do you want to backup changes to the registry?") If Not WinActive("CCleaner","Do you want to backup changes to the registry?") Then WinActivate("CCleaner","Do you want to backup changes to the registry?") WinWaitActive("CCleaner","Do you want to backup changes to the registry?") MouseMove(72,99) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("Save As","") If Not WinActive("Save As","") Then WinActivate("Save As","") WinWaitActive("Save As","") MouseMove(513,370) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("Fix issues","") If Not WinActive("Fix issues","") Then WinActivate("Fix issues","") WinWaitActive("Fix issues","") MouseMove(238,224) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("CCleaner","Are you sure you want to Fix all selected Issues?") If Not WinActive("CCleaner","Are you sure you want to Fix all selected Issues?") Then WinActivate("CCleaner","Are you sure you want to Fix all selected Issues?") WinWaitActive("CCleaner","Are you sure you want to Fix all selected Issues?") MouseMove(89,80) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("Fix issues","") If Not WinActive("Fix issues","") Then WinActivate("Fix issues","") WinWaitActive("Fix issues","") While 1 $func1 = ControlCommand("Fix issues", "Fix Issue", 4, "IsEnabled", "") $func2 = ControlCommand("Fix issues", "Fix All Selected Isses", 3, "IsEnabled", "") $func3 = ControlCommand("Fix issues", "Exit", 5, "IsEnabled","") If $func1 = 0 And $func2 = 0 And $func3 = 1 Then MouseMove(390,225) MouseDown("left") MouseUp("left") Sleep(1000) WinWait("CCleaner","") If Not WinActive("CCleaner","") Then WinActivate("CCleaner","") WinWaitActive("CCleaner","") MouseMove(575,45) MouseDown("left") MouseUp("left") Sleep(1000) Exit EndIf WEnd