&

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

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

admin

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

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

該文章在 2014/2/24 17:33:30 編輯過(guò)

全部評(píng)論1

admin

2014年2月24日 17:34

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

該評(píng)論在 2014/2/24 17:34:16 編輯過(guò)

關(guān)鍵字查詢

相關(guān)文章

正在查詢...

點(diǎn)晴ERP是一款針對(duì)中小制造業(yè)的專(zhuān)業(yè)生產(chǎn)管理軟件系統(tǒng),系統(tǒng)成熟度和易用性得到了國(guó)內(nèi)大量中小企業(yè)的青睞。

點(diǎn)晴PMS碼頭管理系統(tǒng)主要針對(duì)港口碼頭集裝箱與散貨日常運(yùn)作、調(diào)度、堆場(chǎng)、車(chē)隊(duì)、財(cái)務(wù)費(fèi)用、相關(guān)報(bào)表等業(yè)務(wù)管理，結(jié)合碼頭的業(yè)務(wù)特點(diǎn)，圍繞調(diào)度、堆場(chǎng)作業(yè)而開(kāi)發(fā)的。集技術(shù)的先進(jìn)性、管理的有效性于一體，是物流碼頭及其他港口類(lèi)企業(yè)的高效ERP管理信息系統(tǒng)。

點(diǎn)晴WMS倉(cāng)儲(chǔ)管理系統(tǒng)提供了貨物產(chǎn)品管理,銷(xiāo)售管理,采購(gòu)管理,倉(cāng)儲(chǔ)管理,倉(cāng)庫(kù)管理,保質(zhì)期管理,貨位管理,庫(kù)位管理,生產(chǎn)管理,WMS管理系統(tǒng),標(biāo)簽打印,條形碼,二維碼管理,批號(hào)管理軟件。

點(diǎn)晴免費(fèi)OA是一款軟件和通用服務(wù)都免費(fèi)，不限功能、不限時(shí)間、不限用戶的免費(fèi)OA協(xié)同辦公管理系統(tǒng)。