Simple sign in not working?

[tprice1020]

I am trying to automate a simple sign-in to an internal corporate SSO site.  

I have tried the examples listed here and on YouTube but they fail.   Tried reading in the form as well as searching for the input object directly. Here is what I came up with...

 

#include <IE.au3>

Global $oIE = _IECreate('https://websso.dolgen.net/ssoa/default.aspx?siteid=9070', 0, 1, 0, 1)

Local $oForm = _IEFormGetObjByName($oIE,"form1")

Local $oEID = _IEFormElementGetObjByName($oForm,"Username")
Local $oInitials = _IEFormElementGetObjByName($oForm,"Initials")
Local $oPassword = _IEFormElementGetObjByName($oForm,"Password")

_IEFormElementSetValue($oEID, "1234")
_IEFormElementSetValue($oInitials, "DG")
_IEFormElementSetValue($oPassword, "1234")

 

The above errors on the $oForm declaration.  Console output:

Local $oCol = $oObject.document.forms.item($sName)

 

#include <IE.au3>

Global $oIE = _IECreate('https://websso.dolgen.net/ssoa/default.aspx?siteid=9070', 0, 1, 0, 1)

Local $oEID = _IEGetObjByName($oIE,'Username')
Local $oIntials = _IEGetObjByName($oIE,'Initials')
Local $oPassword = _IEGetObjByName($oIE,'Password')

_IEFormElementSetValue($oEID, "1234")
_IEFormElementSetValue($oInitials, "DG")
_IEFormElementSetValue($oPassword, "1234")

 

Output: If IsObj($oObject.document.GetElementsByName($sName).item($iIndex)) Then
If IsObj($oObject^ ERROR

 

I've attached the html.  Any help is appreciated.

site.txt

[tprice1020]

Also Mods, I failed to remove the URL and cannot edit/delete the post.  Could you possible edit it out?

[seadoggie01]

Hi and welcome to the forums! 👋

I would look into check for errors with the @error macro. Basically, if you call a function and it has an issue, it will usually return an error though this. Here's an example with _IECreate

#include <IE.au3>

test()

Func test()
  Local $oIE = _IECreate("www.google.com", 0, 1, 1, 1)
  If @error Then MsgBox(0, "Error", "Can't create IE object")
EndFunc

Then when I see this error, I look up _IECreate in the HelpFile to see what that particular error means

[Danp2]

You need to allow the page to load before continuing. Either change the _IECreate so that it waits for the page to load (change next to last parameter to 1) or add an _IELoadWait.

[tprice1020]

36 minutes ago, seadoggie01 said:

 

Then when I see this error, I look up _IECreate in the HelpFile to see what that particular error means

--> IE.au3 T3.0-2 Error from function _IELoadWait, $_IESTATUS_ClientDisconnected (-2147023174, Browser has been deleted prior to operation.)
"C:\Program Files (x86)\AutoIt3\Include\IE.au3" (1876) : ==> The requested action with this object has failed.:
If IsObj($oObject.document.GetElementsByName($sName).item($iIndex)) Then
If IsObj($oObject^ ERROR
>Exit code: 1    Time: 8.829

I looked in the _IECreate article in HelpFile and it looks like exit code 1 is...

1 ($_IEStatus_GeneralError) - General Error   Here is code after following your advice... #include <IE.au3> DGPreStage() Func DGPreStage() Global $oIE = _IECreate('google.com, 0, 1, 1, 1)   If @error Then MsgBox(0, "Error", "Can't create IE object") ;Local $oForm = _IEFormGetObjByName($oIE,"form1") ;Local $oTable = IETableGetCollection($oIE, "form") Local $oEID = _IEGetObjByName($oIE,'Username') Local $oIntials = _IEGetObjByName($oIE,'Initials') Local $oPassword = _IEGetObjByName($oIE,'Password') ;~ Local $oEID = _IEFormElementGetObjByName($oForm,"Username") ;~ Local $oInitials = _IEFormElementGetObjByName($oForm,"Initials") ;~ Local $oPassword = _IEFormElementGetObjByName($oForm,"Password") _IEFormElementSetValue($oEID, "1234") _IEFormElementSetValue($oInitials, "DG") _IEFormElementSetValue($oPassword, "1234") EndFunc

[tprice1020]

I also found a separate post where Danp2 recommend this..

IECreate("https://gate.opentext.com/Citrix/StoreFront-OTWeb/",0,1,0)
Sleep(2000)
$oIE = _IEAttach("gate.opentext.com", "url")
_IELoadWait($oIE)

 

My code after including this...

#include <IE.au3>

DGPreStage()

Func DGPreStage()

_IECreate('google.com', 0, 1, 1, 1)
Sleep(2000)
Local $oIE = _IEAttach('google.com', 'url')
_IELoadWait($oIE)

If @error Then MsgBox(0, "Error", "Can't create IE object")
;Local $oForm = _IEFormGetObjByName($oIE,"form1")
;Local $oTable = IETableGetCollection($oIE, "form")

Local $oEID = _IEGetObjByName($oIE,'Username')
Local $oInitials = _IEGetObjByName($oIE,'Initials')
Local $oPassword = _IEGetObjByName($oIE,'Password')

_IEFormElementSetValue($oEID, "1234")
_IEFormElementSetValue($oInitials, "DG")
_IEFormElementSetValue($oPassword, "1234")

EndFunc

This successfully input the text into the textboxes without triggering the error box.  Very appreciative of the two of you for your responses and your help.