| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1169 人关注过本帖
标题:求教高手。这个网页打不开的原因,运行出错缺少对象Microsoft VBScript 运行 ...
只看楼主 加入收藏
renzailvtuAB
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2011-11-18
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:6 
求教高手。这个网页打不开的原因,运行出错缺少对象Microsoft VBScript 运行时错误 (0x800A01A8)
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.open "DRIVER=Driver do Microsoft Access (*.mdb);UID=admin;PWD=;DBQ="&Server.MapPath("fifasp.mdb")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>注册结果</title>
<style type="text/css">
<!-
body {
margin-top: 0px;
margin-bottom: 0px;
background-image: url();
background-repeat: no-repeat;
}
-->
</style></head>
<body>
欢迎光临我的网站

<%
set rst=Server.CreateObject("ADODB.recordset")
set rst1=conn.Execute("insert into info (i_uid,i_pwd) values('"& request.form("f_user") & "','" & request.form ("f_code") & "')")
 %>

</body>
</html>
搜索更多相关主题的帖子: 网站 注册 Microsoft content admin 
2011-11-18 22:08
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1215
专家分:1376
注 册:2005-3-14
收藏
得分:0 
这不是全部的代码吧?有提示哪一行出错吗?

http://toorup.3v.do
loading...
2011-11-19 15:45
renzailvtuAB
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2011-11-18
收藏
得分:0 
回复 楼主 renzailvtuAB
set rst1=conn.Execute("insert into info (i_uid,i_pwd) values('"& request.form("f_user") & "','" & request.form ("f_code") & "')")
就是这句代码,说缺少对象,我是刚学asp这句的代码我是照着打的,在dr软件里面浏览时老是这样的。急死了。求教!
2011-11-19 21:25
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1215
专家分:1376
注 册:2005-3-14
收藏
得分:0 
<%
set rst=Server.CreateObject("ADODB.recordset")
set rst1=conn.Execute("insert into info (i_uid,i_pwd) values('"& request.form("f_user") & "','" & request.form ("f_code") & "')")
%>
你把这句把成如下看看是什么结果?
<%
response.write request.form("f_user") & "<br>"
response.write request.form ("f_code")
%>

http://toorup.3v.do
loading...
2011-11-19 22:07
hsbwp1314
Rank: 2
来 自:湖南长沙
等 级:论坛游民
帖 子:88
专家分:25
注 册:2008-12-1
收藏
得分:0 
你这是看的fif小组的视频教程吧
2011-11-20 09:58
hsbwp1314
Rank: 2
来 自:湖南长沙
等 级:论坛游民
帖 子:88
专家分:25
注 册:2008-12-1
收藏
得分:0 
我跟你一样的,请高手帮我们看看,我把原代码传上来了。
请帮忙看看.rar (36.39 KB)

图片附件: 游客没有浏览图片的权限,请 登录注册
图片附件: 游客没有浏览图片的权限,请 登录注册
2011-11-20 12:17
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1215
专家分:1376
注 册:2005-3-14
收藏
得分:20 
回复 5楼 hsbwp1314
你这个数据库里没有建立连接,
你把下面这个加进到db.inc.asp就是了:


<%
dim conn
dim connstr
connstr="DBQ="+server.mappath("fifasp.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>

前面楼主的入到这里面可以运行得了没问题,未出错
result.asp
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.open "DRIVER=Driver do Microsoft Access (*.mdb);UID=admin;PWD=;DBQ="&Server.MapPath("fifasp.mdb")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>注册结果</title>
<style type="text/css">
<!-
body {
margin-top: 0px;
margin-bottom: 0px;
background-image: url();
background-repeat: no-repeat;
}
-->
</style></head>
<body>
欢迎光临我的网站



<%
set rst=Server.CreateObject("ADODB.recordset")
set rst1=conn.execute("insert into user (u_user,u_code) values ( '"& request.Form("f_user") &"' ,'"& request.Form("f_code") & "')")
%>
</body>
</html>

http://toorup.3v.do
loading...
2011-11-20 17:53
快速回复:求教高手。这个网页打不开的原因,运行出错缺少对象Microsoft VBScrip ...
数据加载中...
 
   



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

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