2.8w+
社区成员
关于errors的问题！
我是asp新手
1：<%on error resume next
If IsEmpty(Session("HasBeenHome")) Then
Session("HasBeenHome")=True
Response.Redirect"/"
End if
％>
on error resume next 说是遇到错误就跳过去执行下一条，上面这段code是一个程序上的，请问 if 语句什么时候执行？？？
2：在html中嵌入的asp代码何时执行？？？它们和html是按编写顺序执行的吗？
*^_^* 问题很简单，别笑话我！
1：<%on error resume next
If IsEmpty(Session("HasBeenHome")) Then
Session("HasBeenHome")=True
Response.Redirect"/"
End if
％>
on error resume next 说是遇到错误就跳过去执行下一条，上面这段code是一个程序上的，请问 if 语句什么时候执行？？？
2：在html中嵌入的asp代码何时执行？？？它们和html是按编写顺序执行的吗？
*^_^* 问题很简单，别笑话我！
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
tlotr 2004-04-03
- 打赏
- 举报
下面是一段修改密码的程序，可我觉得如果是从上往下顺序执行走不通啊。麻烦哪位大哥给分析一下。执行顺序若不明白，我还看什么程序啊！！！ ：（
<%on error resume next
If IsEmpty(Session("HasBeenHome")) Then
Session("HasBeenHome")=True
Response.Redirect"/"
End if
%>
<%
flag=0
repwd=""
if trim(Request("submit"))<>"" then
repwd = request("pwd")
if Request.Form("pwd")=session("dpt_pwd") then
flag=1
if Request.Form("newpwd")<>"" and flag=1 then
set dbconn = server.CreateObject ("adodb.connection")
DBConn.CursorLocation = Application("Connection1_CursorLocation")
DBConn.Open(Application("Connection1_ConnectionString"))
strq = "UPDATE DEPARTMENT SET PWD='"&request("newpwd")&"' WHERE DPT_ID='"&session("dpt_id")&"' "
dbconn.Execute (strq)
session("dpt_pwd")=request("newpwd")
%>
<SCRIPT LANGUAGE=javascript>
<!--
window.close()
//-->
</SCRIPT>
<%
Response.end
end if
else flag=2
end if
end if
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<%if flag=1 then%>
<SCRIPT LANGUAGE="JavaScript" SRC="/java/common.js"></SCRIPT>
<SCRIPT LANGUAGE=javascript>
<!--
function submit_onclick() {
if (form.newpwd.value.length >8) {
alert("密码最长8位");
form.newpwd.focus ();
return false;
}
else if(form.newpwd.value != form.confirmpwd .value ) {
alert("确认密码和新密码一致");
form.confirmpwd.focus ();
return false;
}
}
//-->
</SCRIPT>
<%end if%>
</HEAD>
<BODY bgcolor="#C4E0FD">
<form name=form id=form action="modifypwd.asp" method=post >
<table align=center >
<tr>
<td>
<br>
用户<%=session("dpt_name")%>
</td>
</tr>
<tr>
<td>
<br>
原密码<input name=pwd type=password size=10 value=<%=Request.form("pwd")%>></input>
</td>
</tr>
<%if flag=2 then%>
<tr>
<td><br>
密码错误
</td>
</tr>
<%end if%>
<%if flag=1 then%>
<tr>
<td>
<br>
新密码：<input name=newpwd type=password size=10 value=<%=Request.form("newpwd")%>>(×î¶à°Ëλ)</input>
</td>
</tr>
<tr>
<td>
<br>
确认：<input name=confirmpwd type=password size=10 value=<%=Request.form("confirmpwd")%>></input>
<br>
</td>
</tr>
<%end if%>
<tr>
<td><br>
<input type=submit name=submit value=" 提交"
<%if flag=1 then%>
LANGUAGE=javascript onclick="return submit_onclick()"
<%end if%>
></input>
</td>
</tr>
</table>
</form>
</BODY>
</HTML>
<%
if err.number<> 0 then
Response.Redirect ("errors.asp")
response.end
end if
%>
<%on error resume next
If IsEmpty(Session("HasBeenHome")) Then
Session("HasBeenHome")=True
Response.Redirect"/"
End if
%>
<%
flag=0
repwd=""
if trim(Request("submit"))<>"" then
repwd = request("pwd")
if Request.Form("pwd")=session("dpt_pwd") then
flag=1
if Request.Form("newpwd")<>"" and flag=1 then
set dbconn = server.CreateObject ("adodb.connection")
DBConn.CursorLocation = Application("Connection1_CursorLocation")
DBConn.Open(Application("Connection1_ConnectionString"))
strq = "UPDATE DEPARTMENT SET PWD='"&request("newpwd")&"' WHERE DPT_ID='"&session("dpt_id")&"' "
dbconn.Execute (strq)
session("dpt_pwd")=request("newpwd")
%>
<SCRIPT LANGUAGE=javascript>
<!--
window.close()
//-->
</SCRIPT>
<%
Response.end
end if
else flag=2
end if
end if
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<%if flag=1 then%>
<SCRIPT LANGUAGE="JavaScript" SRC="/java/common.js"></SCRIPT>
<SCRIPT LANGUAGE=javascript>
<!--
function submit_onclick() {
if (form.newpwd.value.length >8) {
alert("密码最长8位");
form.newpwd.focus ();
return false;
}
else if(form.newpwd.value != form.confirmpwd .value ) {
alert("确认密码和新密码一致");
form.confirmpwd.focus ();
return false;
}
}
//-->
</SCRIPT>
<%end if%>
</HEAD>
<BODY bgcolor="#C4E0FD">
<form name=form id=form action="modifypwd.asp" method=post >
<table align=center >
<tr>
<td>
<br>
用户<%=session("dpt_name")%>
</td>
</tr>
<tr>
<td>
<br>
原密码<input name=pwd type=password size=10 value=<%=Request.form("pwd")%>></input>
</td>
</tr>
<%if flag=2 then%>
<tr>
<td><br>
密码错误
</td>
</tr>
<%end if%>
<%if flag=1 then%>
<tr>
<td>
<br>
新密码：<input name=newpwd type=password size=10 value=<%=Request.form("newpwd")%>>(×î¶à°Ëλ)</input>
</td>
</tr>
<tr>
<td>
<br>
确认：<input name=confirmpwd type=password size=10 value=<%=Request.form("confirmpwd")%>></input>
<br>
</td>
</tr>
<%end if%>
<tr>
<td><br>
<input type=submit name=submit value=" 提交"
<%if flag=1 then%>
LANGUAGE=javascript onclick="return submit_onclick()"
<%end if%>
></input>
</td>
</tr>
</table>
</form>
</BODY>
</HTML>
<%
if err.number<> 0 then
Response.Redirect ("errors.asp")
response.end
end if
%>
luluso 2004-04-03
- 打赏
- 举报
zorou_fatal所言极是!
zorou_fatal 2004-04-03
- 打赏
- 举报
1.if 语句应该是最先执行. on error resume next 实际上可以看成是一个声明.当发生错误的时候不中断而继续。
2.实际上你可以认为它们是顺序执行。
2.实际上你可以认为它们是顺序执行。