Jump to content

dion

Members
  • Posts

    10
  • Joined

  • Last visited

dion's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. Hi Water, Thank you for the reply. How about the attachment of that email,do I use _OL_ItemAttachmentGet to save the attachement? Basically what I'm tring to acheive is that when on user click it would receive email and after which get the subject and save the attachment and lastly process a particular actions. I'm stuck with receiving email, finding the subject and saving the attachemnt portion. The below are the codes that I have tried but I'm encountering error on the array. Could you please guide me where have i gone wrong? Thank you for the help and advice. #AutoIt3Wrapper_Au3Check_Parameters= -d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 #AutoIt3Wrapper_Au3Check_Stop_OnWarning=Y #include <OutlookEX.au3> ; ***************************************************************************** ; Example Script ; This script loops until Shift-Alt-E is pressed to exit. ; ***************************************************************************** HotKeySet("+!e", "_Exit") ;Shift-Alt-E to Exit the script MsgBox(64, "OutlookEX UDF Example Script", "Hotkey to exit the script: 'Shift-Alt-E'!") Global $oOutlook = _OL_Open() Global $oOApp = ObjCreate("Outlook.Application") Global $test = ObjEvent($oOApp, "oOApp_") While 1 WEnd Func oOApp_NewMailEx($sOL_EntryId) Local $oOL_Item = $oOApp.Session.GetItemFromID($sOL_EntryId, Default) Local $Subject = $oOL_Item.Subject If $Subject = "TEST 1" Then MsgBox(4096,"Test","Test MSG received.") Global $aOL_Item = _OL_ItemFind($oOutlook, $sOL_EntryId, $olMail, "", "", "", "EntryID") If $aOL_Item[0][0] = 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemAttachmentGet Example Script", "Could not find a mail item.'. @error = " & @error) $Result = _OL_ItemAttachmentGet($oOutlook, $aOL_Item[1][0], Default) If @error <> 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemAttachmentGet Example Script", "Error getting list of attachments for mail" & @error & ", @extended = " & @extended) $Result[1][0].Delete _ArrayDisplay($Result, "OutlookEX UDF: _OL_ItemAttachmentGet Example Script") else MsgBox(4096,"Test","Test MSG Not received.") Endif EndFunc ;==>oOApp_NewMailEx Func _Exit() Exit EndFunc ;==>_Exit
  2. Hi Water, i'm working a mail bot and I came upon your OutlookEx UDF, I would like to know how could I receive email and find a subject in Outlook. I've search on your forums page and the closet was the example on the new mail. I have tried to tweal it but failed. Is it also possible to delete a email on a particular subject? Thank you in advance.
  3. Hi tlman12, it workds If have include if $var <> 0 then it do the screen capture. Thank you for the help.
  4. Dear folks.. I have the following script that I had written to capture TeamViewer QuickSupport after it had launch. It was working fine for past 1year but recently the screen capture was too "fast". It could not capture the ID portion. I had tried to use ControlGetText to check if values was in that ID box but was not successful. Any ideas and guidience on how I could accomplish a screen shot and ensuring there is a ID before screen capture. Thank you in advance. #include <ScreenCapture.au3> #Include <Date.au3> $TVQSPATH = @ScriptDir & "\TeamViewerQS.exe" $Date = (_DateTimeFormat( _NowCalc(),2)) $Date2 = @MDAY & @MON & @YEAR $Time = _NowTime() $FName = @ScriptDir & "\TVID" & $Date2 & ".jpg" ;Run TeamViewer Run($TVQSPATH) WinWaitActive ("TeamViewer" , "Ready to connect (secure connection)") $TVS = WinGetHandle("[active]") ;Capture window _ScreenCapture_CaptureWnd ($FName, $TVS) WinSetState ( $TVS , "" , @SW_MINIMIZE)
  5. Hi John, I would give it a try. Thank you.
  6. Dear folks, I trying to create a script that would tells me what mode is CheckPoint SecuRemote is in and then perform a task. but I'm unable to output the status to my script. Any help would be most appreciated. Thank you in advance. My script: Local Const $CPPATH = 'C:\Program Files\CheckPoint\SecuRemote\bin\' Local Const $Connect = "Connect Mode", $CLI = "Command Line Mode", $modeoutput= @ScriptDir & "\mode.txt" Func CLI () Run($CPPATH & "scc setmode cli", "", @SW_HIDE) Sleep (3000) EndFunc ;==> End CLI Func CON () Run($CPPATH & "scc setmode con", "", @SW_HIDE) EndFunc ;==> End of Connect ;Check SecureClient Mode $mode = Run($CPPATH & "scc setmode", "", @SW_HIDE) If $mode = $CLI Then MsgBox( 16,"Secure Client is in Command Line Mode") Else $mode = $Connect Then MsgBox( 16,"Secure Cleint is in Connect Mode") EndIf The Output from Command Line:
  7. Thanks folks, I had tried and it works. Thank you so much. Ascend4nt>> I did not use your as I do not understand it, my apologies as I'm very new with scripting. Could I ask what is the usage \s* ?
  8. Thanks folks, I would give it a try on this.
  9. Hi Folks, I had been searching online for some help but failed. I would like to my script to find the word after a specific word, but my script it does not return the field after it. My scripts look something like this: $FileName = @ScriptDir & "\TEST.txt" $Backup = @ScriptDir & "\TEST-BCK.txt" FileCopy ($FileName, $Backup) $FileContents = FileRead($FileName) $Results = StringSplit( "Password", ":",2) Msgbox(0,"Status","Password: " & $Results) What I wish to achieve is that it would search for this string call password in this particular file and then it would return the filed after it. The text file looks something like this: ================================================== Name : Test123 Application : MS Outlook 2002/2003/2007 Email : test123@isp.com.sg Server : pop.isp.com.sg Type : POP3 User : user123 Password @ssw0rd Profile : Outlook ================================================== Any help would be appreciated, thank you in advance.
×
×
  • Create New...