uploader里的图片每次都需要2-3秒才能全部显示,按照例子写了缓存命令,结果没有任何效果,缓存的代码起作用了么?是说就是这么慢么?
httprequests:
Dim fl As String = "E:\。。。\。。。\web\" & e.path
Dim path As String = "foxtableAppTest"
If filesys.FileExists(fl)
Dim idx As Integer = fl.LastIndexOf(".")
Dim ext As String = fl.SubString(idx)
Select Case ext
Case ".jpg",".gif",".png",".bmp",".wmf",".js",".css" ,".zip",".rar",".txt"
e.CacheTime = 3600 '缓存文件一个小时
e.WriteFile(fl)
Return '这里必须返回
Case ".html",".htm"
e.WriteFile(fl)
Return
End Select
End If
Dim wb As New weui
。。。。。。
。。。。