| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 615 人关注过本帖
标题:[求助]一个ASP注册时出现的问题
只看楼主 加入收藏
genwazung
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-5-8
收藏
 问题点数:0 回复次数:0 
[求助]一个ASP注册时出现的问题

我在弄一个注册文件时,出现了这样一个问题,发出来请教大家:
错误类型:
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: 'provider=microsoft.j'
test/save.asp, 第 21 行

我把我的Save文件发出来给大家看看
conn.asp内容是
<%
dim ConnStr
ConnStr = "provider=microsoft.jet.OLEDB.4.0;data source=" & server.MapPath("data/jjxt.mdb")
%>
save.asp内容如下:
<!--#include file="conn.asp" -->

<%
response.buffer=true

uname=SQLStr(rst("username"))
pwd=SQLStr(rst("password"))
pwd2=SQLStr(rst("password2"))
e_mail=SQLStr(rst("email"))
'sex=rst("sex")
'year=rst("year")
'month=rst("month")
prov=SQLStr(rst("TPL_prov"))
city=SQLStr(rst("TPL_city"))

if pwd=pwd2 and pwd<>"" and uname<>"" and email<>"" then
dim rec
set rec=server.createobject("adodb.recordset")
sql2="select regusername from users where regusername='"&uname&"'"
rec.open sql2,ConnStr,1,1
set rs=ConnStr.execute(sql2)
if not rs.eof then
response.write "用户名已经存在,请选择另外用户名"
response.end
else
sql="insert into users(regadmin,regUsername,regPassword,regEmail,regState,regCity, regtime )values('N','"&uname&"','"&pwd&"','"&e_mail&"','"&prov&"','"&city&"','"&now&"')"
ConnStr.execute(sql)
response.write"<SCRIPT language=JavaScript>alert('恭喜您!成为"&WebName&"的会员,请登录!');"
response.write"this.location.href='login.asp';</SCRIPT>"
end if
end if

set ConnStr=nothing
ConnStr.close

%>
</body>
</html>

哪位高手知道的话,请跟我联系,QQ:524281957,或者在线修改下也行
可能发错地方了,我现在移到ASP区了,麻烦版主给我删掉这篇,谢谢

[此贴子已经被作者于2006-5-8 18:08:44编辑过]

搜索更多相关主题的帖子: ASP 注册 
2006-05-08 17:42
快速回复:[求助]一个ASP注册时出现的问题
数据加载中...
 
   



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

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