请各位大侠帮解决一下，如何用编程方式自动登录百度？
kkurl= "http://tieba.baidu.com/index.html"
 *使用者名称
sUser = "asd"
 *使用者密码
sPwd = "asd"   
IE = CreateObject("InternetExplorer.application")
 IE.Navigate(kkurl)
 IE.Visible = .t.
 Do While IE.ReadyState <> 4
 DoEvents
 Loop
 ENDDO
IE.document.all.userName.value = sUser
IE.document.all.password.value = sPwd
 
怎么自动点“登录”，登录百度?