Set oIE = CreateObject("InternetExplorer.Application") 'get the IE Object
oIE.Visible = True 'set is visible
oIE.Navigate "http://www.2345.com/?kq866383" 'to this url
While oIE.Busy 'wait the IE to loadingWEnd
该代码利用IE的COM对象,打开IE,然后导航到指定的页面,等待IE加载页面完毕