Friday, April 17, 2009

IE DOM Usage

'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: