动态网页,如何不缓存页面
<% Response.Buffer = True Response.ExpiresAbsolute = Now() - 1 Response.Expires = 0 %><% web=request.Form("selname2")webs=split(web,",")%><%Dim paths,fso,objFolder,file,foldFiles,mmurl = "/fujitec1/" paths="imagin/" & webs(0) & "/" &webs(1) '图片文件所在的文件夹Set fso=Server.CreateObject("Scripting.FileSystemObject")Set objFolder = fso.GetFolder(Server.MapPath(paths))Set foldFiles = objFolder.filesi=1For Each file In foldFilesimagin=split(file,"\")files=imagin(ubound(imagin))urls=url &"/" &paths & "/" & filesresponse.write "<td><a href='"&urls&"'>"&files&"<br><br></td>"NextSet objFolder=nothingSet objSubFolders=nothingSet foldFiles=nothingSet fso=nothing%>