Object doesn\'t support this property or method: \'rs.cachesize\'

Du kan ikke sætte disse properties på et connection objekt (set rs = Server.CreateObject(\"ADODB.Connection\")). Kun på er Recordset objekt. (Server.CreateObject(\"ADODB.RecordSet\")).

Mvh Mark

Nu får jeg denne fejl istedet...

Microsoft VBScript runtime error \'800a01bd\'

Object doesn\'t support this action

/newpage.asp, line 13

Nu får jeg denne fejl istedet...

Microsoft VBScript runtime error \'800a01bd\'

Object doesn\'t support this action

/newpage.asp, line 13

Og er linien rs.cachesize=10? Hvordan laver du dit recordset objekt? Du kan f.eks ikke lave et rs = Conn.Execute(\"bla bla bla\"). Du skal derimod lave et Set rs = Server.CreateObject(\"ADODB.RecordSet\"). Og så rs.Open \"blablabla\".

Mvh Mark

Jeg har forsøgt med server=localhost og dns=localhost
samt Server.CreateObject(\"ADODB.RecordSet\") og
Server.CreateObject(\"ADODB.Connection\")

??

Prøv at skriv hele den kode du bruger nu. (altså toppen med asp koden)

Jeg er lidt grøn i dette her - det jeg ikke forstår er at det ser ud som at jeg på en eller anden måde har sat min egen win2k + mysql + pws op til at acceptere koden - men min udbyders unix maskine med mysql vil ikke lege med .
NB begge databaser er identiske !!!

2 sec..

<!--#include file=\"ADOVBS.INC\"-->
<%
mypage = request.querystring(\"side\")
if mypage = \"\" then
mypage=\"1\"
end if

strDNS = \"driver={MySql};server=localhost;Database=opin;uid=xam;pwd=kerfi\"
strSQL = \"SELECT * FROM esol\"
set rs = Server.CreateObject(\"ADODB.RecordSet\")

rs.cursorlocation=aduseclient
rs.cachesize=10
rs.open strSQL,strDNS
rs.movefirst
rs.pagesize=1 \' Her angives antal poster pr. side
maxpages=rs.pagecount
maxrecs=rs.pagesize
rs.absolutepage=mypage
howmanyrecs=0
%>

<table>
<tr>
<td colspan=\"3\">side <%=mypage%> af <%=maxpages%></td>
</tr>
<%
DO UNTIL rs.EOF OR howmanyrecs>=maxrecs
id = rs(\"id\")
navn = rs(\"overskrift\")
url = rs(\"tekst1\")
%>
<tr>
<td><%=id%></td><td><%=navn%></td><td><%=url%></td>
</tr>
<%
rs.MoveNext
howmanyrecs=howmanyrecs+1
Loop
rs.Close
Set rs = Nothing
%>
</table>

<%
response.write \"<table><tr>\"
response.write \"<td>\"
if not mypage = \"1\" then
response.write \"<a href=\'links3.asp?side=\" & (mypage - 1) & \"\'>Forrige</a> \"
end if
Response.Write \"[\"
for counter=\"1\" to maxpages
If counter >= maxpages then
end if
response.write \"<a href=\'links3.asp?side=\" & counter & \"\'>\" & counter & \"</a>\"
if counter <> maxpages then response.write \" \"
next
Response.Write \"]\"
If clng(mypage) < clng(maxpages) then
response.write \" <a href=\'links3.asp?side=\" & mypage + 1 &\"\'>Næste</a>\"
end if
response.write \"</td>\"
response.write \"</tr></table>\"
%>

Prøv at bytte din top:

<%
mypage = request.querystring(\"side\")
if mypage = \"\" then
mypage=\"1\"
end if

strDNS = \"driver={MySql};server=localhost;Database=opin;uid=xam;pwd=kerfi\"
strSQL = \"SELECT * FROM esol\"
set rs = Server.CreateObject(\"ADODB.RecordSet\")

rs.cursorlocation=aduseclient
rs.cachesize=10
rs.open strSQL,strDNS
rs.movefirst
rs.pagesize=1 \' Her angives antal poster pr. side
maxpages=rs.pagecount
maxrecs=rs.pagesize
rs.absolutepage=mypage
howmanyrecs=0
%>

Ud med denne top:

<%
mypage = request.querystring(\"side\")
if mypage = \"\" then
mypage=\"1\"
end if

strDNS = \"driver={MySql};server=localhost;Database=opin;uid=xam;pwd=kerfi\"
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.Open strDNS

strSQL = \"SELECT * FROM esol\"
set rs = Server.CreateObject(\"ADODB.RecordSet\")

rs.cursorlocation=aduseclient
rs.cachesize=10
rs.open strSQL,strDNS
rs.movefirst
rs.pagesize=1 \' Her angives antal poster pr. side
maxpages=rs.pagecount
maxrecs=rs.pagesize
rs.absolutepage=mypage
howmanyrecs=0

rs.Open \"strSQL\"
%>

:-(

Microsoft VBScript runtime error \'800a01bd\'

Object doesn\'t support this action

/newpage.asp, line 16

- linie 16 er den med rs.cachesize=10

Prøv lige denne, jeg lavede en lille fejl:

<%
mypage = request.querystring(\"side\")
if mypage = \"\" then
mypage=\"1\"
end if

strDNS = \"driver={MySql};server=localhost;Database=opin;uid=xam;pwd=kerfi\"
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.Open strDNS

strSQL = \"SELECT * FROM esol\"
set rs = Server.CreateObject(\"ADODB.RecordSet\"), conn, 1, 3
rs.open strSQL

rs.cachesize=10
rs.pagesize=1 \' Her angives antal poster pr. side
maxpages=rs.pagecount
maxrecs=rs.pagesize
rs.absolutepage=mypage
howmanyrecs=0
%>

Jeg har fjerne et par ting som du ikke behøver da de er standard.

Microsoft VBScript compilation error \'800a0401\'

Expected end of statement

/newpage.asp, line 13

set rs = Server.CreateObject(\"ADODB.RecordSet\"), conn, 1, 3
-----------------------------------------------^

argh, jeg lavede lige en dummefejl :)

<%
mypage = request.querystring(\"side\")
if mypage = \"\" then
mypage=\"1\"
end if

strDNS = \"driver={MySql};server=localhost;Database=opin;uid=xam;pwd=kerfi\"
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.Open strDNS

strSQL = \"SELECT * FROM esol\"
set rs = Server.CreateObject(\"ADODB.RecordSet\")
rs.open strSQL, conn, 1, 3

rs.cachesize=10
rs.pagesize=1 \' Her angives antal poster pr. side
maxpages=rs.pagecount
maxrecs=rs.pagesize
rs.absolutepage=mypage
howmanyrecs=0
%>

Desværre -

Microsoft VBScript runtime error \'800a01bd\'

Object doesn\'t support this action

/newpage.asp, line 16

Jeg takker for din tålmodighed

Har du mod på mere ? :-)

Jeg er ikke sikker på dette, men såvidt jeg husker så understøtter MySQL databasen ikke recordset caching? Eller husker jeg forkert. Under alle omstændigheder så gør det ikke nogen specielt stor forskel om du cacher eller ej.

Du ved gost at du kun må oprette et spm engang ikke ?

http://www.eksperten.dk/spm/134344

Men helt ærligt hvor svært kan det være, nu har jeg lavet et eksempel:

http://www.netsrac.dk/netsrac-dk/asp0006.asp

Det var et svar!

Jaaah - du får mine point som tak for god kamp :-)
Jeg må kigge mig om efter en anden måde at lave paging på -

Jeg læste på zoidberg noget om LIMIT kunne bruges?

mvh
MAX

ØHH hvad gør jeg nu ?

undskyld det der med de 2 spørgsmål :-))

Jeg sender 30 til orca og 60 til netsrac

MAX

pascinell >> Det eksempel jeg har lavet er netop med limit, det andet pis kan du godt smide a h til.

Trykker på avanceret i bunden af siden :)

Kære netsrac

du er en knag ;-)

meeen jeg får denne fejl..

Paging med mySQL Hvor svært kan det være ?
Microsoft VBScript runtime error \'800a01b6\'

Object doesn\'t support this property or method: \'server\'

/anewpage.asp, line 27

prøv at skriv linien med fejlen

Jeg byttede server ud med dns - og så var den der -


MANGE TAK

endelig kan jeg komme videre...

MAX

Øhm... tak for point, men skulle netsrac ikke have nogen?

Jo han fik også sine point.

Tak for din hjælp.

Nææ jeg fik ikke nogen point...øv øv

ok, det var så lidt. og tak for points

Har du ikke fået dem - hånden på hjertet  jeg sendte den -
fortæl mig hvordan jeg gør det om ?

Den eneste måde du kan gøre det om på er ved at lave et nyt spm. der hedder point til netsrac også et link til dette spm. men det er ligemeget :)

Jamen jeg kan godt finde på et nyt spørgsmål som du kan få dine point på...

se nyt spørgsmål