当访问Internet某个站点时系统首先将远程文件读入到本机Temporary Internet Files文件夹现在告诉大家个小窍门技巧可以用VB语言和个API实现判断网页文件是否在IE缓存Cache中

　　1.API声明

　　Private Declare Function GetUrlCacheEn
tryInfo Lib ″wininet.dll″ Alias ″GetUrlCacheE
ntryInfoA″ ByVal szUrlName As String lpCa
cheEntryInfo As Any lpdwCacheEntryInfoBuf
ferSize As Long As Long

　　2.编写IsFileInCachesURL

　　Function IsFileInCacheByVal sURL As String As Boolean
Const ERROR_INSUFFICIENT_B
UFFER = 122
Dim dwEntrySize As Long
If GetUrlCacheEntryInfosURL ByVal 0& dwEntrySize = 0 Then
If Err.LastDllError = ERROR_IN
SUFFICIENT_BUFFER Then
IsFileInCache = True
End If
End If
End Function　　

　　3.举例

　　MsgBox IsFileInCache″http//www.ddvip.com″

　　若www.ddvip.com已访问则输出True否则输出False

　　以上在Win2003+VB6 SP5下测试通过