我向数据库里添加数据
这个代码不可以啊
哪位帮我看看差到哪了/？？？？
<%
uid=Request.Form("uid")
upwd=Request.Form("upwd")
email=Request.Form("email")
conn="provider=microsoft.jet.oledb.4.0;data source=C:\Inetpub\wwwroot\lb\db1.mdb;persist security info=false"
set strconn=Server.CreateObject("adodb.connection")
strconn.open conn
set objrs=Server.CreateObject("adodb.recordset")
objrs.Open "select *from lxr where uid='"&uid&"'",conn
if not objrs.eof then
addnew
objrs(0)=uid
objrs(1)=upwd
objrs(2)=email
update
Response.Write ("<script language=javascript>alert('有相同用户名');</script>")
Response.Redirect"reg.asp"
else Response.Write("<script language=javascript>alert('有相同用户名');</script>")
Response.Redirect"reg.asp"
end if
%>

[QUOTE]conn="provider=microsoft.jet.oledb.4.0;data source=C:\Inetpub\wwwroot\lb\db1.mdb;persist security info=false"
set strconn=Server.CreateObject("adodb.connection")
strconn.open conn[/QUOTE]
上面这几行，把strconn跟conn交换位置

可我怎么感觉交换位置是错的呢
还有别的地方是错的 吗

提示哪行错了，具体错误信息是什么，笨！

if not objrs.eof then
Response.Write ("<script language=javascript>alert('有相同用户名');</script>")
Response.Redirect"reg.asp"
else
objrs.addnew
objrs(0)=uid
objrs(1)=upwd
objrs(2)=email
objrs.update
end if

把strconn跟conn交换位置
就提示错误

错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: 'provider=microsoft.j'
/lb/yz.asp, 第 17 行

不交换不提示错误，但数据库里没被添加信息

islet今天还上班啊？

上班 明天不上

昨天累死了 一天做了4家网站程序

同是天涯苦命人