import win; //必須首先導入win窗口支持庫 import win.ui; import web; import inet.http; /*DSG{{*/ var winform = win.form(parent=...; min=1;bottom=465;max=1;text="AAuto Form";right=686;scroll=1 ) winform.add( ) /*}}*/ //創建web窗體 var wb = web(winform,web.UIFLAG_NO3DBORDER/*無邊框*/ /*,web.DLCTL_NO_SCRIPTS禁用腳本*/ ) wb.go("http://ui.ptlogin2.qq.com/cgi-bin/login?link_target=blank&appid=15000101&hide_title_bar=1&no_verifyimg=1&s_url=http%3A%2F%2Fimgcache.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3fpara%3dizone&f_url=loginerroralert&target=top&qlogin_jumpname=jump&ptcss=0#1280797312671_1280797312890") //顯示窗體 winform.show(true) wb.wait("ptlogin2");//等待指定網址,可以使用模式匹配語法 zh="QQ號" mm="你的密碼" wb.wait() /* http = inet.http() winform.picturebox.image = http.down("http://captcha.qq.com/getimage") http.close(); */ //有時會出現驗證碼，上面是顯示方式。一般情況。可直接登陸 ele=wb.getEle("u") //獲取網頁節點 - 輸入用戶名的文本框 if(ele){ele.setAttribute("value",zh) } //自動填寫用戶名 wb.wait() ele=wb.getEle("p") //獲取網頁節點 - 輸入密碼的文本框 if(ele){ele.setAttribute("value",mm) } //自動填寫密碼 wb.wait() win.delay(1000) ele=wb.getEle("login_button") //獲取提交按鈕 if(ele){ ele.click() } //自動點擊提交按鈕 //進入消息循環 win.loopMessage(); return wb,winform;
http://www.ecranesoft.com/bbs/showtopic-8524.aspx
