請問:如何下載PDF? 連結有點特別(含有 javascript的<a>連結)
- 帖子
- 17
- 主題
- 3
- 精華
- 0
- 積分
- 33
- 點名
- 0
- 作業系統
- XP SP3
- 軟體版本
- Office 2007
- 閱讀權限
- 10
- 性別
- 男
- 註冊時間
- 2011-4-30
- 最後登錄
- 2012-12-21
|
請問:如何下載PDF? 連結有點特別(含有 javascript的<a>連結)
我想要做自動下載的網址有點特別(含有javascript的<a>連結)，如附圖。
因為使用以下程式碼、可以打開 DOC 檔案，
但不知道為什麼，並不能開啟PDF的網頁連結。因為打開連結後才能再按右鍵，另存新檔。
請問大大，該如何做才好? 謝謝!!- Sub Test()
- Set IE = CreateObject("InternetExplorer.Application")
- IE.Navigate ("http://doc.twse.com.tw/server-java/t57sb01?step=1&colorchg=1&co_id=3013&year=99&mtype=F&")
- IE.Visible = True
- searchText = "2010_3013_20100609F02.pdf"
- Do While IE.ReadyState <> 4
- Loop
- countLinks = IE.Document.Links.Length
- For i = 0 To countLinks - 1
- currentText = IE.Document.Links(i).innerText
- If currentText Like searchText Then
- oldURL = IE.LocationURL
- Debug.Print i, oldURL
- IE.Document.getElementsByTagName("a").Item(i).Click
- Do While oldURL = IE.LocationURL
- ' javascript:readfile2("F","3013","2010_3013_20100609F02.pdf");
- Loop
- i = countLinks
- End If
- Next
- End Sub
|
|
|
|
|
|
|
|
發表於 2011-4-30 03:57
| 
