on error resume next url = " http://www.bathome.net/logging.php?action=login" username = "***" password = "***" set ie = CreateObject("InternetExplorer.Application") ie.visible = true ie.Navigate url,4 ' " http://www.baidu.com" do until 4=ie.readyState     WScript.sleep 200     waittime  = waittime + 200     if waittime > 15000 then exit do loop 'WScript.echo waittime if 4<>ie.readyState then     ie.quit     WScript.quit end if set dom = ie.document set form = dom.getElementById("loginform") form.all("username").value = username form.all("password").value = password form.all("cookietime").checked = true form.all("loginsubmit").click()