| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 602 人关注过本帖
标题:HLEP ME asp管理页问题
只看楼主 加入收藏
kkllchun
Rank: 2
等 级:论坛游民
帖 子:55
专家分:13
注 册:2007-9-15
结帖率:70%
收藏
 问题点数:0 回复次数:1 
HLEP ME asp管理页问题
asp管理页问题


我做的是一个管理页面 输出的是会员信息 不过我打开 本地/admin.asp的时候 就显示 user or password wrong! 其实我是想在那个<td></td>时显示 "  请登陆   的是不是if else那里嵌套出了问题 找了半天没打到原因
<html>
<!--#include file="db.zc.asp"-->
<head>
<title>管理页</title>
</head>
<body>
<table align="center" border="1">
<tr>
<td colspan="2" align="center" >管理员登陆</td>
</tr>
<%  
set rs=server.createobject("adodb.recordset")
   sql="select * from user where u_user='"&request.form("f_user")&"' and
u_code='"&request.form("f_password")&"'"
   sql1="select * from user,info where u_id=i_uid"
if request.querystring("act")=login then
rs.open sql,f,1,1
if rs.recordcount>0 then
rs.close
re.open sql1,f,1,1
%>
<table>
<tr>
<td> id </td>
<td>帐号</td>
<td>密码</td>
<td>姓名</td>
<td>性别</td>
<td>年龄</td>
<td>会员</td>
</tr>
<%
while not rs.eof
%>
<tr>
<td><%=rs("u_id")%></td>
<td><%=rs("u_user")%></td>
<td><%=rs("u_code")%></td>
<td><%=rs("i_name")%></td>
<td><%=rs("i_sex")%></td>
<td><%=rs("i_age")%></td>
<td><%=rs("i_vip")%></td>
</tr>
</table>
<%rs.movenext
wend
response.end
else
%>
<form name="form1" id="form1" method="post" action="admin.asp?act=login">
<tr>
<td align="right" >user    :</td>
<td><input name="f_user" id="f_user" type="text" /></td>
</tr>
<tr>
<td>password:</td>
<td><input name="f_password" id="f_password" type="password" style="width:152px;"/></td>
</tr>
<tr>
<td align="right" colspan="2"><input name="f_submit" type="submit" value="login" /></td>
</tr>
<tr>
<td colspan="2"><%="user or password wrong!"
%>
<%
end if
elseif request.form("act")="" then
response.write"  请登陆  "
end if
%></td>
</tr>
</form>
</table>
</body>
</html>
搜索更多相关主题的帖子: HLEP asp 管理 
2008-02-08 12:23
madpbpl
Rank: 4
等 级:贵宾
威 望:11
帖 子:2876
专家分:244
注 册:2007-4-5
收藏
得分:0 
首先user是数据库关键字,所以用user表时,应该写成[user]
其次re.open sql1,f,1,1   're是哪来的?


我把楼主的程序稍做了一下调整,测试通过
<html>
<!--#include file="db.zc.asp"-->
<head>
<title>管理页</title>
</head>
<body>
<table align="center" border="1">
<tr>
<td colspan="2" align="center" >管理员登陆</td>
</tr>
<%
'response.write request.form("f_user")
'response.write request.form("f_password")
'response.write request.querystring("act")  
set rs=server.createobject("adodb.recordset")
   sql="select * from [user] where u_user='"&trim(request.form("f_user"))&"' and u_code='"&trim(request.form("f_password"))&"'"
   sql1="select * from [user],info where u_id=i_uid"
if trim(request.querystring("act"))=login then
rs.open sql1,f,1,1
response.write rs.recordcount
if rs.recordcount>0 then
rs.close
set rs1=Server.CreateObject("adodb.recordset")
rs1.open sql1,f,1,1
if not rs1.eof then
%>
<table>
<tr>
<td> id </td>
<td>帐号</td>
<td>密码</td>
<td>姓名</td>
<td>性别</td>
<td>年龄</td>
<td>会员</td>
</tr>
<%
while not rs1.eof
%>
<tr>
<td><%=rs1("u_id")%></td>
<td><%=rs1("u_user")%></td>
<td><%=rs1("u_code")%></td>
<td><%=rs1("i_name")%></td>
<td><%=rs1("i_sex")%></td>
<td><%=rs1("i_age")%></td>
<td><%=rs1("i_vip")%></td>
</tr>
</table>
<%rs1.movenext
wend
response.end

'else
%>
<form name="form1" id="form1" method="post" action="?act=login">
<tr>
<td align="right" >user    :</td>
<td><input name="f_user" id="f_user" type="text" /></td>
</tr>
<tr>
<td>password:</td>
<td><input name="f_password" id="f_password" type="password" style="width:152px;"/></td>
</tr>
<tr>
<td align="right" colspan="2"><input name="f_submit" type="submit" value="login" /></td>
</tr>
<tr>
<td colspan="2"><%="user or password wrong!"
%>
<%
end if
end if
elseif request.QueryString("act")="" then
response.write"  请登陆  "
end if
%></td>
</tr>
</form>
</table>
</body>
</html>

[[it] 本帖最后由 madpbpl 于 2008-2-9 02:50 编辑 [/it]]
2008-02-09 02:16
快速回复:HLEP ME asp管理页问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013846 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved