> http://www.assetresearch.com/clog/count.asp
>
> I believe permissions for the IUSR_machine are correct as I am able
> to add and delete records from the database through other ASP pages
> in the site. Any ideas on what Class needs to be re-registered. If
> so, how do I do it?
>
> <%
> set conn=Server.CreateObject("ADODB.Connection")
> conn.Provider="Microsoft.Jet.OLEDB.4.0"
> conn.Open(Server.Mappath("clogin.mdb"))
> conn.CursorLocation = 3
>
> set rs=Server.CreateObject("ADODB.recordset")
> sql="SELECT * FROM users"
> rs.Open sql,conn
>
> if rs.Supports(adApproxPosition)=true then

"Bob Barrows [MVP]" <reb01501@NOyahoo.SPAMcom> wrote in message
news:uIfnRUtGFHA.2136@TK2MSFTNGP14.phx.gbl...
> Martin Franklin wrote:
> > I am trying to get a total record count on a Acess 97 mdb database.
> > However I get the following error when I try to load the page:
> >
> > Provider error '80040154'  Class not registered
>
> Which one is line 17?
>
> > http://www.assetresearch.com/clog/count.asp
> >
> > I believe permissions for the IUSR_machine are correct as I am able
> > to add and delete records from the database through other ASP pages
> > in the site. Any ideas on what Class needs to be re-registered. If
> > so, how do I do it?
> >
> > <%
> > set conn=Server.CreateObject("ADODB.Connection")
> > conn.Provider="Microsoft.Jet.OLEDB.4.0"
> > conn.Open(Server.Mappath("clogin.mdb"))
> > conn.CursorLocation = 3
> >
> > set rs=Server.CreateObject("ADODB.recordset")
> > sql="SELECT * FROM users"
> > rs.Open sql,conn
> >
> > if rs.Supports(adApproxPosition)=true then
>
> This is the wrong property to check for Supports. It's Bookmarkability
that
> determines whether or not the cursor supports recordcount. Anyways, you
set
> cursorLocation to 3 above, so you have a client-side cursor that
> automatically supports recordcount because a client-side cursor is always
a
> Static cursor which supports recordcount.
>
> >  i=rs.RecordCount
> >  response.write("The number of records is: " & i)
> > end if
> > rs.Close
> > conn.Close
> > %>
> >
> > Any help is this matter is greatly appreciated:)
>
>
> As a guess, you have an Access97 database which uses Jet 3.51, and you are
> using the Jet 4.0 provider to open it. I have never had a problem with
this,
> but then again, I never use the RecordCount property, so this error may
have
> been waiting in the wings for me all this time.
>
> Bob Barrows
>
> --
> Microsoft MVP - ASP/ASP.NET
> Please reply to the newsgroup. This email account is my spam trap so I
> don't check it very often. If you must reply off-line, then remove the
> "NO SPAM"
>
>

> *Martin Franklin wrote:
> > Mr. Barrows
> >
> > One thing I failed to mention in my original post is the fact that
> > this code works on my testing server. My problem arises when I try > to
> > run the same page on my ISP's web server. I've actually tested > this
> > code on two of my own web servers without any problems. Line 17
> > pertains one of the following lines of code below. My development
> > tool lists line 17 as  'rs.Open sql, conn'   but I believe the > true
> > offending line of code pertains to the line below it
> > 'i-rs.RecordCount' .
>
> Have you commented out the line to verify this belief?
>
> >
> > rs.Open sql,conn
> >  i=rs.RecordCount
> >
> > I've further trimmed my code as suggested by removing  'if
> > rs.Supports(adApproxPosition)=true then' . Thanks for the catch. > My
> > new complete code is...
> >
> 1>  <%
> 2> set conn=Server.CreateObject("ADODB.Connection")
> 3> conn.Provider="Microsoft.Jet.OLEDB.4.0"
> 4> conn.Open(Server.Mappath("clogin.mdb"))
> 5> conn.CursorLocation = 3
> 6>
> 7> set rs=Server.CreateObject("ADODB.recordset")
> 8> sql="SELECT * FROM users"
> 9> rs.Open sql, conn
> 10>
> 11>   i=rs.RecordCount
> 12>   response.write("The number of records is: " & i)
> 13>
> 14> rs.Close
> 15> conn.Close
> 16> %>
> >
> > Perhaps my question would be better suited for a form on IIS > config.
> > Any further suggestions are greatly appreciated.
>
> All I can suggest is an MDAC upgrade/repair on the server which is > giving
> you  the problem..
>
> Bob Barrows
> --
> 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. *