Jump to content

rogdog

Active Members
  • Posts

    59
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

rogdog's Achievements

Wayfarer

Wayfarer (2/7)

3

Reputation

  1. This has now been fixed. For some reason my code in the OP had been corrupted !!
  2. A big thank to ProgAndy for his code and JScript for the modified version. Just what I was after
  3. ; locates and right clicks the Icon for this script #include <GuiToolbar.au3> #include <_SysTray.au3> $ToolTipString = 'Autoit - '&@ScriptName $count = _SysTrayIconCount() For $i = 0 to $count - 1 $tooltip = _SysTrayIconTooltip($i) ConsoleWrite("index: " & $i & @TAB & "tooltip: " & $tooltip & @CRLF) If $tooltip = $ToolTipString then $Index = $i Next $hWnd = ControlGetHandle('[Class:Shell_TrayWnd]', '', '[Class:ToolbarWindow32;Instance:1]') $iCommandID = _GUICtrlToolbar_IndexToCommand($hWnd, $Index) $aRect = _GUICtrlToolbar_GetButtonRect ($hWnd, $iCommandID) ControlClick($hWnd, '', '','Secondary',1,$aRect[0],$aRect[1]) Example code to locate and right click a notification(systray) icon even if the taskbar is hidden.
  4. This might be just what I am after for a project at work. Thankyou very much
  5. Thanks, great work :-)
  6. No good for me. I get the following error "Unable to Locate Component This application has failed to start because packet.dll was not found. Re-installing the application may fix the problem"
  7. a short func here for you Func cov($Hex) Local $aVals[16] = ["0000","0001","0010","0011","0100","0101","0110","0111","1000","1001","1010","1011","1100","1101","1110","1111"] Return $aVals[Dec($Hex)] EndFunc
  8. Hi Martin, Thanks for having a look. Hopefully somebody else may be able to solve this one.
  9. Hi Martin, Many thanks for your tip. I have tried what you suggested but the script still hangs once the first MsgBox has appeared and I try an click on a link in the embedded web browser.
  10. After many hours of searching the forum and head scratching I have failed to work out why the following script freezes. #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> ;_IEErrorHandlerRegister () ; Create main window $hParent = GUICreate("My GUI Tab",600,600) $idMsgbox = GUICtrlCreateButton("MSGBOX",3,5,100,25) GUISetState(@SW_SHOW,$hParent) ; create child window ; If next 2 lines are commented out then script does not freeze $hChild = GuiCreate("Child",550,550,0,30,$WS_CHILD,-1,$hParent) GUISetState(@SW_SHOW,$hChild) ; Create Embbedded IE Browser $oIE = _IECreateEmbedded () $GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 500, 500) $Event = ObjEvent($oIE, "_WebEvent_", "DWebBrowserEvents") ;_IENavigate ($oIE, 'about:blank') _IENavigate ($oIE, 'www.bbc.co.uk') While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE ExitLoop Case $idMsgbox MsgBox(262144,0,"Button Pressed") EndSwitch WEnd Func _WebEvent_($EventName) ConsoleWrite($EventName&@crlf) ; MsgBox causes script to freeze if child windows has been created if $EventName = "DownloadBegin" then MsgBox(262144,0,$EventName) EndFunc The script seems to freeze after the fist MsgBox is dsiplayed in the _WebEvent() function. Also, the problem only occurs if the child GUI is created. If the child GUI is commented out so that the embedded browser is created directly in the parent GUI then then the script is OK. Has any one got a fix for me please.
  11. Hi AlmarM, Just had another play with _INetSmtpMail() and got a bit further. I realised that my antivirus software (McAfee) is set to block smtp traffic by default. However, once I removed the block I received error message 50 instead of 4 @ERROR = 5x - Cannot open SMTP session. x indicates the index number of last command issued to the SMTP server. It would be worth you checking any antivirus/firewall products you have that might be blocking the smtp connection
  12. Hi sandin, Thanks for posting your example above. Exactly what I was after for one of my applications I am writing.
  13. I have tried the code using my work smtp settings and it doesn't seem work for me either. Sorry but can't see what we are doing wrong :-(
  14. Try using the following commands Do Until or While Wend
  15. Many thank for this excellent UDF
×
×
  • Create New...