（在说正事之前，我要推荐一个福利：你还在原价购买阿里云、腾讯云、华为云服务器吗？那太亏啦！来这里，新购、升级、续费都打折，能够为您省60%的钱呢！2核4G企业级云服务器低至69元/年，点击进去看看吧>>>)
返回上一页，一般用在判断信息提交是否完全之后<%
'******************************
'函数：GoBack()
'参数：无
'作者：阿里西西
'日期：2007/7/13
'描述：返回上一页，一般用在判断信息提交是否完全之后
'示例：<%call GoBack()%>
'******************************
Sub GoBack()
Response.write ("<script>history.go(-1)</script>")
End Sub 
%>
重定向到另外的链接
<%
'******************************
'函数：Go(url)
'参数：url,相对或绝对路径及网址
'作者：阿里西西
'日期：2007/7/13
'描述：重定向到另外的链接
'示例：<%call Go(http://www.alixixi.com)%>
'******************************
Sub Go(url)
Response.write ("<script>location.href('" & url & "')</script>")
End Sub 
%>
指定秒数重定向另外的连接
<%
'******************************
'函数：GoPage(url,s)
'参数：url,相对或绝对路径及网址;s,以秒为单位的时间后跳转
'作者：阿里西西
'日期：2007/7/13
'描述：指定秒数重定向另外的连接
'示例：<%call GoPage("http://www.alixixi.com",3)%>
'******************************
sub GoPage(url,s)
s=s*1000
Response.Write "<SCRIPT LANGUAGE=javascript>"
Response.Write "window.setTimeout("&chr(34)&"window.navigate('"&url&"')"&chr(34)&","&s&")"
Response.Write "</script>"
end sub 
%>

版权声明：本文转载自网络，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。本站转载出于传播更多优秀技术知识之目的，如有侵权请联系QQ/微信：153890879删除

相关文章

• 

  十月更新修复了Windows 10的Ping of De

• 

  Windows10 UAC弹窗太烦但又不能关？教

• 

  老大手把手教我玩 Git 变基！

• 

  在Linux终端中展示幻灯片