asp里怎么返回上一页

跳转的时候把页面名作为参数传过去，然后跳转回来。

比如：跳转 ResponseRederict("XXXXXaspxurl="+"1234aspx");

参考代码如下：

DataNavigateUrlFormatString="BaspxID={0}&PageId=当前页码

protected void Page_Load(object sender, EventArgs e)

{

if (RequestQueryString["PageID"] != null)

{

string index = RequestQueryString["PageID"]ToString();

int pageId = ConvertToInt32(index);

GridViewPageEventArgs e1 = new GridViewPageEventArgs(pageId);

GV_News_PageIndexChanging(GV_News, e1);

}

}

protected void GV_News_PageIndexChanging(object sender, GridViewPageEventArgs e)

{

GV_NewsPageIndex = eNewPageIndex;

Bind();

}

分类: 电脑/网络 >> 程序设计 >> 其他编程语言

问题描述:

[url=zhidaobaidu/question/javascript:historygo(-1)]用户表： user00

用户名：username

密 码：password

online =0 是不在线 =1 是在线

我现在只能通过退出来实现 online=0 但我看库里面99%都没有点退出的。全是直接关闭浏览器~~~还有怎么防止同一用户同时登陆？？

现在一台机器登陆后。在另一台一样可以登陆。无法判断。

高手能给出代码嘛？？？

我没有分了。就20分。以后有分一定补。江湖救急。。。

领导让我做。我搞不定了。请教高手

登陆验证的代码：

<!--#include file="/HMconnection"-->

<!--#include file="/MD5/md5"-->

<!--#include file="webconfig"-->

<%dim username,password,userip

username=trim(request("username"))

password=trim(request("password"))

password=replace(password," ","")

password=replace(password,"'","")

password=md5(password)

UserIP=RequestServerVariables("REMOTE_ADDR")

set rs=servercreateobject("adodbrecordset")

sql="select from user00 where username= '"&username&"' and Lockuser=0"

rsopen sql,conn,1,3

if rsbof and rseof then

%>

<script language="vbscript">

msgbox"你输入的帐号不存在，或己被管理员锁定！"

locationhref="javascript:historygo(-1)"

</script>

<%

rs1close

set rs1=nothing

responseend

else

if rs("password")<>password then

%>

<script language="vbscript">

msgbox"您输入的密码有误，请仔细检查！"

locationhref="javascript:historygo(-1)"

</script>

<%

responseend

else

set rs1=servercreateobject("adodbrecordset")

sql1="select from user00 where username='"&username&"'"

rs1open sql1,conn,1,3

rs("logins")=rs("logins")+1

rs("lastlogin")=Now()

rs("online")=1

rs("loginIP")=RequestServerVariables("REMOTE_ADDR")

rsupdate

session("username")=username

logins=rs("logins")

username=rs("username")

regtime=rs("Regtime")

session("password")=password

session("grade")=rs("grade")

sessiontimeout=200

rs1close

set rs1=nothing

%>

<%

end if

end if%>

<%if request("wangye")="memberlogin" then

responseWrite("windowclose();")

else

responseredirect RequestServerVariables(">

这是我之前回答[abj23]的内容，你可以按下面的方法做：

asp服务器中没有你想要的点“是”则继续往下执行，点“否”则不往下执行，因为服务器端不允许有对话d出；

但是可以用vbscript客户端脚本语言实现。

<script language="vbscript">

dim a

a = MsgBox ("Hello World!",4,"boxtitle")

</script>

以下是详细内容：

MsgBox 函数

在对话框中显示消息，等待用户单击按钮，并返回一个值指示用户单击的按钮。

MsgBox(prompt[, buttons][, title][, helpfile, context])

参数

prompt

作为消息显示在对话框中的字符串表达式。prompt 的最大长度大约是 1024 个字符，这取决于所使用的字符的宽度。如果 prompt 中包含多个行，则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 分隔各行。

Buttons

数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和。有关数值，请参阅“设置”部分。如果省略，则 buttons 的默认值为 0。

Title

显示在对话框标题栏中的字符串表达式。如果省略 title，则将应用程序的名称显示在标题栏中。

Helpfile

字符串表达式，用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile，则必须提供 context。在 16 位系统平台上不可用。

Context

数值表达式，用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context，则必须提供 helpfile。在 16 位系统平台上不可用。

设置

buttons 参数可以有以下值：

常数 值 描述

vbOKOnly 0 只显示确定按钮。

vbOKCancel 1 显示确定和取消按钮。

vbAbortRetryIgnore 2 显示放弃、重试和忽略按钮。

vbYesNoCancel 3 显示是、否和取消按钮。

vbYesNo 4 显示是和否按钮。

vbRetryCancel 5 显示重试和取消按钮。

vbCritical 16 显示临界信息图标。

vbQuestion 32 显示警告查询图标。

vbExclamation 48 显示警告消息图标。

vbInformation 64 显示信息消息图标。

vbDefaultButton1 0 第一个按钮为默认按钮。

vbDefaultButton2 256 第二个按钮为默认按钮。

vbDefaultButton3 512 第三个按钮为默认按钮。

vbDefaultButton4 768 第四个按钮为默认按钮。

vbApplicationModal 0 应用程序模式：用户必须响应消息框才能继续在当前应用程序中工作。

vbSystemModal 4096 系统模式：在用户响应消息框前，所有应用程序都被挂起。

第一组值 (0 - 5) 用于描述对话框中显示的按钮类型与数目；第二组值 (16, 32, 48, 64) 用于描述图标的样式；第三组值 (0, 256, 512) 用于确定默认按钮；而第四组值 (0, 4096) 则决定消息框的样式。在将这些数字相加以生成 buttons 参数值时，只能从每组值中取用一个数字。

返回值

MsgBox 函数有以下返回值：

常数 值 按钮

vbOK 1 确定

vbCancel 2 取消

vbAbort 3 放弃

vbRetry 4 重试

vbIgnore 5 忽略

vbYes 6 是

vbNo 7 否

以上就是关于asp里怎么返回上一页全部的内容，包括:asp里怎么返回上一页、ASP如何关闭浏览器让用户自动退出、asp 中点确定继续执行ASP代码，点取消则退回1等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！