我在弄一个注册文件时，出现了这样一个问题，发出来请教大家：
错误类型：
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，或者在线修改下也行

你的语句中缺少驱动设置程序啊！
加上就可以了

能具体点么，我是菜鸟，不太会调试，我上面不是有了ConnStr = "provider=microsoft.jet.OLEDB.4.0么，现在急呀，哪位帮我改改呀

ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(data/jjxt.mdb)
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr