Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Open the query screen
- Run query 1
- Wait for query 1 to finish
- Run query 2
- Dim qryArray() as string = {“salesrep1”, “salerep28”, “salepay34”, “prod_inv_1”}
- 'Open Query
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "2" 'Run
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys 'Query Name Goes Here
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]" 'Next
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "techops" 'Library
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]" 'To top
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[enter]" 'Go to query
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf3]" 'Exit to run query
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement