UC知道求登陆ASP代码.
来源：百度知道 编辑：UC知道 时间：2024/05/16 19:29:36
本人刚学ASP.在写一个用户登陆的页面,想在登陆以后显示出用户的基本资料,现在写到下面二个文件了.不知道怎么写了.请高手指教.
index.asp
</head>
<body>
<form name="form1" method="post" action="check.asp">
<p>用户名:
<input type="text" name="username">
</p>
<p>密 码 :
<input type="text" name="password">
</p>
<p>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="reset" value="重置">
</p>
</form>
</body>
</html>
check.asp
<!--#include file="conn.asp"-->
<%
ID=request.form("username")
password=request.form("password")
if ID="" or password="" then
response.write ("<script lang
index.asp
</head>
<body>
<form name="form1" method="post" action="check.asp">
<p>用户名:
<input type="text" name="username">
</p>
<p>密 码 :
<input type="text" name="password">
</p>
<p>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="reset" value="重置">
</p>
</form>
</body>
</html>
check.asp
<!--#include file="conn.asp"-->
<%
ID=request.form("username")
password=request.form("password")
if ID="" or password="" then
response.write ("<script lang
先建立一个Conn.asp的文件
里面的代码是这样的：
<%
Dim conn
Set conn=Server.CreateObject("ADODB.Connection")
db.Open "Dbq="&Server.Mappath("zzy.mdb")&";Driver={Microsoft Access Driver (*.mdb)};"
%>
再建立一个显示这些数据的页面，代码如下：
<!--#include file="conn.asp"-->
<%
exec="select * from table1 order by id desc"
set rs=db.execute(exec)
%>
然后在以下要显示资料的地方加入：
<%=rs("id")%>
<%=rs("name")%>
<%=rs("story")%>
<%=rs("called")%>
就可以了
需要注意的是：
这里我是定义了一个db变量来做数据库连接，每个人定义的变量名都是不同的，所以这个地方你需要修改一下，把db更改成你自己的数据库连接的变量名。
response.write("成功")
变成这样
response.write("用户名;"&rs.Fields("name")&"<BR>")
response.write("story:"&rs.Fields("story")&"<BR>")
response.write("called:"