Tæller funktion

<%
' DB CONN
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0; DATA SOURCE=" & Server.MapPath("data.mdb")

' RS(0) indeholder antallet af records
Set RS = Conn.Execute("SELECT COUNT(kolonne) FROM [tabel]")
%>

Så har du jo nok en variabel et sted med nummeret på din aktuelle placering

<%
Response.Write IntPlacering & "/" & RS(0)
%>

Hej

jeg får følgende fejl

Microsoft VBScript runtime error '800a01a8'

Object required: "

Vis mig hvordan dit script ser ud!

du kan ikke blot paste koden ind. De skal ændres til din egen version.

Gør evt. følgende:

1. find count som svar foroven.
2. loop igennem tabelen, sorter efter en kollonne. tilføj så 1 til en fast var. eg:

dim placering_nu, placeringer
placering_nu = 0
placeringer = 0
set rs = conn.execute("select id from hohnsbutik")
do until rs.eof
placeringer = placeringer + 1
if id = billedeid then
placering_nu = placeringer
end if
rs.movenext.
loop

held og lykke.

Det var et svar.