Adodb error help urgent

<i><b>Originally posted by : Hakim (hakim@arabtel.com.kw)</b></i><br /><br />My script file contents are as below<br />_____________________________________________<br /><%@ LANGUAGE="VBscript"%><br /><%<br />Set conn = Server.CreateObject("ADODB.Connection")<br />conn.open "StoreDB","sa"<br /><br />set myrec = Server.CreateObject("ADODB.RecordSet")<br />myrec.open "select * from Product" ,conn , adOpenDynamic, adLockOptimistic,<br />adCmdText<br /><br />if not myrec.eof then<br />response.write(myrec(0))<br />end if<br />%><br />_______________________________________________<br />when i browse this file i get the error below<br /><br />_____________________________________________<br />ADODB.Recordset error '800a0bb9'<br /><br />The application is using arguments that are of the wrong type, are out of<br />acceptable range, or are in conflict with one another.<br /><br />/hakim/new_page_2.asp, line 7<br />______________________________________________<br />can someone please help me out of this?<br />thanks in advance.<br /><br />

<i><b>Originally posted by : venkatesh (bsvenki@hotmail.com)</b></i><br />dear friend.<br /><br />to solve the error, include adovbs.inc file<br />as the following <br /><!-- #include file = "adovbs.inc" --><br /><br />else<br /><br />change you coding as the following<br /><br />conn , 1, 2<br />