Does not support rs.eof

[snowboardr]

I get this error..any ideas?

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'eof'

<%

Set my_conn = Server.CreateObject(&quot;ADODB.Connection&quot;)



my_conn.Open &quot;Provider=Microsoft.Jet.OLEDB.4.0; Data Source=&quot; & Server.MapPath(&quot;database.mdb&quot;) & &quot;;&quot;



Set rs = Server.CreateObject(&quot;ADODB.Recordset&quot;)



strSQL = &quot;SELECT userID, name, email FROM UserEmails&quot; 



' Execute SQL statement

rs = my_conn.Execute(strSQL)



Do while not rs.eof   '# Errors here



Response.Write &quot;User ID# &quot; & rs(&quot;userID&quot;) & &quot;<br>&quot;

Response.Write &quot;Name: &quot; & rs(&quot;name&quot;) & &quot;<br>&quot;

Response.Write &quot;Email: &quot; & rs(&quot;email&quot;) & &quot;<br><br>&quot;



rs.MoveNext

loop



my_conn.close ' Close database connection

set my_conn = nothing 'obj variable released



%>

jason@vzio.com

http://www.vzio.com/images/banners/s_vzio.gif

 

[rac2]

Set rs = my_conn.Execute(strSQL)

 

[GabeC]

You can also use:

rs.open strSQL, my_conn

Thanks,

Gabe