我是新手，咨询一个登录的问题？

9805034 2003-10-20 01:05:48
我在登录界面中输入口令和密码后进入不了第二个页面，提示为：microsoft ole db provider for odbc drivers(0x80004005),请高手帮我看看代码，不胜感激！
<% @ language=vbscript %>
<% dim uid,upassword
uid=request.form("uid")
upassword=request.form("upassword")

Set conn=Server.CreateObject("adodb.Connection")
user="DBQ="+server.mappath("user.mdb")+";driver={microsoft access driver(*.mdb)};"
conn.open user
sql="select * from user where (uid='"+uid+"'and upassword='"+upassword+"')"
conn.execute(sql)
set RS= conn.execute(sql)

conn.close
set conn=nothing
%>
<%if NOT RS.EOF then%>
<% session("uid")=uid%>



<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>


<body background="b093.gif" alink="red" vlink="green">



<table border="0" cellspacing="1" width="65%" height="208" align=center>
<tr>
<td width="100%" height="41" align=center>
<strong><big><font color="#FF8040" size="4">
恭喜!你是合法用户,欢迎光临指教!
</font></big></strong>
</td>
</tr>
<tr>
<td width="100%" height="90" align=center>
<hr>
</td>
</tr>
<tr>
<td width="100%" height="65" align=center>
<a herf="main.htm" border="0" >进入主页面</a>
</td>
</tr>
</table>





</body>
</HTML>

...全文
39 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
iamfred 2003-10-20
  • 打赏
  • 举报
 回复
你这是自己考的一段吧~
Miriamy 2003-10-20
  • 打赏
  • 举报
 回复

Set rs = Server.CreateObject("ADODB.RecordSet")
sql =" select * from user where (uid='"+uid+"'and upassword='"+upassword+"')"
rs= conn.excute(qsql)
gevn 2003-10-20
  • 打赏
  • 举报
 回复
请问兄弟是哪个学校毕业的。（9805034）
我的是学号是(9808203)
guanxiaolin@gslsoft.com通知.
dafei0320 2003-10-20
  • 打赏
  • 举报
 回复
加路径！
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("user.mdb")

要完整的吗？？？给我消息！
hfkj 2003-10-20
  • 打赏
  • 举报
 回复
<% @ language=vbscript %>
<% dim uid,upassword
uid=request.form("uid")
upassword=request.form("upassword")

dim conn,connstr
connstr="DBQ="+server.mappath("data.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
sql="select * from user where (uid='"+uid+"'and upassword='"+upassword+"')"
conn.execute(sql)
set RS= conn.execute(sql)

conn.close
set conn=nothing
%>
<%if NOT RS.EOF then%>
<% session("uid")=uid%>



<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>


<body background="b093.gif" alink="red" vlink="green">



<table border="0" cellspacing="1" width="65%" height="208" align=center>
<tr>
<td width="100%" height="41" align=center>
<strong><big><font color="#FF8040" size="4">
恭喜!你是合法用户,欢迎光临指教!
</font></big></strong>
</td>
</tr>
<tr>
<td width="100%" height="90" align=center>
<hr>
</td>
</tr>
<tr>
<td width="100%" height="65" align=center>
<a herf="main.htm" border="0" >进入主页面</a>
</td>
</tr>
</table>





</body>
</HTML>
lovehwq21 2003-10-20
  • 打赏
  • 举报
 回复
还有conn.execute(sql)
set RS= conn.execute(sql)
把前一句去掉，没用的
angelheavens 2003-10-20
  • 打赏
  • 举报
 回复
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("user.mdb")
conn.open connstr
sql="select * from user where uid='"&uid&"' and upassword='"&upassword&"'"
set RS= conn.execute(sql)
lovehwq21 2003-10-20
  • 打赏
  • 举报
 回复
user="DBQ="+server.mappath("user.mdb")+";driver={microsoft access driver(*.mdb)};"
换成这种写法
user="driver={microsoft access driver(*.mdb)};DBQ="+server.mappath("user.mdb")
Gfenlin 2003-10-20
  • 打赏
  • 举报
 回复
楼主，你的rs是什么啊，你看看。
set rs = server.CreatObject("adodb.recordset")
shop_surest:它基于Laravel 5.7 开发的一个小小的电商平台，可以用于新手学习参考
它基于Laravel 5.7 开发的一个小小的电商平台，可以用于新手学习参考 请注意，改项目已经停止维护 ！！！！，仅供参考 欢迎加入微信群: 这里先感谢laravel提供了一个好的平台、包括路上教导的助教，十分感谢你们的...
POS机企业网站系统 v1.0 beat
是一个开源的PHP+MYSQL，拉卡拉POS机网站系统。基本原理就是控制器、模型、视图，强烈推荐新手学习。欢迎全国各种POS机商咨询开发系统。各种系统都可以开发 如用于商业，造成任何损失，请自行负责！功能特点(更多...
新手从零撸一个CLI命令行脚手架工具
课程基础概述本门课程，大喵将会打着大家从零打造一款属于大家自己的 CLI命令行脚手架工具，本课程主要面向新手同学，对命令行工具开发，前端工具开发感兴趣的同学，可以通过本门课程学习到如何使用Node.JS开发一款适配自身项目特色的脚手架命令行工具。并且也会带着大家推送自己开发完成的CLI工具到NPM线上仓库，供所有人下载安装使用。整个课程，大喵会详细讲解所需要依赖的第三方模块包的具体使用，让同学们可以举一反三开发具备自身特色的CLI工具，最终大喵会运用到前面所讲解的基础内容，独立自主开发一个具备 damiao [ add | delete | list | init ] 四种子命令的CLI脚手架工具。CLI命令行工具命令行工具（Cmmand Line Interface）简称cli，顾名思义就是在命令行终端中使用的工具。我们常用的 git 、npm、vim 等都是 cli 工具，比如我们可以通过 git clone 等命令简单把远程代码复制到本地。在目前前端工程大流行的环境下，vue-cli、create-reate-app、angular-cli 等等方便快捷的命令行脚手架工具诞生，极大的提升了我们的开发效率与质量，我们可以通过这些脚手架工具在本地快速构建我们的开发项目。 课程目录结构1、CLI课程介绍   2、CLI课程纲领和讲师介绍3、CLI课程内容概述    4、CLI命令行工具及场景应用5、CLI课程准备工具和技术   6、CLI课程收获和收益  7、CLI课程实战案例介绍   8、npm CLI 命令行工具发展现状9、创建第一个命令行自定义命令   10、process.argv 接收命令行参数11、commander 工具使用介绍一   12、commander 工具使用介绍二13、inquirer 工具使用介绍   14、ora 加载工具使用介绍15、chalk 颜色工具使用介绍   16、download-git-repo 仓库工具介绍17、创建脚手架命令   18、创建命令可执行文件19、damiao add 命令行指令开发   20、damiao add 模板录入校验21、damiao delete 命令行指令开发   22、damiao list 命令行指令开发23、damiao init 初始化项目指令开发   24、damiao init 指令参数输入校验25、damiao 命令行指令测试.mp4  26、创建npm个人账号及发布npm仓库27、全局安装脚手架工具
精仿hao123网址导航系统2015最新版 v2015.rar
百度、淘宝、迅雷、搜狗、谷歌、狗狗、当当、卓越等联盟帐号的集成，增加隐性的收入，你只要去申请一个他们联盟的帐号，然后在后台添加帐号即可，马上用户在使用您的网站搜索时即可产生效益！ 详细说明： 1、...
司科仿美团O2O程序源码最新版+wap+微信版亲测完整版
商家可以建立一个TXT文档，输入订单编号，快递单交给网站运营者，网站运营者在后台上传这个TXT文档， 系统批量给这些订单生成快递单号 每个项目设置自己独立的SEO 每个项目可以在后台设置自己独立的SEO，更利于...
ASP

28,391

社区成员

357,060

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章