'Use IE DOM to create a IE obejct and login
Function Login()
Set IE = CreateObject ("InternetExplorer.Application")
IE.Visible = True
IE.Navigate2 URL
End Function
*********************************************************************
'Wait till the browser is busy with page loading, used for synchornization
Function bBusy()
Do
' wait(1)
Loop while IE.Busy = TRUE
End Function
No comments:
Post a Comment