网页实现定时跳转(asp.net + js)

来源：互联网发布：二次元小说软件编辑：程序博客网时间：2024/05/02 23:48

本例目的为制作一个通用的定时跳转页面，当程序需要进行页面跳转的时候，只需要Response.Redirect("jumpPage.aspx?url=xxxxx&Message=xxxxx")就可以用了。

jumpPage.aspx
1 <span id="s">用来显示提示信息<Span id="d">用来显示，N秒后跳转
2 var u=<%= murl%>;用来提取后台Request得到的值。由传递过来的页面参数得来。

_______________________________________________________________

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="jumpPage.aspx.vb" Inherits="Mydesk_Base_jumpPage" %><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml" ><head runat="server"> <title>无标题页</title> </head><body><form id="form1" runat="server"><br /><span id="s" ></span> <br /><br /><span id="d"></span> </form><SCRIPT LANGUAGE="JavaScript"> var time = 4; var u=<%= murl%>;var m=<%= mes%>;document.all.s.innerHTML= m;document.all.d.innerHTML= "－－－"+(time)+"秒后将跳转到相关页面－－－"function Redirect(){ window.location=u; }var i = 1;function dis(){ document.all.d.innerHTML= "－－－"+(time-i)+"秒后将跳转到相关页面－－－" i++; }timer=setTimeout('Redirect()',time * 1000); timer=setInterval('dis()', 1000);</SCRIPT> </body></html>jumpPage.aspx.vb注：1 mes为显示信息，murl为n秒后跳转到页的地址2 mes和murl必须在Sub外定义成Public。否则在javascript找不到。--------------------------------------------------------------------------------Partial Class Mydesk_Base_jumpPage Inherits System.Web.UI.Page Public mes As String Public murl As String Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load mes = Request.QueryString("Message") murl = Request.QueryString("url") End SubEnd Class引用示例：------------------------------------------------------------------------------ If MailBoxCount> 0 Then ... Else Response.Redirect("JumpPage.aspx?url='NewAccount.aspx'&Message='没有配置新邮箱,请配置之后使用'", False) End If本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/lanwilliam/archive/2008/05/21/2467208.aspx