Problemer med Recordset.

Set NewsRS = Server.CreateObject("ADODB.RecordSet")
NewsRS.Open(SQLstr, connObj, 3)

Jeg bruger nu...

NewsRS.Open NewsSQL, strDSN, 1

prøv at lave den om til:

NewsRS.Open NewsSQL, strDSN, 3

ingen efekt... hvad er forskellen på 1 og 3...

det er cursortypen der defineres der, kan ikke lige huske de præcise forskelle

prøv evt. at smid hele koden her

Er det ligemeget med parantesen?

jeg mener at VB er ligeglad med det, men jeg koder selv i JS og der skal de være der

<div class="NewsDIV4" style="width: 560px; height: 7px;">&nbsp;</div>
<%
Set NewsRS = Server.CreateObject("ADODB.RecordSet")

intPage = Request.QueryString("page")
If isNumeric(intPage) = False Or intPage < 1 Then
  intPage = 1
End If

NewsSQL = ""
NewsSQL = NewsSQL & "SELECT TOP 10 Nyheder.New_ID, Nyheder.Head, Nyheder.Body, Nyheder.Dato, Nyheder.Forfatter "
NewsSQL = NewsSQL & "FROM Nyheder "
NewsSQL = NewsSQL & "ORDER BY Nyheder.New_ID DESC;"

NewsRS.Open NewsSQL, strDSN, 1

    If Not (NewsRS.BOF or NewsRS.EOF) Then
      NewsRS.PageSize = 10
      NewsRS.AbsolutePage = intPage
      intRecCount = NewsRS.PageSize
      intPageCount = NewsRS.PageCount

  Do While Not NewsRS.EOF And intRecCount > 0
%>
            <div class="NewsDIV1" style="Border-top: 2px; width: 560px;">&nbsp;<%=NewsRS("Head")%></div>
            <div class="NewsDIV2" style="width: 560px;"><%=Replace(NewsRS("Body"), Vbcrlf, "<br />")%></div>
            <div class="NewsDIV3" style="width: 560px;">&nbsp;Af: <%=NewsRS("Forfatter")%> - <%=NewsRS("Dato")%></div>
            <div class="NewsDIV4" style="width: 560px;">&nbsp;</div>
<%
  intRecCount = intRecCount - 1
NewsRS.MoveNext
Loop
End If

NewsRS.close
set NewsRS = Nothing
%>
<%
            If Clng(intPage) > 1 Then
              BackStep = "<a href='Default.asp?Type=INC&Case=FLNEW&Page=" & intPage - 1 & "'><< Forige</a>"
            Else
              BackStep = "<< Forige"
            End if

            If Clng(intPage) < Clng(intPageCount) Then
              FrontStep = "<a href='Default.asp?Type=INC&Case=FLNEW&page=" & intPage + 1 & "'>Næste >></a>"
            Else
              FrontStep = "Næste >>"
            End if

            StepCount = intPage & "/" & intPageCount

            '**********************************************
           
              Response.Write BackStep & " | Side " & StepCount & " | " & FrontStep & "&nbsp&nbsp"
%>

kan ikke lige umiddlebart se nogen fejl, men hvor er din db-forbindelse?

ellers kan du måske finde inspiration her: http://activedeveloper.dk/aspdigital/kapitel2/paging.asp

Den ligger i en anden fil...
Bruger INCLUDE....

StrPath = "d:\FFHAB\Data.mdb"
StrDSN = "Provider = Microsoft.jet.OLEDB.4.0; Data Source =" & StrPath
Set CN = Server.CreateObject("ADODB.Connection")
CN.Open StrDSN

Ahhh... det er simpelthen ikke Fair!!!

Det er slet ingen fejl i det... det er bare fordi at CuteFTP Pro, bare ikke vil overskrive den allerede eksisterende fil, så samme fejl bliver ved med at ligge der...

Nu prøvede jeg at slette filen, og uploade den igen... så virker det...