請教各位先進如何使用WebBrowser填入 input type=file 的值 |
|
尚未結案
|
|
mickey56
一般會員   發表：4 回覆：7 積分：2 註冊：2002-04-18 發送簡訊給我 |
小弟遇到個問題希望大家幫幫我!!
使用WebBrowser填入其他Edit資料都可以
例如:
Edits:=WebBrowser1.OleObject.Document.all.Item ('Edit',0);
Edits.Value := 'ABC';
但是遇到 TYPE=file時執行,可以通過,(也可拆解網頁資料,找的到它的類別名稱)但是卻無法填入相關資料,請問有人可以告訴我如何填入資料嗎?
我想做的是自動填入上傳檔案,自動上傳,所以要能自動填入
<input type='file' name='file1' class='tx1' size='20'>
謝謝!!
|
|
I_Love_You
一般會員 發表：18 回覆：87 積分：21 註冊：2002-07-24 發送簡訊給我 |
|
|
mickey56
一般會員 發表：4 回覆：7 積分：2 註冊：2002-04-18 發送簡訊給我 |
引言: 请参考qoo1234大大提供的范例 http://delphi.ktop.com.tw/topic.php?topic_id=53588謝謝你的回應,但是我已經參照並實作有關於他們的做法,但問題仍然沒辦法解決! 首先我提供我的實驗程式讓您參考一下 HTM的部分 <body> <form method="POST" enctype="multipart/form-data"> <input type="file" name="F1" size="20"><br /> </form> </body> 而我只是要用程式先行輸入完整檔案路徑名稱,一般type="text"當然是可以,但它是type="file",所以我搞不定,我也寫了一個實驗程式如下: WebBrowser1.Navigate(Edit2.Text); while Webbrowser1.ReadyState <> READYSTATE_COMPLETE do Application.ProcessMessages; Edits:=WebBrowser1.OleObject.Document.all.Item ('file1',0); Edits.Value := 'c:\boot.ini'; <------沒有結果 Edits:=WebBrowser1.OleObject.Document.all.Item ('filenum',0); Edits.Value := '2'; <----type=text 所以OK Edits :=WebBrowser1.OleObject.Document.all.Item ('Button',0); Edits.Click; <----Buttom.OnClick 也OK 我也將其所有 WebBrowser的資料一一列示出來,但找不個所以然........ Memo1.Lines.Clear; Memo1.Lines.Add('WebBrowser.OleObject.Document.documentElement.innerText: ' WebBrowser1.OleObject.Document.documentElement.innerText); //底下有列出一堆資料 for H:=0 to WebBrowser1.OleObject.Document.all.length-1 do begin Edits:=WebBrowser1.OleObject.Document.all.Item(H); Memo1.Lines.Add('ALL[' IntToStr(H) ']' ' Text: ' Edits.InnerText); end; // 沒有Frame 所以沒資料 for H:=0 to WebBrowser1.OleObject.Document.Frames.length-1 do begin Edits:=WebBrowser1.OleObject.Document.Frames.Item(H); Memo1.Lines.Add('Document.Frames[' IntToStr(H) ']'); end; // 沒有 Link 所以沒資料 for H:=0 to WebBrowser1.OleObject.Document.Links.length-1 do begin Edits:=WebBrowser1.OleObject.Document.Links.Item(H); Memo1.Lines.Add('Document.Links.href: ' Edits.href '|' Edits.TagName); end; 再接下來該如何分析及拆解WebBrowser 才能先行填入資料,還請大家幫忙!! |
|
malanlk
尊榮會員  發表：20 回覆：694 積分：577 註冊：2004-04-19 發送簡訊給我 |
|
|
Clarinet
高階會員 發表：9 回覆：97 積分：126 註冊：2002-05-08 發送簡訊給我 |
引言: ......恕刪小弟遇到個問題希望大家幫幫我!! input type='file' 這個的Value是 read-only，因為有安全性的問題，所以不能由此來指定值。 目前想到的解決方式是透過模擬按鍵的方式，來達到填入值。 一、直接填入其Edit欄位 二、或者模擬按下"瀏覽"按鈕，再填入或選取裡面的內容 你可參考看看。 GPS（全球衛星定位系統） http://www.allgps.com
------
GPS（全球衛星定位系統） http://www.allgps.com |
|
malanlk
尊榮會員 發表：20 回覆：694 積分：577 註冊：2004-04-19 發送簡訊給我 |
|
|
Ktop_Robot
站務副站長 發表：0 回覆：3511 積分：0 註冊：2007-04-17 發送簡訊給我 |
發表時間：2004-12-24 15:14:20
IP:222.76.xxx.xxx 未訂閱
系統時間：2024-05-02 8:07:48
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |