大虾帮忙啊！为什么我这段程序总是出错？谢谢！！

[Tikyliu]

..........................
elseif doparam="pass" then '验证
dim rs5
Set rs5 = userconn.Execute( "update personalinfo set pass='y' Where id=" & param )
Response.Write "已经通过验证！"
dim email,emailrs
set emailrs=myconn.execute("select name,email from personalinfo where id="¶m )
if not emailrs.eof then
email=emailrs.fields("eamil").value
name=emailrs.fields("name").value
dim ojmail
Set oJmail=Server.CreateObject("Jmail.Message")
oJmail.Silent=True
oJmail.From="[e-mail]"
oJmail.FromName="美宝网"
oJmail.AddRecipient (email)
oJmail.Subject="您的注册信息已经通过美宝网（http://www.myboll.com）验证！"
oJmail.Body=name&"，您好："&vbCrLf&vbCrLf&"您已经通过美宝网（http://www.myboll.com）验证。欢迎登陆美宝网获得所有在线支援。"&vbCrLf&"http://www.myboll.com 美宝网"
oJmail.Send("Mail.myboll.com")
end if
else
Response.Write "调用错误！"
end if
我这段程序总是提示set emailrs=myconn.execute("select name,email from personalinfo 这句缺少对象: ''
为什么啊？望各位大虾不惜指教啊。

[damboo]

那就应该是myConn没有定义
我看你上面好像用的是userConn呀

[Tikyliu]

我的userconn是包含在myconn里面的啊！！！我的myconn.inc文件的内容如下：
<%
dim userconn,connstr
connstr="DBQ="+server.mappath("../../mydb/itnews.mdb")+ _
";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" + _
"DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;" + _
"MaxBufferSize=1024;MaxScanRows=18;PageTimeout=5;" + _
" SafeTransactions=0;Threads=12;UserCommitSync=Yes;"
set userconn=server.createobject("ADODB.CONNECTION")
userconn.open connstr
%>
而且我上面的调用是这样的：
<!-- #include file="../../inc/myconn.inc" -->
望再指教！！谢谢！！！

[nssp]

连接对象的名字是userconn而不是myConn,把set emailrs=myconn.execute("select name,email from personalinfo …这句改成set emailrs=userconn.execute("select name,email from personalinfo …

[Tikyliu]

我这样做了，可是又出现了这样的提示：
ADODB.Recordset 错误 '800a0cc1'

项目在所需的名称或序数中未被发现。

/users/super/the_info_main.asp，行130
也就是说email=emailrs.fields("eamil").value这句错误啊。
可是我数据库里面的字段是绝对不会错的啊。
望各位赐教！！谢谢！！！

[voidroom]

email=emailrs.fields.count

[Tikyliu]

什么意思？是这样写吗？
email=emailrs.fields("email").count，若是这样，则错误相同；若直接这样写:email=emailrs.fields.count，则根本行不通.
望指教谢谢！！

[damboo]

首先，看了你的程序，肯定是用userconn
另外，看你上面的程序，把email写成了eamil，不知道是你贴错了还是程序就是写错了
这种错误是最亏的，以后多小心
其实，你用email=trim(emailrs("email"))就行了

[Tikyliu]

谢谢各位的帮忙，更多的感谢damboo(淡泊)朋友和nssp()朋友 ，惭愧啊，实在惭愧，没想到一个小小的问题，竟然把我搞成这样！！谢谢！！