Click to See Complete Forum and Search --> : MSSQL 2 MYSQL rs paging dont work


dan187
08-04-2003, 02:11 PM
hi

i am new to mysql and now i have a problem i cant find any solution for ... i would make a page counter for my recordset an the code below works fine in every project i have made using mssql server. now with mysql i get the bottom error message and equal what i ve done with cursor type or location have fixed it .

any idea what to do ?



<%
SQL = "Select UserID,UserNick,UserEmail,Aktiv,LastLogin,Gruppe,Logincount from tabUser order by UserNick ASC"

intCounter = 1
AbsolutePage = Request("PN")

Set rs = Server.CreateObject("ADODB.Recordset")



rs.PageSize = 20
rs.CacheSize = 20

rs.Open SQL, db, 3, 3

If AbsolutePage = "" Or Not IsNumeric(AbsolutePage) Or CInt(AbsolutePage) > CInt(rs.PageCount) Then
AbsolutePage = 1
End if

if not rs.eof then
rs.AbsolutePage = AbsolutePage
strBgcolor = "#ececec"
strcounter = 1
do until rs.eof And intCounter <= 20

if strBgcolor = "#CCCCCC" then
strBgcolor = "#ececec"
Else
strBgcolor = "#CCCCCC"
End if

%>
<tr bgcolor="<%= strBGColor %>">
<td ><strong><%= strCounter %> .</strong></td>
<td><%= rs("UserID") %></td>
<td><%= rs("UserNick") %></td>
<td><%= rs("UserEmail") %></td>
<td><%= rs("LastLogin") %></td>
<td><%= rs("Logincount") %></td>






Kompilierungsfehler in Microsoft VBScript- Fehler '800a03ea'
Syntaxfehler

/iisHelp/common/500-100.asp, line 160

elseIf (objASPError.Description > "") Then
^
ADODB.Recordset- Fehler '800a0cb3'

Das aktuelle Recordset unterstützt keine Lesezeichen. Hierbei handelt es sich möglicherweise um eine Einschränkung seitens des Providers oder des gewählten Cursortyps.

/ncj/admin/user.asp, line 73

dan187
08-05-2003, 06:25 AM
sorry for the german .. i ve found a solution (code above was only a short part) ...

solution :

myysql dont know the pagecount parameter ... you must work with the limit command in the sql string and after that calculate how many pages you have