龙盟编程博客 | 无障碍搜索 | 云盘搜索神器
快速搜索
主页 > web编程 > asp编程 >

asp防刷新程序

时间:2012-12-31 22:56来源:未知 作者:admin 点击: 次
分享到：

asp防刷新程序

Public Sub PreventRefresh()
  Dim RefreshTime
  RefreshTime = 20
  If DateDiff("s", Session("UserRefreshTime"), Now()) < RefreshTime Then
   FoundErr = True
   Response.Write "<META http-equiv=Content-Type content=text/html; chaRset=gb2312><meta HTTP-EQUIV=REFRESH CONTENT=" & RefreshTime & "><br>本页面起用了防刷新机制，请不要在" & RefreshTime & "秒内连续刷新本页面<BR>正在打开页面，请稍后……"
   Response.end
  End If
 End Sub


精彩图集
精彩文章

热门标签

udp协议 执行过程 主机管理 wordwrap 策略模 checkbox选中 差异 输汉字 GMap.Net Execl导出 启动失败 Vista 关闭当前页面 循环结构 finally 命令解析 联想笔记本 IIS无法启动 单缓冲 剪切文件 浏览器信息 linux系统防火墙 用户名脚本 cookie插件 1061 pfsockopen bbed js获取属性 编码解码 CSS3 内存泄漏检测 win32com 库日志 apk安装 大类 第K大数 php去掉字符串 音序 linux挂载 安装方法 java移动文件 80004005 字体 函数参数 点击 照相 比较特别的基 PNG透明 选中 modu 归并排 php php检查 php PHP json 四舍 ShellExecute 分片技术 定位 ActiveMQ 报表打印 哈弗曼编码

赞助商链接