Sign in to follow this  
Followers 0
getmo96

Message sniffer

2 posts in this topic

#1 ·  Posted (edited)

I have built the backend of my program already which logs into my Oracle E-Business account. I now need a solution for the front end. I need the program to watch new imcoming messages for the terms ATCA and Minor. If these to terms are used, I then will have the back end kick in and log into oracle and move the new unassigned ticket to my bin.

The purpose this servers, I have some co workers who are watching thier blackberries and as soon as a ticket hits they log into orcale and assign themselves the tickets leaving me with no work load. The program will hopefully beat them to the punch and I dont have to sit and click refresh waiting for a new ticket to open.

_________________ Here is my backend _________________________________

#include <IE.au3>

_IEErrorHandlerRegister()

AutoItSetOption("SendKeyDelay", 400)

$oIE = _IECreate ("http://dl2k23.milf.com:8000/OA_HTML/AppsLocalLogin.jsp")

Send("username")

Send("{TAB}")

Send("password")

Send("{TAB}{ENTER}")

Sleep(100)

Send("{ENTER}")

Opt("WinWaitDelay",100)

Opt("WinTitleMatchMode",4)

Opt("WinDetectHiddenText",1)

Opt("MouseCoordMode",0)

WinWait("http://dl2k23.milf.com:8000/pls/ORAP/OracleMyPage.home - Microsoft Internet Explorer provided by Motorola","")

If Not WinActive("http://dl2k23.milf.com:8000/pls/ORAP/OracleMyPage.home - Microsoft Internet Explorer provided by Motorola","") Then WinActivate("http://dl2k23.milf.com:8000/pls/ORAP/OracleMyPage.home - Microsoft Internet Explorer provided by Motorola","")

WinWaitActive("http://dl2k23.milf.com:8000/pls/ORAP/OracleMyPage.home - Microsoft Internet Explorer provided by Motorola","")

MouseMove(351,239)

MouseDown("left")

MouseUp("left")

Send("{TAB}{TAB}{TAB}{TAB}{ENTER}")

Sleep(500)

Opt("WinWaitDelay",100)

Opt("WinTitleMatchMode",4)

Opt("WinDetectHiddenText",1)

Opt("MouseCoordMode",0)

WinWait("Oracle Applications 11i - Microsoft Internet Explorer provided by Motorola","")

If Not WinActive("Oracle Applications 11i - Microsoft Internet Explorer provided by Motorola","") Then WinActivate("Oracle Applications 11i - Microsoft Internet Explorer provided by Motorola","")

WinWaitActive("Oracle Applications 11i - Microsoft Internet Explorer provided by Motorola","")

Sleep(500)

WinWait("Oracle Applications - Oracle Production Instance","")

If Not WinActive("Oracle Applications - Oracle Production Instance","") Then WinActivate("Oracle Applications - Oracle Production Instance","")

WinWaitActive("Oracle Applications - Oracle Production Instance","")

Sleep(500)

Opt("WinWaitDelay",100)

Opt("WinTitleMatchMode",4)

Opt("WinDetectHiddenText",1)

Opt("MouseCoordMode",0)

WinWait("Oracle Applications - Oracle Production Instance","")

If Not WinActive("Oracle Applications - Oracle Production Instance","") Then WinActivate("Oracle Applications - Oracle Production Instance","")

WinWaitActive("Oracle Applications - Oracle Production Instance","")

Sleep(2000)

MouseMove(214,281)

MouseDown("left")

MouseUp("left")

Sleep(1000)

Send("{ENTER}")

Opt("WinWaitDelay",100)

Opt("WinTitleMatchMode",4)

Opt("WinDetectHiddenText",1)

Opt("MouseCoordMode",0)

WinWait("Oracle Applications - Oracle Production Instance","")

If Not WinActive("Oracle Applications - Oracle Production Instance","") Then WinActivate("Oracle Applications - Oracle Production Instance","")

WinWaitActive("Oracle Applications - Oracle Production Instance","")

Sleep(2000)

MouseMove(131,231)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(582,122)

MouseDown("left")

MouseUp("left")

Sleep(2000)

MouseMove(581,122)

MouseDown("left")

MouseUp("left")

Edited by getmo96

Share this post


Link to post
Share on other sites



This would be outlook vba to java interface. I have the java down, but need some sort of trigger set up. Can this be down in Autoit or only by using the VBA editor in Outlook?

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0