Randomness Posted September 24, 2008 Share Posted September 24, 2008 (edited) I'm new to AutoIt and I'm trying to create a simple script which will repair wireless connection if it becomes drops out during the day. I modified an existing script based on the Wireless tray icon, but if I run the script when the connection is fine, it goes crazy minimising and maximising the tray area and opening every program window in the tray, moving and resizing them It seems to execute the button steps for every item in the system tray, which is a problem and resulted in my keyboard inputs being lower case when CAPS lock was on, and capitalised when CAPS lock was off (fixed after a reboot). The problem may be due to the tray tool tip for the Wireless Network never stays the same. E.G. When connected it says "Wireless Network Connection (*SSID of network*)". When disconnected it just says "Wireless Network Connection". But I'm also betting that the tiny amount of code I added is quite poorly written. My eventual plan is to use Windows Task Scheduler to run this every 5-10 mins expandcollapse popup#NoTrayIcon #Include <GuiToolBar.au3> #include <INet.au3> _GetIP ( ) If @error then _SysTray_ClickItem("Wireless Network Connection", "right", 1);Enter the substring text here $k=2 Send("+{UP " & $k & "}") Send("{Enter}") ;=========# _SysTray_ClickItem #====================================================== ; ;Function Name: _SysTray_ClickItem() ;Description: Click on item in Windows system tray by any substring in the title ;Parameters: $iTitle - The title of the item in Windows system tray (you can see the title of the item when mouse cursor hovered on item). ; $iButton - [optional] The button to click, "left" or "right". Default is the left button. ; $iClick - [optional] The number of times to click the mouse. Default is 1 ; $sMove = [optional] True = Mouse will be moved, False (default) = Mouse will not be moved ; $iSpeed = [optional] Mouse movement speed ;Return Value(s): Success - Returns 1 ; Failure - Returns 0 and sets @error to 1 if required item not found ;Requirement(s): AutoIt 3.2.10.0 and above ;Autor(s): R.Gilman (a.k.a rasim); Siao (Thanks for idea) ; ;==================================================================================== Func _SysTray_ClickItem($iTitle, $iButton = "left", $iClick = 1, $sMove = False, $iSpeed = 1) Local $hToolbar, $iButCount, $aRect, $hButton, $cID, $i $hToolbar = ControlGetHandle("[Class:Shell_TrayWnd]", "", "[Class:ToolbarWindow32;Instance:1]") If @error Then Return SetError(1, 0, 0) EndIf $iButCount = _GUICtrlToolbar_ButtonCount($hToolbar) If $iButCount = 0 Then Return SetError(1, 0, 0) EndIf $hButton = ControlGetHandle("[Class:Shell_TrayWnd]", "", "Button2") If $hButton <> "" Then ControlClick("[Class:Shell_TrayWnd]", "", "Button2") For $i = 0 To $iButCount - 1 $cID = _GUICtrlToolbar_IndexToCommand($hToolBar, $i) If StringInStr(_GUICtrlToolbar_GetButtonText($hToolBar, $cID), $iTitle) Then _GUICtrlToolbar_ClickButton($hToolbar, $cID, $iButton, $sMove, $iClick, $iSpeed) Return 1 EndIf Next Return SetError(1, 0, 0) EndFunc Edited September 24, 2008 by Randomness Link to comment Share on other sites More sharing options...
Community On Patrol Posted September 24, 2008 Share Posted September 24, 2008 Hi Randomness,1st Welcome to the AutoIt Forums! Some of the following tips may not apply to you, but it may make your life a bit easier here on the forum in the future.CODEDid you know that we have an awesome search feature? You can find many answers to your current questions, just by typing in the right search patterns.A suggestion is to use the Advanced Search mode:Type your specific search term in quotes.Click the forum you want to search in (the one most likely to have your information would generally be the Example Script forum and or the General Help and Support Forum).Click on "Search titles only" radio button.Click perform search.The above will help you narrow down your searches and prevent you from unneccesarily posting a new thread.[*]Also, you should try to read the Sticky posts that are at the top of each of the AutoIt Forums you enter such as:FAQs (Frequently Asked Questions)Are my AutoIt EXEs really infected? (About false positives and what to do if you may encounter one)[*]Keep in mind, the help file will be your best friend, however you may find some of the tutorials written by some of our elite forum members helpful.Valuaters Interactive AutoIt 1-2-3 tutorialLxPs Learning to script with AutoIt3[*]Forum Etiquette:Making a new thread:Use the Search feature first to see if your question has already been answered.Look in the help file as well before even thinking of posting (When what you want could be obtained by simply reading the help file, you don't generally get a good response from your AutoIt community).Titles are very important here. 1 word titles or titles like "help me", "write something for me", "I'm a noob" etc... aren't tolerated.Make sure you are posting in the correct forum:General Help and Support:This forum is for AutoIt related support questions only. If you have a question related to another language, or nothing at all to do with AutoIt then you need to post in the chat forum, or in that languages perspective forum.Example Script:This forum is for AutoIt scripts/executables only.Source code is preferred but not necessary, you do have the right to just post the binary of your project if you wish.Please don't post questions in this forum unless it's directly related to a thread already existing.Use common sense when creating a new thread. Ask yourself if the title is descriptive enough to even interest someone (preferably those that know what they are talking about) to even look at your thread, let alone reply in it.Think about how it would show in the search feature if someone were to look for something just like you are looking for (think of the keywords you used yourself and obviously didn't find anything (because we know you used the search feature ) and use those types of keywords in your title as well).Thread content:Be descriptive with your query. (Make sure we actually know what you want to do).Show you've made an effort in coding what you want (provide the reproducer code (generally no more than 50 lines as people lose interest in debugging someones script for free)).Don't talk in ebonics. A lot of the forum members are adults, and a lot of them know how to help you, but talk like a child, you'll be treated as such.Don't ask for help making keyloggers, spam (even if it's to do as a prank), or anything that can be thought of as malicious. You'll more than likely have the thread locked by a moderator, and take a bashing from your fellow AutoIt community.When posting code, use code boxes. This can be accomplished by using [code ]<content here>[/code ] (No spaces between the brackets []).Using code boxes will keep the indentation and make it easier to read for others to help you.Bumping your threads:Use common courtesy here.Keep in mind every time you bump your thread to the top of the forum, you knock the other threads down a notch.Everyone posting for help has just as much right for their threads to get read as you do.Because of that, do not bump your post more than once in a 24 hour period.A Bump is simply posting in your thread with nothing that pertains to your query with the sole purpose of moving it up.Deleting previous bumps, and posting new ones is not tolerated, and the moderators can find those deletions, so do yourself a favor and don't cross that line >_< .Rude or obnoxious content:This falls pretty much under the common sense thing. If you use it (common sense) before posting, you won't have issues.Don't use foul language, remember, a lot of the community is at work when they read these threads.Don't provoke or instigate an argument with someone.Double Posting:It's understood that sometimes there's a lag in the system, and sometimes people don't see their post go up right aways so they post again.If this happens to you, simply notify a moderator with the report feature in the post, and politely ask them to delete it.If you're just creating another topic because your original topic is not being answered the way you want or at all, this is not tolerated. You could lose your posting privileges all together over it.Non-English languagesIf English is not your primary language, please make an attempt to interpret (yourself or online) and post that interpretation.We have wonderful users from around the world, so after you've done your post in English, back it up with your question also in your native tongue (You may find your answer much quicker using both).That's it for now, I hope you have a wonderful learning experience, and hope to see you contribute to the community as your knowledge grows. Link to comment Share on other sites More sharing options...
Randomness Posted September 25, 2008 Author Share Posted September 25, 2008 Thanks for the pointers, but my search turned up nothing similar in terms of people using the GetIP function in conjunction with this, nor the extremely bizzarre events which happen when I run the script. Link to comment Share on other sites More sharing options...
PsaltyDS Posted September 25, 2008 Share Posted September 25, 2008 (edited) Thanks for the pointers, but my search turned up nothing similar in terms of people using the GetIP function in conjunction with this, nor the extremely bizzarre events which happen when I run the script. The user C.O.P. is just a bot that hands out reminders, don't worry about it. The first step in fixing your code is to make everything conditional, not just the function call: _GetIP() If @error Then _SysTray_ClickItem("Wireless Network Connection", "right", 1);Enter the substring text here $k = 2 Send("+{UP " & $k & "}") Send("{Enter}") EndIf The way you had it, the function was called only on @error, but the rest executed regardless. Edited September 25, 2008 by PsaltyDS Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
spudw2k Posted September 25, 2008 Share Posted September 25, 2008 (edited) Here's another method (taken from my QuickNIC script) too, just cause I hate to automate graphic process due to that fact that there's a lot of room for error (timing, location, etc.) Global $colNetwork _ToggleNetworkInterface("Wireless Network Connection") ;Returns -1 If failed, 0 If Disabled Successfully, 1 If Enabled Successfully Func _NetworkConnectionsObject() $objShell = ObjCreate("Shell.Application") $strNetConn = "Network Connections" $objCP = $objShell.Namespace(3) For $clsConn In $objCP.Items If $clsConn.Name = $strNetConn Then $col = $clsConn.GetFolder Next Return $col EndFunc Func _ToggleNetworkInterface($strNetwork) If Not IsObj($colNetwork) then $colNetwork = _NetworkConnectionsObject() If Not IsObj($colNetwork) Then Return -1 EndIf For $clsConn In $colNetwork.Items If $clsConn.Name = $strNetwork Then For $clsVerb in $clsConn.verbs If $clsVerb.name = "Disa&ble" Then $clsVerb.DoIt sleep(500) Return 0 EndIf If $clsVerb.name = "En&able" Then $clsVerb.DoIt sleep(500) Return 1 EndIf Next EndIf Next EndFunc Edited September 25, 2008 by spudw2k Spoiler Things I've Made: Always On Top Tool ◊ AU History ◊ Deck of Cards ◊ HideIt ◊ ICU ◊ Icon Freezer ◊ Ipod Ejector ◊ Junos Configuration Explorer ◊ Link Downloader ◊ MD5 Folder Enumerator ◊ PassGen ◊ Ping Tool ◊ Quick NIC ◊ Read OCR ◊ RemoteIT ◊ SchTasksGui ◊ SpyCam ◊ System Scan Report Tool ◊ System UpTime ◊ Transparency Machine ◊ VMWare ESX BuilderMisc Code Snippets: ADODB Example ◊ CheckHover ◊ Detect SafeMode ◊ DynEnumArray ◊ GetNetStatData ◊ HashArray ◊ IsBetweenDates ◊ Local Admins ◊ Make Choice ◊ Recursive File List ◊ Remove Sizebox Style ◊ Retrieve PNPDeviceID ◊ Retreive SysListView32 Contents ◊ Set IE Homepage ◊ Tickle Expired Password ◊ Transpose ArrayProjects: Drive Space Usage GUI ◊ LEDkIT ◊ Plasma_kIt ◊ Scan Engine Builder ◊ SpeeDBurner ◊ SubnetCalcCool Stuff: AutoItObject UDF ◊ Extract Icon From Proc ◊ GuiCtrlFontRotate ◊ Hex Edit Funcs ◊ Run binary ◊ Service_UDF 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