麻煩各位一個問題,
我用inet要將網路上的檔案抓回來,放在某個temp目錄下
使用的方式如下:
Dim temparray() As Byte
  Dim destpath As String
  destpath = "c:\temp\temp.pdf"
  Inet1.Cancel
  Inet1.Protocol = icHTTP
  Inet1.URL = Text1.Text
  temparray() = Inet1.OpenURL(Text1.Text, icByteArray)
  Open destpath For Binary Access Write As #1
  Put #1, , temparray()
  Close #1
其中text1我是使用oledragdrop的方式,將網頁上的檔案用拖放的方式,告訴inet1.url的路徑名稱,如下
Text1.Text = Data.GetData(vbCFText)
但是我在使用的時候,無法將網頁上放在SQL的檔案抓回來ㄝ,其實是有download下來,但是不論檔案多大,只有10K抓下來,而只要不是在SQL中的檔案,都可以download回來,也就是
當text1.text="http://xxx.xxx.xxx.xx/test.pdf"可以完全抓回,
若當text1.text="http://xxx.xxx.xxx.xx/testfiles.asp?TXfiletypeno=3&name=test.pdf"就只能抓下10K而已
(其中SQL資料庫是用ASP方式上傳所建立的)
所以得請教各位,是否我有忽略的地方,或是我有觀念不正確之處,請大家幫我思考一下,感謝各位....還在努力學習VB的小D
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(2) 人氣()