强制刷新网页
<% ’强制性刷新随机验证码 ’让随机验证码每次按IE的后退按钮时,返回登录页面的随即码都自动刷新, Response.expires=-1 Response.AddHeader"pragma","no-cache" Response.AddHeader"cache-control","no-store"%>
判断文件地址是否有效
<% ’原创作者:小艺 QQ:52093 时间:2005.6.30 Response.Write("") On Error Resume Next Dim thisurl,thistext thisurl=Request("thisurl") ’定义文件地址(非Html格式文档)! if thisurl="" then Response.Write("请先输入文件地址!") Response.End End if Function objxmlhttp(xmlurl) On Error Resume Next Set objxml = CreateO...[ 查看全文 ]2016-02-19 标签: