ekim415

IE Loop though list of user names

16 posts in this topic

I have made a script that works to export data from a stubborn email archive, the code is below.  We have hundreds of email addresses that this must be run on and in the script there is the word $VARIABLE three times.  I need assistance in figuring out how to loop this script and make it run though a list of user names placed in the three locations in the code below. 

Any ideas/direction is greatly appreciated. 

 

#include <IE.au3>


Call ("signin")

Func signin ()

Global $oIE = _IECreate("\\archive")

; win state sets window to maximum.
WinSetState("Search Archive - Internet Explorer", "", @SW_MAXIMIZE)

Local $username = _IEGetObjById ($oIE, "user_username")
Local $password = _IEGetObjById ($oIE, "user_password")
Local $loginbutton = _IEGetObjById ($oIE,"user_submit")

_IEFormElementSetValue ($username, "UserName")
_IEFormElementSetValue ($password, "Password")

_IEAction ($loginbutton, "click")

EndFunc


_IELoadWait ($oie)


Call ("search")

Func search ()


Local $subject = _IEGetObjById ($oIE, "search_name")
Local $sender = _IEGetObjById ($oIE, "search_sender")

_IEFormElementSetValue ($subject, "Outbound $VARIABLE Jan1-March31 2015")
_IEFormElementSetValue ($sender, "$VARIABLE@email.com")

EndFunc


Send ("{PGDN}" & "{PGDN}" & "{PGDN}" & "{PGDN}")
Sleep (2000)
;Selects date on Calendar
MouseClick("left", 671,450)



Local $searchbutton = _IEGetObjByName ($oIE,"save_results")

_IEAction ($searchbutton, "click")


Sleep(2000)

Global $exportnote = _IEGetObjById ($oIE, "export_note")
_IEFormElementSetValue ($exportnote, "Outbound $VARIABLE Jan1-March31 2015")

 

 

 

 

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

What's about: opening the Help and learning the basics, specialy about variables, arrays, reading(/writing) from(/in files), Loops (while...wend, Do...until) and  concatenating strings?

I can't find a variable named $VARIABLE in your script only the word $VARIABLE as text. 

Edited by AutoBert

Share this post


Link to post
Share on other sites

You are correct, there is no variable.  I was simply trying to explain what I am working to achieve in a clear manner.

Share this post


Link to post
Share on other sites
2 hours ago, ekim415 said:

I need assistance in figuring out how to loop this script and make it run though a list of user names placed in the three locations in the code below. 
Any ideas/direction is greatly appreciated. 

 

Start from code CleanUp.

#include <IE.au3>

Global $oIE = _IECreate("\\archive")
_Example()

Func _Example()
    signin()
    _IELoadWait($oIE)
    search()

    Send("{PGDN}" & "{PGDN}" & "{PGDN}" & "{PGDN}")
    Sleep(2000)
    ;Selects date on Calendar
    MouseClick("left", 671, 450)

    Local $searchbutton = _IEGetObjByName($oIE, "save_results")
    _IEAction($searchbutton, "click")
    _IELoadWait($oIE)

    Local $exportnote = _IEGetObjById($oIE, "export_note")
    _IEFormElementSetValue($exportnote, "Outbound $VARIABLE Jan1-March31 2015")
EndFunc   ;==>_Example

Func signin()
    ; win state sets window to maximum.
    WinSetState("Search Archive - Internet Explorer", "", @SW_MAXIMIZE)

    Local $username = _IEGetObjById($oIE, "user_username")
    Local $password = _IEGetObjById($oIE, "user_password")
    Local $loginbutton = _IEGetObjById($oIE, "user_submit")

    _IEFormElementSetValue($username, "UserName")
    _IEFormElementSetValue($password, "Password")
    _IEAction($loginbutton, "click")
EndFunc   ;==>signin

Func search()
    Local $subject = _IEGetObjById($oIE, "search_name")
    Local $sender = _IEGetObjById($oIE, "search_sender")

    _IEFormElementSetValue($subject, "Outbound $VARIABLE Jan1-March31 2015")
    _IEFormElementSetValue($sender, "$VARIABLE@email.com")
EndFunc   ;==>search



Now you should see what can be done.

 

btw.

You do not need to use Call(.....) 

 


Signature beginning:   Wondering who uses AutoIT and what it can be used for ?
* GHAPI UDF - modest begining - comunication with GitHub REST API *
ADO.au3 UDF     POP3.au3 UDF     XML.au3 UDF    How to use IE.au3  UDF with  AutoIt v3.3.14.x  for other useful stuff click the following button

Spoiler

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. 

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API *

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 - BETA * ADO.au3 UDF SMTP Mailer UDF *

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Best coding practices * 

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * 

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2017-06-04

Share this post


Link to post
Share on other sites
1 hour ago, mLipok said:

Start from code CleanUp.

Your post was very helpful, thank you.

Share this post


Link to post
Share on other sites

btw.

What you intend to do here:
 

Send("{PGDN}" & "{PGDN}" & "{PGDN}" & "{PGDN}")
    Sleep(2000)
    ;Selects date on Calendar
    MouseClick("left", 671, 450)

 


Signature beginning:   Wondering who uses AutoIT and what it can be used for ?
* GHAPI UDF - modest begining - comunication with GitHub REST API *
ADO.au3 UDF     POP3.au3 UDF     XML.au3 UDF    How to use IE.au3  UDF with  AutoIt v3.3.14.x  for other useful stuff click the following button

Spoiler

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. 

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API *

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 - BETA * ADO.au3 UDF SMTP Mailer UDF *

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Best coding practices * 

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * 

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2017-06-04

Share this post


Link to post
Share on other sites
3 minutes ago, mLipok said:

btw.

What you intend to do here:
 

Send("{PGDN}" & "{PGDN}" & "{PGDN}" & "{PGDN}")
    Sleep(2000)
    ;Selects date on Calendar
    MouseClick("left", 671, 450)

 

I don't like that code but I am unable to fill out the form unless I open the pop out calendar and click the date.  So what this is doing is moving to the bottom of the page and selecting the date on a the calendar.

Here is the code from inspect element in case you see a different way to input:

 

<div class="field clear">
      <label class="_" for="search_begin_string">Begins on</label>
      <input name="search[begin_string]" class="custom_date_range calendar hasDatepicker" id="search_begin_string" type="text" size="30" readonly="readonly"><img title="..." class="ui-datepicker-trigger" alt="..." src="/images/calendar.gif">
    </div>

 

Share this post


Link to post
Share on other sites

Try this:

Local $oButton = _IEGetObjByID($oIE, 'search_begin_string')
_IEAction($oButton, 'click')

 


Signature beginning:   Wondering who uses AutoIT and what it can be used for ?
* GHAPI UDF - modest begining - comunication with GitHub REST API *
ADO.au3 UDF     POP3.au3 UDF     XML.au3 UDF    How to use IE.au3  UDF with  AutoIt v3.3.14.x  for other useful stuff click the following button

Spoiler

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. 

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API *

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 - BETA * ADO.au3 UDF SMTP Mailer UDF *

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Best coding practices * 

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * 

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2017-06-04

Share this post


Link to post
Share on other sites
1 hour ago, mLipok said:

Try this:

Local $oButton = _IEGetObjByID($oIE, 'search_begin_string')
_IEAction($oButton, 'click')

 

Thank you for this!

Share this post


Link to post
Share on other sites

I encourage you to read:   How to use IE.au3  UDF with  AutoIt v3.3.14.x 
And I hope now you have Idea how to solve your main problem.

mLipok

 


Signature beginning:   Wondering who uses AutoIT and what it can be used for ?
* GHAPI UDF - modest begining - comunication with GitHub REST API *
ADO.au3 UDF     POP3.au3 UDF     XML.au3 UDF    How to use IE.au3  UDF with  AutoIt v3.3.14.x  for other useful stuff click the following button

Spoiler

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. 

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API *

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 - BETA * ADO.au3 UDF SMTP Mailer UDF *

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Best coding practices * 

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * 

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2017-06-04

Share this post


Link to post
Share on other sites

I have watched several videos and read though some examples and I have learned that this can be solved with an array.  I understand how to make an array and in my example below I have been able to make it function as a msgbox and consolewrite but I am unable to figure out how to get this into the three places I need it to go below currently defined as $a .   Could someone point me to an example or function on how to implement this properly

 

Global $Array[10]

$Array[0] = "user1"
$Array[1] = "user2"
$Array[2] = "user3"
$Array[3] = "user4"
$Array[4] = "user5"
$Array[5] = "user6"
$Array[6] = "user7"
$Array[7] = "user8"
$Array[8] = "user9"
$Array[9] = "user10"

For $a in $Array
    MsgBox(0,"output", $a)
Next
#include <IE.au3>

Global $oIE = _IECreate("\\archive")
_main()

Func _main()
    signin()
    _IELoadWait($oIE)
    search()

    Local $oButton = _IEGetObjByID($oIE, 'search_begin_string')
    _IEAction($oButton, 'click')

    Local $searchbutton = _IEGetObjByName($oIE, "save_results")
    _IEAction($searchbutton, "click")
    _IELoadWait($oIE)

    Local $exportnote = _IEGetObjById($oIE, "export_note")
    _IEFormElementSetValue($exportnote, "Outbound" & $a & "Jan1-March31 2015")
EndFunc   ;==>_Example

Func signin()
    ; win state sets window to maximum.
    WinSetState("Search Archive - Internet Explorer", "", @SW_MAXIMIZE)

    Local $username = _IEGetObjById($oIE, "user_username")
    Local $password = _IEGetObjById($oIE, "user_password")
    Local $loginbutton = _IEGetObjById($oIE, "user_submit")

    _IEFormElementSetValue($username, "UserName")
    _IEFormElementSetValue($password, "Password")
    _IEAction($loginbutton, "click")
EndFunc   ;==>signin

Func search()
    Local $subject = _IEGetObjById($oIE, "search_name")
    Local $sender = _IEGetObjById($oIE, "search_sender")

    _IEFormElementSetValue($subject, "Outbound" & $a & "Jan1-March31 2015")
    _IEFormElementSetValue($sender, $a & "@email.com")
EndFunc   ;==>search

 

Share this post


Link to post
Share on other sites

The Array is working as standalone code by when implemented below with the For loop all $Array variables come across and blank.  What am I missing?

 

#include <IE.au3>

Global $Array[3]

$Array[0] = "user1"
$Array[1] = "user2"
$Array[2] = "user3"

Global $oIE = _IECreate("\\archive")
_main()

Func _main()
    For $Array = 0 to 2
    signin()
    _IELoadWait($oIE)
    search()

    Local $oButton = _IEGetObjByID($oIE, 'search_begin_string')
    _IEAction($oButton, 'click')

    Local $searchbutton = _IEGetObjByName($oIE, "save_results")
    _IEAction($searchbutton, "click")
    _IELoadWait($oIE)

    Local $exportnote = _IEGetObjById($oIE, "export_note")
    _IEFormElementSetValue($exportnote, "Outbound" & $Array & "Jan1-March31 2015")
    Next
EndFunc   ;==>_main

Func signin()
    ; win state sets window to maximum.
    WinSetState("Search Archive - Internet Explorer", "", @SW_MAXIMIZE)

    Local $username = _IEGetObjById($oIE, "user_username")
    Local $password = _IEGetObjById($oIE, "user_password")
    Local $loginbutton = _IEGetObjById($oIE, "user_submit")

    _IEFormElementSetValue($username, "UserName")
    _IEFormElementSetValue($password, "Password")
    _IEAction($loginbutton, "click")
EndFunc   ;==>signin

Func search()
    Local $subject = _IEGetObjById($oIE, "search_name")
    Local $sender = _IEGetObjById($oIE, "search_sender")

    _IEFormElementSetValue($subject, "Outbound" & $Array & "Jan1-March31 2015")
    _IEFormElementSetValue($sender, $Array & "@email.com")
EndFunc   ;==>search

 

Share this post


Link to post
Share on other sites

#13 ·  Posted (edited)

_IEFormElementSetValue($exportnote, "Outbound" & $Array & "Jan1-March31 2015")

HINT: When you are using Array You should use index.

Edited by mLipok

Signature beginning:   Wondering who uses AutoIT and what it can be used for ?
* GHAPI UDF - modest begining - comunication with GitHub REST API *
ADO.au3 UDF     POP3.au3 UDF     XML.au3 UDF    How to use IE.au3  UDF with  AutoIt v3.3.14.x  for other useful stuff click the following button

Spoiler

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. 

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API *

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 - BETA * ADO.au3 UDF SMTP Mailer UDF *

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Best coding practices * 

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * 

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2017-06-04

Share this post


Link to post
Share on other sites
1 hour ago, mLipok said:
_IEFormElementSetValue($exportnote, "Outbound" & $Array & "Jan1-March31 2015")

HINT: When you are using Array You should use index.

Thank you for leading me to the answer!  This works properly if I call the For loop on the main function otherwise I get an error stating its not defined in the other functions which makes sense because the $i is not global.  Thank you again, I started learning AutoIt two weeks ago so I apologize if I missed some very basic things but greatly appreciate your help!

 

#include <IE.au3>
#include <Array.au3>

Global $Array[3]

$Array[0] = "user1"
$Array[1] = "user2"
$Array[2] = "user3"

Global $oIE = _IECreate("\\archive")

For $i = 0 to 2
    _main()
Next

Func _main()
    signin()
    _IELoadWait($oIE)
    search()

    Local $oButton = _IEGetObjByID($oIE, 'search_begin_string')
    _IEAction($oButton, 'click')

    Local $searchbutton = _IEGetObjByName($oIE, "save_results")
    _IEAction($searchbutton, "click")
    _IELoadWait($oIE)

    Local $exportnote = _IEGetObjById($oIE, "export_note")
    _IEFormElementSetValue($exportnote, "Outbound" & $Array[$i] & "Jan1-March31 2015")
EndFunc   ;==>_main

Func signin()
    ; win state sets window to maximum.
    WinSetState("Search Archive - Internet Explorer", "", @SW_MAXIMIZE)

    Local $username = _IEGetObjById($oIE, "user_username")
    Local $password = _IEGetObjById($oIE, "user_password")
    Local $loginbutton = _IEGetObjById($oIE, "user_submit")

    _IEFormElementSetValue($username, "UserName")
    _IEFormElementSetValue($password, "Password")
    _IEAction($loginbutton, "click")
EndFunc   ;==>signin

Func search()
    Local $subject = _IEGetObjById($oIE, "search_name")
    Local $sender = _IEGetObjById($oIE, "search_sender")

    _IEFormElementSetValue($subject, "Outbound" & $Array[$i] & "Jan1-March31 2015")
    _IEFormElementSetValue($sender, $Array[$i] & "@email.com")
EndFunc   ;==>search

 

Share this post


Link to post
Share on other sites

#15 ·  Posted (edited)

Declare your funcs with params: {example: Func signin($sUser, $Pass)}
and call it with the params and it would work. 

Btw.: where are your passwords stored?

Edited by AutoBert

Share this post


Link to post
Share on other sites
12 hours ago, AutoBert said:

Btw.: where are your passwords stored?

Thank you for the tip on declaring the functions.

There are no passwords stored.  In the signin function the defined value for username and password is static because with the cabinet admin account we have access to everything by only defining the email address in the search.

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

  • Similar Content

    • Valnurat
      By Valnurat
      Hi.
      A user have to be a member of specific groups. If the user is a member of 1 of the below groups it has to a member of "Mailuser_". If not then I need to add user to the "Mailuser_".
      But how can I search in the array. In the code I do If...then, but it will just jump to my next if...then and search in that "index". But that is not what I want. It seems that I have to do a new For...To, right? But there have to be a easier way to do this.
       
      Func FindADInfo() Local $sUsersSource, $sBackupFolder, $sSiteHomePath, $sFileOpenDialog Local $aSamAccountName[1][1], $aTempSamAccountName[1] For $i = 0 to UBound($aAllMailSites) - 1 if $aAllMailSites[$i] <> "" then if $bDebugMode Then ConsoleWrite("Collecting AD info for " & StringRight($aAllMailSites[$i], 2) & StringMid($aAllMailSites[$i], StringInStr($aAllMailSites[$i], ",") - 2, 2) & @CRLF) Else _FileWriteLog($hFile, "Collecting AD info for " & StringRight($aAllMailSites[$i], 2) & StringMid($aAllMailSites[$i], StringInStr($aAllMailSites[$i], ",") - 2, 2)) EndIf $aSamAccountName = _AD_GetObjectsInOU($aAllMailSites[$i] & ",OU=company,DC=AD,DC=company,DC=ORG", "(&(objectcategory=person)(objectclass=user))",2, "sAMAccountName,distinguishedName,displayname", "displayname") _ArrayDelete($aSamAccountName, 0) for $x = 0 to UBound($aSamAccountName) -1 if StringInStr($aSamAccountName[$x][1],"Resources") = 0 Then local $aUserGroups = _AD_GetUserGroups($aSamAccountName[$x][1]) _ArrayDisplay($aUserGroups,$aSamAccountName[$x][0]) if IsArray($aUserGroups) Then for $y = 1 to UBound($aUserGroups) -1 ;MsgBox(0,"",$aUserGroups[$y]) If StringInStr($aUserGroups[$y],"Office365_E3_SharedMailBox") <> 0 Or StringInStr($aUserGroups[$y],"Office365_E3_OPP_EXO_SPO") <> 0 Or StringInStr($aUserGroups[$y],"Office365_E3_OPP_EXO_SFBPLUS") <> 0 Or StringInStr($aUserGroups[$y],"Office365_E3_OPP_EXO_SFB") <> 0 Or StringInStr($aUserGroups[$y],"Office365_E3_OPP") <> 0 Or StringInStr($aUserGroups[$y],"Office365_E3_FULL") <> 0 Or StringInStr($aUserGroups[$y],"Office365_E1_EXO") <> 0 Then If StringInStr($aUserGroups[$y],"Mailuser_") = 0 Then ConsoleWrite($aSamAccountName[$x][0] & " Add to mailgroup") EndIf EndIf Next EndIf EndIf Next EndIf Next EndFunc ;==>FindADInfo  
    • VaishnaviBUtpat
      By VaishnaviBUtpat
      <!DOCTYPE html> <html lang="en" xml:lang="en" style="height: 100%;" xmlns="http://www.w3.org/1999/xhtml"> <head> <title></title> <style> * { margin: 0; padding: 0; } .th-lk { color: #3665d0; font-family: Arial; font-size: small; text-decoration: none; } .th-lk { vertical-align: 0px; } .th-menu2 .th-lk { line-height: 2em; margin-bottom: 0px; margin-right: 0px; overflow: hidden; padding: 0; text-decoration: none; text-overflow: ellipsis; white-space: nowrap; width: 100%; } .th-menu2 .th-lk { color: black; font-weight: bold; } .th-menu2 > li > .th-lk { display: block; padding-left: 8px; width: auto; } .th-menu2 .th-menu2-sub-item .th-lk, .th-menu2 .th-menu2-sub-item-hov .th-lk { margin-right: 20px; } .th-menu2-sub-item { position: relative !important; } .th-menu2 .th-menu2-item, .th-menu2 .th-menu2-item-hov, .th-menu2 .th-menu2-sub-item, .th-menu2 .th-menu2-sub-item-hov { background-repeat: repeat-x; border-left-style: solid; border-left-width: 1px; border-right-style: solid; border-right-width: 1px; border-top-style: solid; border-top-width: 1px; height: 2em; list-style: none; margin-bottom: 0px; padding: 0; width: 100%; } .th-menu2 .th-menu2-item, .th-menu2 .th-menu2-item-hov, .th-menu2 .th-menu2-sub-item, .th-menu2 .th-menu2-sub-item-hov { background-color: #ECECEC; background-image: url(sap_skins/default/styling/lshape/chg_butt_det_nav.gif); border-left-color: #d3d1ce; border-right-color: #d3d1ce; border-top-color: #d3d1ce; border-top-width: 0px; } .th-menu2 { border: 0 solid black; left: 0px; list-style: none; margin: 0; padding: 0; position: relative; } .th-menu2 { z-index: 10006; } .th-menu2 { background-color: white; } div { zoom: 1; } .th-sc-content { left: 0px; position: absolute; top: 0px; } .th-sc-container { left: 0px; overflow: hidden; position: relative; top: 0px; } .th-sc-top { position: relative; } .th-sc-top, .th-sc-content, .th-sc-container, .th-sc-buttondown, .th-sc-buttonup { width: 172px; } .th-sc-buttonup, .th-sc-container { z-index: 10101; } .th-sc-top { z-index: 10100; } body, td, th { font-family: Arial,Helvetica,sans-serif; font-size: small; } .th-l-navcontainer, .th_l_downcontainer { border-right-style: solid; border-right-width: 1px; width: 172px; } .th-l-navcontainer, .th_l_downcontainer { background-color: white; border-right-color: #d3d1ce; } body, html { margin: 0px; border: 0; margin: 0; } </style> </head> <body><form name="myFormId" id="myFormId" action="/sap(ZT1TVVJEWDFWVFVsOWZYMTlmTWpNNU9UWmZXWTlwZG5telZ1RGhBSUFBQ3Nyc2tBPT0=)/bc/bsp/sap/crm_ui_frame/BSPWDApplication.do?sap-client=100&amp;sap-language=EN&amp;sap-domainrelax=min" method="post" target="WorkAreaFrame2"><div class="th-ajax-area" id="rootAreaDiv"><div id="C1_W1_V2" tgt="" dhe="false"><table width="100%" style="table-layout: fixed;" cellspacing="0" cellpadding="0"><tbody><tr><td><table width="100%" style="table-layout: fixed;" cellspacing="0" cellpadding="0"><tbody><tr valign="top"><td class="th-l-navcontainer" id="th_l_navcontainer"><div class="th-sc-top" id="C1_W1_V2_thescroll" style="height: 786px;"><div class="th-sc-container" id="C1_W1_V2_thescroll_scbox" style="height: 786px;"><div class="th-sc-content" id="C1_W1_V2_thescroll_sccontent"><div class="th-ajax-area" id="C1_W1_V2_$navbar"><div id="C7_W35_V36" tgt="" dhe="true" excevt="" intevt="c:C7_W35_V36:C1_W1_V2_C7_W35_V36_MainNavigationLinks.do;" automode="true"><div class="th-ajax-area" id="C1_W1_V2_C7_W35_V36_MainNavigationLinks.do"><ul class="th-menu2" id="C7_W35_V36_mainmenu" style="width: 171px;"><li class="th-menu2-sub-item"><a title="Sales Cycle" class="th-lk" id="C7_W35_V36_UTL-SLS" onclick="htmlbSubmitLib('htmlb',this,'thtmlb:link:click:0','myFormId','C7_W35_V36_UTL-SLS','UTL\x2dSLS\x2dWC',0);return false" onfocus="thSaveKbFocus(this);" oncontextmenu="return false;" href="javascript:void(0)">Sales Cycle</a></li></ul></div></div></div></div></div></div></td></tr></tbody></table></td></tr></tbody></table></div></div></form></body> </html> How to capture above HTML element using AutoIT
    • cu0x
      By cu0x
      Hello guys,
       
      im trying to solved a problem that I have.
       
      Need to get some chinese text from an old Wise script, and in the wise file says f.e. Ù×÷ϵͳ¡£ ÇëÉý¼¶Ä. Is there any way to convert it to traditional chinese?
       
      Already tryied the following code...
       
      #include <MsgBoxConstants.au3> Example() Func Example() ; Define the string that will be converted later. ; NOTE: This string may show up as ?? in the help file and even in some editors. ; This example is saved as UTF-8 with BOM. It should display correctly in editors ; which support changing code pages based on BOMs. Local Const $sString = "Ù×÷ϵͳ¡£ ÇëÉý¼¶Ä" ; Temporary variables used to store conversion results. $dBinary will hold ; the original string in binary form and $sConverted will hold the result ; afte it's been transformed back to the original format. Local $dBinary = Binary(""), $sConverted = "" ; Convert the original UTF-8 string to an ANSI compatible binary string. $dBinary = StringToBinary($sString) ; Convert the ANSI compatible binary string back into a string. $sConverted = BinaryToString($dBinary) ; Display the resulsts. Note that the last two characters will appear ; as ?? since they cannot be represented in ANSI. DisplayResults($sString, $dBinary, $sConverted, "ANSI") ; Convert the original UTF-8 string to an UTF16-LE binary string. $dBinary = StringToBinary($sString, 2) ; Convert the UTF16-LE binary string back into a string. $sConverted = BinaryToString($dBinary, 2) ; Display the resulsts. DisplayResults($sString, $dBinary, $sConverted, "UTF16-LE") ; Convert the original UTF-8 string to an UTF16-BE binary string. $dBinary = StringToBinary($sString, 3) ; Convert the UTF16-BE binary string back into a string. $sConverted = BinaryToString($dBinary, 3) ; Display the resulsts. DisplayResults($sString, $dBinary, $sConverted, "UTF16-BE") ; Convert the original UTF-8 string to an UTF-8 binary string. $dBinary = StringToBinary($sString, 4) ; Convert the UTF8 binary string back into a string. $sConverted = BinaryToString($dBinary, 4) ; Display the resulsts. DisplayResults($sString, $dBinary, $sConverted, "UTF8") EndFunc ;==>Example ; Helper function which formats the message for display. It takes the following parameters: ; $sOriginal - The original string before conversions. ; $dBinary - The original string after it has been converted to binary. ; $sConverted- The string after it has been converted to binary and then back to a string. ; $sConversionType - A human friendly name for the encoding type used for the conversion. Func DisplayResults($sOriginal, $dBinary, $sConverted, $sConversionType) MsgBox($MB_SYSTEMMODAL, "", "Original:" & @CRLF & $sOriginal & @CRLF & @CRLF & "Binary:" & @CRLF & $dBinary & @CRLF & @CRLF & $sConversionType & ":" & @CRLF & $sConverted) EndFunc ;==>DisplayResults Thanks a lot!
    • nacerbaaziz
      By nacerbaaziz
      Hi dear
      I want create retractable bar using autoit
      I tried creating slider, but there's a problem with screen reader for the blind, so is there another retractable tape?
      It is advisable to not accept dragging with the keybord only with  mouse
      note:
      This bar is needed in the process of raising and lowering the volume
      I hope that there is a solution to do that
      i waiting your responses.
      Thanks in advance to all members and administrators
    • XanzyX
      By XanzyX
      Is there a function out there that will edit an existing file witha a "Save" and "Cancel" at the bottom?
      Example: Funcrion("TestFile.txt")