Jack wrote:
> Hi,
> I am trying to retrieve values from a query in a list box. However,
> it is giving me no recordset. Although I get recordset when I query
> this access database. Any help for resolution on this is appreciated.
> Thanks
>
> CODE:
> <%
> Dim oConn
> Dim oRS
> Dim vCS
> Dim sqltxt
>
> set oConn=server.CreateObject("ADODB.connection")
> vCS = "Provider=Microsoft.Jet.OLEDB.3.51"

> vCS = vCS & "; Data Source=C:\Sailors.mdb"
> oConn.connectionstring = vCS
> oConn.Open
>
> set oRS = server.CreateObject("ADODB.recordset")
> sqltxt = "SELECT BoatName, BoatClass FROM Boats;"
> oRS.Open sqltxt,oConn

"Bob Barrows [MVP]" wrote:

> Jack wrote:
> > Hi,
> > I am trying to retrieve values from a query in a list box. However,
> > it is giving me no recordset. Although I get recordset when I query
> > this access database. Any help for resolution on this is appreciated.
> > Thanks
> >
> > CODE:
> > <%
> > Dim oConn
> > Dim oRS
> > Dim vCS
> > Dim sqltxt
> >
> > set oConn=server.CreateObject("ADODB.connection")
> > vCS = "Provider=Microsoft.Jet.OLEDB.3.51"
>
> Why 3.51? You're not using a database that's that old are you? Use the
> 4.0 provider.
>
> > vCS = vCS & "; Data Source=C:\Sailors.mdb"
> > oConn.connectionstring = vCS
> > oConn.Open
> >
> > set oRS = server.CreateObject("ADODB.recordset")
> > sqltxt = "SELECT BoatName, BoatClass FROM Boats;"
> > oRS.Open sqltxt,oConn
>
> I see no major problems here. Do you have an On Error Resume Next
> statement anywhere that is masking your errors?
>
> --
> Microsoft MVP -- ASP/ASP.NET
> Please reply to the newsgroup. The email account listed in my From
> header is my spam trap, so I don't check it very often. You will get a
> quicker response by posting to the newsgroup.
>
>