| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 941 人关注过本帖
标题:请大家帮我看看这是怎么回事
取消只看楼主 加入收藏
毕业设计
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-3-27
收藏
 问题点数:0 回复次数:3 
请大家帮我看看这是怎么回事

我做了一个购物网站,网站在本地调试一点没有问题,但是我放天单位的服务器上,其它都是可以用的,就是管理员登陆不行,login.asp登陆首页,login1.asp登陆的处理页面,

图片附件: 游客没有浏览图片的权限,请 登录注册
以下是我login1.asp的文件内容 <!--#include file="conn.asp"--> <!--#include file="../md5.asp"--> <% admin_name=request.form("admin_name") admin_pass=md5(request("admin_pass")) if admin_name="" or admin_pass="" then response.Write "<center><a href=login.asp><font color=red size=2>对不起,登陆名或密码不能为空!</font></a></center>" response.end end if if not isnumeric(request.form("yzm")) then response.Write "<script LANGUAGE='javascript'>alert('登录失败!验证码错误!');history.go(-1);</script>" response.end end if

yzm=cint(request.form("yzm")) if yzm<>Session("GetCode") then response.Write "<script LANGUAGE='javascript'>alert('登录失败!验证码错误!');history.go(-1);</script>" response.end end if

sql="select * from admin where admin_name='"&admin_name&"'and admin_pass='"&admin_pass&"'" set rs=conn.execute(sql) if rs.eof then response.Write "<center><a href=login.asp><font color=red size=2>登陆名或密码错误,请重新输入!</font></a></center>" else session("admin")=admin_name session.Timeout=20 rs.Close set rs=nothing response.Redirect "index.asp" end if

%>

搜索更多相关主题的帖子: 购物网站 服务器 request include center 
2005-05-10 15:51
毕业设计
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-3-27
收藏
得分:0 
是的,本地没的问题,前台的页面都可以用 belin2000兄 请问是什么路经错了?
2005-05-10 16:55
毕业设计
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-3-27
收藏
得分:0 

conn.asp文件 <%

db="../data/buy.asp" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") conn.Open connstr %> 有问题吗? 谢谢

2005-05-10 17:43
毕业设计
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2005-3-27
收藏
得分:0 

conn.asp文我有两个,一个放在管理目录admin下,一个放在根目录下,管理目录下的是 <%

db="../data/buy.asp" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") conn.Open connstr %> 根目录下db="data/buy.asp" 谢谢

2005-05-10 17:47
快速回复:请大家帮我看看这是怎么回事
数据加载中...
 
   



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

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