jimmyhk

有一點問題,
我現在看到其中一個網站的原碼如下:Cancel 是有 name 的, 這個我可以使用.
但 Login 沒有 ...
jimmyhk 發表於 2011-10-6 21:18

有人遇過嗎?

Hsieh

回復 11# jimmyhk


    這是表單送出
必須使用submit方法
所以你要以該表單做submit

jimmyhk

回復  jimmyhk


    這是表單送出
必須使用submit方法
所以你要以該表單做submit
Hsieh 發表於 2011-10-10 09:14

如果咁講即係冇得做?

Hsieh

回復 13# jimmyhk

發言請用普通話
以經濟部的滿意度調查表為例

1. Dim MyIe As InternetExplorer, MyDoc As HTMLDocument
   
2. Sub CommandButton2_Click()  '開啟問卷
   
3. Set MyIe = CreateObject("InternetExplorer.Application")
   
4. With MyIe
   
5. .Visible = True
   
6. .navigate "http://www.moeasmea.gov.tw/ap.asp?xdURL=sVote/vote01.asp&subjectId=9211&ctNode=654"
   
7. Do Until .readyState = READYSTATE_COMPLETE: Loop
   
8. DoEvents
   
9. Set MyDoc = .document
   
10. End With
    
11. End Sub
    
12. 
    
13. Private Sub CommandButton1_Click()  '送出問卷前請先填完問卷在按此鍵做送出動作
    
14. With MyDoc
    
15. .all("form1").submit
    
16. MsgBox "問卷調查表已送出"
    
17. End With
    
18. MyIe.Quit
    
19. Set MyIe = Nothing
    
20. Set MyDoc = Nothing
    
21. End Sub

複製代碼

jimmyhk

回復 14# Hsieh


對不起, 一時手快就打了口語.

因為在街外不能連接內聯網,
明天回到公司試試用 submit  .

謝謝