这个提示出错的信息是什么原因导致的？

[ckxp]

set rsr=server.CreateObject("adodb.recordset")
rsr.Open "select username from [user] where userid="&rs("userid") ,conn,1,1
response.Write rs("userid")
usernames=trim(rsr("username")) '//这名出错，上一句可以正常显视，而且user表中有username的字段。
rsr.Close
set rsr=nothing

//错误 '80020009'
发生意外。


这是为什么呢？

[Jaron]

PRB: 80020009 Error When Retrieving Data from SQL [adobj]
　　http://support.microsoft.com/support/kb/articles/q175/2/39.asp
　　HOWTO: Troubleshoot "80020009 Exception Occurred" for DE Command[istudio]
　　http://support.microsoft.com/support/kb/articles/q253/7/79.asp
　　Creation of MSSearch Query Object Returns Error 80020009 [sitemcis]
　　http://support.microsoft.com/support/kb/articles/q191/4/10.asp