nlac Posted May 21, 2006 Share Posted May 21, 2006 ;this is just for fun, with no comment:) If FileExists("totalcmd.exe") == 0 Then MsgBox(0,"","The starter is not in the tcmd's root dir! Put it there and try again.") Exit EndIf Run("totalcmd.exe") If WinWaitActive("Total Commander", "", 5000) == 0 Then Exit Dim $t = -1 While $t < 1 $t = ControlGetText("Total Commander", "", "TPanel2") Sleep(5) WEnd Dim $arr[3] $arr[0] = "TButton3" $arr[1] = "TButton2" $arr[2] = "TButton1" ControlClick("Total Commander", "", $arr[Number($t) - 1]) Link to comment Share on other sites More sharing options...
Neoborn Posted May 22, 2006 Share Posted May 22, 2006 Does this mean anything to anyone? Care to explain? ~Projects~1. iPod Ejector 1.0 - Tool Used To Eject iPod in Windows - Uses DevEject.exe :P2. SmartFTP Close Popup Tool - Closes reminders from freeware SmartFTP.~Helpful Links For New Users~1. LXP's Learning AutoIT PDF Guide - <<< Go here for a PDF Guide on learning AutoIT from the ground up!<<<2. AutoIt 1-2-3 <<<Want to learn more about AutoIT quickly? Go Here<<<3. How To Install The Beta And Production Versions Of AutoIT / SciteAutoIT Link to comment Share on other sites More sharing options...
Lazycat Posted May 22, 2006 Share Posted May 22, 2006 Does this mean anything to anyone? Care to explain?This mean for anyone who use unregistered version of Total Commander: this automatically close shareware nag screen. Questionable contribution. Koda homepage ([s]Outdated Koda homepage[/s]) (Bug Tracker)My Autoit script page ([s]Outdated mirror[/s]) Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now