我的ASP不工作了,小弟初学,搞不懂,兄弟们指教下
源代码:
config.asp
dbpath="dd.mdb"
conn.asp
<!--#include file="config.asp" -->
<%
set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};"&_
"DBQ=Server.MapPath(Dbpath);"
%>
主文件HOME.ASP
<table width="100%" height="100%" border="0" align="center">
<tr>
<td width="21%" height="101">
<table width="100%" height="95" border="0">
<tr align="center" background="img/loginbar.gif">
<td height="23" colspan="2"><font color="#FF0000" size="4">用户登陆:</font></td>
</tr>
<tr>
<td width="37%" height="20" align="center" valign="middle">帐号:</td>
<td width="63%"><form name="form1" method="post" action="verify.asp">
<input name="usname" type="text" size="10" maxlength="20">
</td>
</tr>
<tr>
<td height="20" align="center" valign="middle">密码:</td>
<td>
<input name="paword" type="password" size="10" maxlength="20">
</td>
</tr>
<tr>
<td height="20"> </td>
<td>
<input type="submit" name="Submit" value="确认">
</form></td>
</tr>
</table></td>
<td width="64%" rowspan="3" align="center" valign="middle"> </td>
<td width="15%"> </td>
</tr>
<tr>
<td width="21%"> </td>
<td width="15%"> </td>
</tr>
<tr>
<td width="21%"> </td>
<td width="15%"> </td>
</tr>
</table>
还有
verify.asp
<%LANGUAGE=VBscript%>
<!--#include file="conn.asp"-->
<%
username=Request.Form("usname")
password=Request.Form("paword")
'校验用户
if username="" then
Response.redirect"error.asp?info=抱歉,好象你用的是空名字!"
end if
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "select * from USERID where Name='"&username&"'",conn,1,3
if not rs.eof then
if rs("pass")<>password then
Response.redirect"error.asp?info=对不起,你的帐号或密码不正确,请重新输入!"
end if
else
Response.redirect"error.asp?info=对不起,你的帐号或密码不正确,请重新输入!"
end if
rs.close
set rs=nothing
session("username")=Name
session("nickname")=nickname
Response.redirect"main.asp"
%>
ERROR.ASP
<table width="100%" height="375" border="0">
<tr>
<td width="23%"> </td>
<td rowspan="3" align="center" valign="middle"><img src="img/error.gif" width="297" height="188" align="middle"></td>
<td width="21%"> </td>
</tr>
<tr>
<td width="23%"> </td>
<td width="21%"> </td>
</tr>
<tr>
<td width="23%" height="223"> </td>
<td width="21%"> </td>
</tr>
<tr>
<td> </td>
<td align="center"><font color="#FF0000" size="5">抱歉,好象出了下面问题!</font></td>
<td> </td>
</tr>
<tr>
<td> </td>
<td align="center"><%=info%></td>
<td> </td>
</tr>
</table>
大家看看有什么问题,还有什么要注意,要补充的,尽管说..
config.asp
dbpath="dd.mdb"
conn.asp
<!--#include file="config.asp" -->
<%
set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};"&_
"DBQ=Server.MapPath(Dbpath);"
%>
主文件HOME.ASP
<table width="100%" height="100%" border="0" align="center">
<tr>
<td width="21%" height="101">
<table width="100%" height="95" border="0">
<tr align="center" background="img/loginbar.gif">
<td height="23" colspan="2"><font color="#FF0000" size="4">用户登陆:</font></td>
</tr>
<tr>
<td width="37%" height="20" align="center" valign="middle">帐号:</td>
<td width="63%"><form name="form1" method="post" action="verify.asp">
<input name="usname" type="text" size="10" maxlength="20">
</td>
</tr>
<tr>
<td height="20" align="center" valign="middle">密码:</td>
<td>
<input name="paword" type="password" size="10" maxlength="20">
</td>
</tr>
<tr>
<td height="20"> </td>
<td>
<input type="submit" name="Submit" value="确认">
</form></td>
</tr>
</table></td>
<td width="64%" rowspan="3" align="center" valign="middle"> </td>
<td width="15%"> </td>
</tr>
<tr>
<td width="21%"> </td>
<td width="15%"> </td>
</tr>
<tr>
<td width="21%"> </td>
<td width="15%"> </td>
</tr>
</table>
还有
verify.asp
<%LANGUAGE=VBscript%>
<!--#include file="conn.asp"-->
<%
username=Request.Form("usname")
password=Request.Form("paword")
'校验用户
if username="" then
Response.redirect"error.asp?info=抱歉,好象你用的是空名字!"
end if
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "select * from USERID where Name='"&username&"'",conn,1,3
if not rs.eof then
if rs("pass")<>password then
Response.redirect"error.asp?info=对不起,你的帐号或密码不正确,请重新输入!"
end if
else
Response.redirect"error.asp?info=对不起,你的帐号或密码不正确,请重新输入!"
end if
rs.close
set rs=nothing
session("username")=Name
session("nickname")=nickname
Response.redirect"main.asp"
%>
ERROR.ASP
<table width="100%" height="375" border="0">
<tr>
<td width="23%"> </td>
<td rowspan="3" align="center" valign="middle"><img src="img/error.gif" width="297" height="188" align="middle"></td>
<td width="21%"> </td>
</tr>
<tr>
<td width="23%"> </td>
<td width="21%"> </td>
</tr>
<tr>
<td width="23%" height="223"> </td>
<td width="21%"> </td>
</tr>
<tr>
<td> </td>
<td align="center"><font color="#FF0000" size="5">抱歉,好象出了下面问题!</font></td>
<td> </td>
</tr>
<tr>
<td> </td>
<td align="center"><%=info%></td>
<td> </td>
</tr>
</table>
大家看看有什么问题,还有什么要注意,要补充的,尽管说..
...全文
相关推荐
ASP.NET一本很好的书籍,适合初学者。
**ASP.NET架构**:介绍ASP.NET的核心组件,如HttpApplication、HttpRequest、HttpResponse以及Page生命周期,解释这些组件如何协同工作来处理Web请求
asp 初学 asp 适合新手上路的例子
这个"asp 初学 asp 适合新手上路的例子"应该包含了上述部分的实例,让初学者可以通过实际操作来学习和理解。
asp由初学到精通课件
这门课程“asp由初学到精通课件”显然旨在帮助初学者掌握ASP的基础知识和高级技巧,从入门到精通,逐步提升技能。在学习ASP的过程中,首先要理解的是它的基本概念。
经典的asp教程(供初学者使用)
总的来说,这个经典的ASP教程为初学者提供了丰富的学习资源,从基础的HTML语法讲起,逐步引导学习者掌握ASP编程,理解服务器端脚本的工作原理,并通过实际项目提升编程和问题解决能力。
100个ASP初学者必研究的小程序
这个"100个ASP初学者必研究的小程序"的资源集合,旨在为初学者提供一系列实用且易懂的示例,帮助他们快速掌握ASP的基础知识和实践技巧。在学习ASP时,首先需要理解其工作原理。


