Paging med PWS

Du kan evt. prøve denne paging code generator. Genialt værktøj:

http://www.scriptmate.com/resources/generators/pagingcodegen.asp

//Claus

Jeg har et hvor det kommer ud 4x2, men det kan du bare fjerne..

denne fungere fint i PWS

http://www.activeserverpages.dk/aspdigital/kapitel2/paging.asp

tror nu ikke at det er din PWS der er noget i vejen med ;o)

Kan godt være at i har ret...for nu prøvede jeg lige keysersoze´s script og fik denne fejl:

Microsoft OLE DB Provider for ODBC Drivers fejl \'80040e21\'

ODBC-driver understøtter ikke de ønskede egenskaber.

/paging.asp, linje 14

Og linje 14= \"rs.Open strSQL, strDSN, 1\"

Hvad er der galt!?

/labisama

Da jeg lavede mit skulle det stå sådan her:
rs.Open(Sql), Conn, 1, 3

Det har vist noget at gøre med den måde det åbnes på...

Lars

Jamen kan jeg så ikke få dit script på en måde??


PLEASE HJÆLP!!! :)

/labisama

Min e-mail: markb@mailme.dk

Hvem snakker du til..?

må vi se din strSQL?

Her er så alt fra paging.asp:

<html><head>
<title>Paging af et recordset</title>
</head><body>

<%
intPage = Request(\"page\")
If isNumeric(intPage) = False Or intPage < 1 Then
    intPage = 1
End If

Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"SELECT LinkURL FROM Links\"
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"/db/nyheder.mdb\")
rs.Open strSQL, strDSN, 1
If Not (rs.BOF Or rs.EOF) Then
    rs.PageSize = 10
    rs.AbsolutePage = intPage
    intRecCount = rs.PageSize
    intPageCount = rs.PageCount
    Response.Write \"<p><b>Side \" & intPage & \" af \" & intPageCount & \"</b></p>\"
    Do While Not rs.EOF And intRecCount > 0
        Response.Write rs(\"nyhed\") & \"<br>\"
    intRecCount = intRecCount - 1
    rs.MoveNext
    Loop
End If
rs.Close
Set rs = Nothing

Response.Write \"<p>Gå til side \"
For intNum = 1 To intPageCount
    Response.Write \"<a href=paging.asp?page=\" & intNum & \">\" & intNum & \"</a> \"
Next

Response.Write \"<p>\"
If Clng(intPage) > 1 Then
    Response.Write \"<a href=paging.asp?page=\" & intPage - 1 & \">&lt;&lt;</a>\"
Else
    Response.Write \"&lt;&lt;\"
End If

Response.Write \"&nbsp;\"

If Clng(intPage) < Clng(intPageCount) Then
    Response.Write \"<a href=paging.asp?page=\" & intPage + 1 & \">&gt;&gt;</a> \"
Else
    Response.Write \"&gt;&gt;\"
End If
%>

</body></html>

/labisama

Dette er måske et dumt spørgsmål men har du et felt som hedder LinkURL i en tabel som hedder Links i din database?

nej det har jeg ikke..men det kan da ikke være problemet???

/labisama

Øv...! :(

jo for du har en SQL som siger:
strSQL = \"SELECT LinkURL FROM Links\"

den vælger LinkURL fra tabellen links.

linien under åber åber du et record set
rs.Open strSQL,.....

Så hvis LinkURL ikke findes får du fejl.