[opentwebst]一个简单的登陆脚本

这个是个简单的vbs脚本，使用opentwebst进行录制

 'Use the command line below to launch the script (or just double click the .vbs file):
 ' %windir%\system32\wscript.exe TwebstScript.vbs

 Option Explicit
 Dim core
 Dim browser
 Dim browser2
 Set core    = CreateObject("OpenTwebst.Core")
 Set browser = core.StartBrowser("http://127.0.0.1/logain.php")

 Call browser.FindElement("input text", "id=SYSUSERNAME").InputText("")
 Call browser.FindElement("input password", "id=PASSWORD").InputText("password")
 Call browser.FindElement("input button", "name=go").Click()
 Call WScript.Sleep()
 set  browser2 = core.findBrowser("url=http://127.0.0.1/main/*")
 Call browser2.FindElement("img", "id=Image0").Click()

第二段内容是进入系统之后的新网页操作,点击一个id为image0的图标，进入代办事宜

https://v.youku.com/v_show/id_XMjc2Mjg3NDM4MA.html