懶惰鬼自動登入器 - (利用 Delphi 控制網頁的 Demo) |
|
careychen
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:41 回覆:580 積分:959 註冊:2004-03-03 發送簡訊給我 |
本程式的來源以及起頭是由 pceyes 前輩所發表的 懶惰鬼帳號密碼填入器
因前輩看到在站裡常有同好們問起相關的問題,但似乎都沒有一個完整的解答,所以決定發一個較完整的 Solution 來解決大部份的問題,謝謝 pceyes 前輩,小弟代為整理了一下 目前站上大部份的問題如下: 請問如何在delphi中做web的連結 怎樣讀取javascript的返回值? 如何達到網頁按鈕 .CLICK的動作(非submit),或執行java函數 如何利用BCB程式在網頁上的文字欄位填入字串的值 請問如何在網頁中自動填入資料? 如何列出所有已開啟的網頁? 如何取得網頁的原始程式碼? 如何填資料後自動按下Submit? 如何執行網頁上的 JavaScript ? 如何執行 Script 後,取回執行內容? 列出網頁內所使用到的 JavaScript 說明: 1、程式內的 IWeb 變數 等於使用元件 TWebBrowser ,所以相關的屬性、事件可以對應著看 2、本程式中大部份的註解是寫在 frm_PostEdit 中,而 frm_AutoLogin 程式碼類似註解較少 本程式希望可以解決大部份同好們對於這方面的問題, 當然.........有懶惰鬼想用這個自動登入器的,也非常歡迎哦~~! 最後如對程式有建議的先進們,也歡迎告知小弟,這邊也會一起整理起來
------
價值的展現,來自於你用哪一個角度來看待它!! 編輯記錄
careychen 重新編輯於 2008-09-11 23:27:11, 註解 修正 Bug‧
|
pceyes
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:70 回覆:657 積分:1140 註冊:2003-03-13 發送簡訊給我 |
|
careychen
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:41 回覆:580 積分:959 註冊:2004-03-03 發送簡訊給我 |
|
mybanksoft
初階會員 ![]() ![]() 發表:8 回覆:37 積分:29 註冊:2007-12-25 發送簡訊給我 |
果然好用,謝謝您的付出。
------
努力學習Rave
編輯記錄
mybanksoft 重新編輯於 2009-08-04 19:01:12, 註解 無‧
mybanksoft 重新編輯於 2009-08-18 09:35:37, 註解 無‧ mybanksoft 重新編輯於 2009-08-20 14:41:54, 註解 無‧ |
TWY
高階會員 ![]() ![]() ![]() ![]() 發表:2 回覆:133 積分:152 註冊:2009-09-02 發送簡訊給我 |
感謝 careychen 的分享。
我定時會上某投資網頁更新自己績效,由於部分技術無法突破所以頂多對網頁用 Ctrl A => Ctrl C 然後 Delphi 程式解讀內容... 如今全部動作都可以改成程式自動化了! 另外補充回饋,在我的電腦 IE8 無法抓到 JavaScript 回傳值,原本碼如下 [code delphi] Result := win.ExecScript('_Add(1,2)', Olelanguage); [/code] 改成下面這樣就可以了,給有需要的人參考。 [code delphi] vReturn := WebBrowser1.OleObject.document.parentWindow._Add(1,2); [/code]
編輯記錄
TWY 重新編輯於 2009-09-10 14:59:34, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |