如何從webbrowser之innerhtml以存取物件方式來讀取資料 |
答題得分者是:Clarinet
|
vbkiller
一般會員 發表:65 回覆:28 積分:18 註冊:2007-03-13 發送簡訊給我 |
底下是我的webbrowser之innerhtml,
1.我如何以存取物件方式讀取 VITAMIN B12 S.C. TABLETS "CHINTENG" | 裡面的 VITAMIN B12 S.C. TABLETS "CHINTENG" 500 MG 裡面的500 MG 2若無資料如這行 又如何事先判斷有無資料呢? 這裡是我的webbrowser之innerhtml: 健保用藥品項查詢-清單
編輯記錄
dllee 重新編輯於 2007-04-21 19:10:45, 註解 修改文章分類由 無 -> 問題, 提問時, 請記得選擇 [問題] 分類, 才能把分數給辛苦答題的會員, 謝謝您的配合‧‧
| |||||||||||||||||||||||||||||||
lackey
一般會員 發表:2 回覆:6 積分:1 註冊:2007-04-09 發送簡訊給我 |
|||||||||||||||||||||||||||||||||
vbkiller
一般會員 發表:65 回覆:28 積分:18 註冊:2007-03-13 發送簡訊給我 |
|||||||||||||||||||||||||||||||||
lackey
一般會員 發表:2 回覆:6 積分:1 註冊:2007-04-09 發送簡訊給我 |
|||||||||||||||||||||||||||||||||
Clarinet
高階會員 發表:9 回覆:97 積分:126 註冊:2002-05-08 發送簡訊給我 |
|||||||||||||||||||||||||||||||||
mytion
一般會員 發表:0 回覆:4 積分:0 註冊:2011-01-05 發送簡訊給我 |
IHTMLDocument2和那個IHTMLElement,if條件判斷加上for循環
[code delphi] var hDoc: IHTMLDocument2; FDIV: IHTMLElement; Doc, OVElements, ovLinks, ovAny: OleVariant; begin if (LoginWeb.Busy) or (LoginWeb.Document = nil) then Exit; ovLinks := LoginWeb.OleObject.Document.all.tags('a'); if ovLinks.Length > 0 then begin for i := 0 to ovLinks.Length - 1 do begin if pos('void(0);', ovLinks.Item(i).href) > 0 then begin ovLinks.Item(i).Click; break; end; end; end; end; [/code] [code delphi] ovAny:=LoginWeb.Document; for i:=0 to ovAny.all.length-1 do begin if ovAny.all.item(i).tagname = 'SELECT' then begin if uppercase(ovAny.all.item(i).name) = 'FITTYPE' then begin ovAny.all.item(i).value := IntToStr(ComboBox1.ItemIndex 1); end; end; end;[/code] |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |