Thursday

simple Login setting UID PWD based on URL in Global sheet

startURL = Cstr(DataTable.Value("url", dtGlobalSheet))
set InternetExplorer = CreateObject("InternetExplorer.Application")
InternetExplorer.Visible = true
InternetExplorer.Navigate startURL

If DataTable("username",dtGlobalSheet)<>"" and DataTable("LoginIndicator",dtGlobalSheet)=2 Then

If Browser("Browser").Dialog("XYZ").Exist Then

Browser("Browser").Dialog("XYZ").Activate
Browser("Browser").Dialog("XYZ").WinEdit("User name").Set Datatable("username",dtGlobalSheet)
wait(4)
Browser("Browser").Dialog("XYZ").WinEdit("Password").Set Datatable("password",dtGlobalSheet)
Browser("Browser").Dialog("UAT_Login_Pop_Up").WinButton("OK").Click
Environment.Value("TransactionStratTime")=Timer
Environment.Value("SecondTransactionStratTime")=Timer
End If

'windprop=Browser("Browser").GetROProperty("hwnd")
'Window("hwnd:="& windprop).Maximize
'
End If