找回密码
 注册
广告投放 虚位以待【阿里云】2核2G云新老同享 99元/年,续费同价做网站就用糖果主机-sugarhosts.comJtti.com-新加坡服务器,美国服务器,香港服务器
查看: 471|回复: 2

求助asp

[复制链接]
发表于 2005 年 11 月 24 日 13:32:04 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

×
  用asp做的。登陆界面为:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>卫生成绩管理</title>
<style type="text/css">
<!--
.style3 {
   font-size: 24px;
   font-weight: bold;
}
-->
</style>
</head>

<body>
<form action="check.asp" method="post">
<table width="300" align="center">
<tr><td width="100%" align="center" bgcolor="#68FA61" height="30" colspan="2"><span class="style3">管理员登录</span></td>
</tr>
<tr><td bgcolor="#68FA61" height="20" width="50%">管理员账号</td>
<td width="50%"><input height="20" type="text" name="name"></td></tr>
<tr><td bgcolor="#68FA61" height="20" width="50%">密码</td><td width="50%"><input height="20" type="password" name="passwd" value=""></td></tr>
<tr><td><input type="submit" name="ok" value="登录"></td></tr>
</table>
</form>
</body>
</html>
验证程序为:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html><head></head><body>
<% if requst.form("ok")="登录" then
  name=trim(requst.form"name")
  passwd=trim(requst.form"passwd")
   if ((len(name)<>0) and (len(passwd)<>0)) then
   DbPath=server.mappath(guanli.mdb")
  set conn=server.createobject("adodb.connection")
   conn.open "driver={Microsoft Access Driver(*.mdb)|;dbp="&DbPath
  set dd=server.createobject("adodb.Recordset")
 
  s1="select * from [user] where id='"&name&"' and passwd='"&passwd&"'"
  dd.open s1,conn,3,3
  if dd.eof then
   session("check")=0
   response.Write"你无权访问该页"
   
   else
   session("check")=1
   response.Redirect"su.asp"
   end if
   else response.Redirect"wsjc.html"
   
   end if
end if %>
</body>
</html>

连接不上!
问题在哪里?哪位给指导一下!谢了!!!
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
发表于 2005 年 11 月 25 日 20:19:55 | 显示全部楼层
【腾讯云】2核2G云服务器新老同享 99元/年,续费同价
你打开这个文件有问题吗/
看一下 check.asp 这个文件
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

 楼主| 发表于 2005 年 11 月 24 日 13:32:04 | 显示全部楼层

求助asp

  用asp做的。登陆界面为:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>卫生成绩管理</title>
<style type="text/css">
<!--
.style3 {
   font-size: 24px;
   font-weight: bold;
}
-->
</style>
</head>

<body>
<form action="check.asp" method="post">
<table width="300" align="center">
<tr><td width="100%" align="center" bgcolor="#68FA61" height="30" colspan="2"><span class="style3">管理员登录</span></td>
</tr>
<tr><td bgcolor="#68FA61" height="20" width="50%">管理员账号</td>
<td width="50%"><input height="20" type="text" name="name"></td></tr>
<tr><td bgcolor="#68FA61" height="20" width="50%">密码</td><td width="50%"><input height="20" type="password" name="passwd" value=""></td></tr>
<tr><td><input type="submit" name="ok" value="登录"></td></tr>
</table>
</form>
</body>
</html>
验证程序为:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html><head></head><body>
<% if requst.form("ok")="登录" then
  name=trim(requst.form"name")
  passwd=trim(requst.form"passwd")
   if ((len(name)<>0) and (len(passwd)<>0)) then
   DbPath=server.mappath(guanli.mdb")
  set conn=server.createobject("adodb.connection")
   conn.open "driver={Microsoft Access Driver(*.mdb)|;dbp="&DbPath
  set dd=server.createobject("adodb.Recordset")
 
  s1="select * from [user] where id='"&name&"' and passwd='"&passwd&"'"
  dd.open s1,conn,3,3
  if dd.eof then
   session("check")=0
   response.Write"你无权访问该页"
   
   else
   session("check")=1
   response.Redirect"su.asp"
   end if
   else response.Redirect"wsjc.html"
   
   end if
end if %>
</body>
</html>

连接不上!
问题在哪里?哪位给指导一下!谢了!!!
Jgwy.Com - Free Web Hosting Guide & Directory In China since 2001! Jgwy.Net-Jglt.Net
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|金光论坛

GMT+8, 2025 年 2 月 1 日 01:40 , Processed in 0.021406 second(s), 23 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表