- 帖子
- 57
- 主題
- 14
- 精華
- 0
- 積分
- 73
- 點名
- 0
- 作業系統
- win8.1
- 軟體版本
- office2010
- 閱讀權限
- 20
- 註冊時間
- 2015-4-2
- 最後登錄
- 2019-6-17
|
[發問] 無法在網頁輸入日期資料,應該如何修正代碼呢?
各位前輩們,大家好:
目前遇到的問題是:『自己設定一個日期(如20150522)並填入該網頁的資料日期欄位,結果卻是變成空白,網頁無法顯示我輸入的內容裡面。』
想請問代碼應該如何修正,才能解決這個問題?
期望各位前輩們能出手相救... 感謝!
代碼如下:- Sub Ex()
- my_url = "http://www.tdcc.com.tw/smWeb/QryStock.jsp"
- With CreateObject("InternetExplorer.Application")
- .Visible = True
- .navigate my_url
- Do While .Busy Or .readyState <> 4: DoEvents: Loop
- With .document
- For Each A In .getElementsByTagName("SELECT")
- If A.Name = "SCA_DATE" Then A.Value = "20150522"
- Next
- End With
- .Quit
- End With
- End Sub
複製代碼 |
|