全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1102
推到 Plurk!
推到 Facebook!

如何启用非本网页的函数调用?

答題得分者是:jeff377
tzjwj
一般會員


發表:28
回覆:30
積分:11
註冊:2005-05-09

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-06-20 17:02:21 IP:61.153.xxx.xxx 未訂閱
在网页中有以下代码 SELECT "change_type_name('Type_name','COMPANY_CODE')" name=COMPANY_CODE 我使用以下命令,执行无效: ExecuteScript(WebBrowser1.document as IHTMLDocument2, change_type_name('Type_name','COMPANY_CODE')",'JavaScript'); 后来查看html代码发现change_type_name不在此网页内,因此不能使用上述进行更新。 请问此网页内函数到底是哪里来的,其类型是什么?如何启用?
tzjwj
一般會員


發表:28
回覆:30
積分:11
註冊:2005-05-09

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-06-21 08:43:07 IP:61.153.xxx.xxx 未訂閱
ExecuteScript函数代码如下,当script在网页内时,调用正确: function ExecuteScript(doc: IHTMLDocument2; script, language: string): Boolean; var win: IHTMLWindow2; Olelanguage: Olevariant; begin if doc <> nil then begin try win := doc.parentWindow; if win <> nil then begin try Olelanguage := language; win.ExecScript(script, Olelanguage); finally win := nil; end; end; finally doc := nil; end; end; result:=true; end; 怀疑该函数非script类型。
tzjwj
一般會員


發表:28
回覆:30
積分:11
註冊:2005-05-09

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-06-21 09:58:39 IP:61.153.xxx.xxx 未訂閱
网页内存在此script引用: 《script language="JavaScript" src="addbycompany.js"》《/script》 在webbrowser鼠标人工点击,可以正常调用
tzjwj
一般會員


發表:28
回覆:30
積分:11
註冊:2005-05-09

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-06-21 11:03:44 IP:61.153.xxx.xxx 未訂閱
查看了addbycompany.js,发现存在change_type_name函数, 请问如何调用引用的addbycompany.js内的change_type_name函数
jeff377
初階會員


發表:9
回覆:60
積分:33
註冊:2004-08-10

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-06-29 13:57:11 IP:61.56.xxx.xxx 未訂閱
我猜你應該是要去模擬user在網頁上的操作,如在Select控件中選用了指定的項目,而解發對應的Script。 如果是這樣的話,我建議你直接模擬user操作,取的Select控件,並執行它的onchange()即可執行此需求。
系統時間:2024-06-26 23:35:12
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!