一个人www在线视频免费看,国产精品久久久av久久久

VB用inet控件怎樣才能不讀取緩存連接網(wǎng)絡(luò)上的文件？

當(dāng)前位置：點(diǎn)晴教程→知識管理交流 →『技術(shù)文檔交流』

admin

2014年2月24日 17:33 本文熱度 6517

我用inet控件建立了一個(gè)連接，連接過一次之后就會(huì)產(chǎn)生了緩存，下次再連接時(shí)它會(huì)先讀取緩存的內(nèi)容，這樣得到的內(nèi)容就是舊的了，而我想要的是不管有無連接過，都是連接到遠(yuǎn)程讀取遠(yuǎn)程的相關(guān)內(nèi)容，這要怎么實(shí)現(xiàn)？

該文章在 2014/2/24 17:33:30 編輯過

全部評論1

admin

2014年2月24日 17:34

方法1.
對URL進(jìn)行更改，讓它每次訪問不同的URL但指向相同的頁面。
可在URL結(jié)尾添加一些無意義的參數(shù)：http://www.86lg.com/?abc=1
你可以用rnd生成隨機(jī)數(shù)實(shí)現(xiàn)，簡單。

方法2.

Visual Basic code

'下載文件

Public Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

'清除緩存

Public Declare Function DeleteUrlCacheEntry Lib "wininet" Alias "DeleteUrlCacheEntryA" (ByVal lpszUrlName As String) As Long

Public Function DownloadFile(Url As String, LocalFilename As String) As Boolean

Dim lngRetVal As Long

lngRetVal = URLDownloadToFile(0, Url, LocalFilename, 0, 0)

If lngRetVal = 0 Then

DownloadFile = True

DeleteUrlCacheEntry Url '清除緩存

End If

End Function

使用方法:

DownloadFile "http://www.baidu.com/img/lm.gif", App.Path & "\lm.gif"

該評論在 2014/2/24 17:34:16 編輯過

關(guān)鍵字查詢