2 spm om acces database og asp

Hallo, er der ingen der vil hjælpe ??

Ingen hjælp

jabp: Kan ikke hjælpe dig, men bare rolig..
giv tid, og så kommer der sikkert nogle i aften.
Det er et \"dumt\" tidspunkt på den måde, at nogle måske er på vej hjem, andre igang med at lave mad mv.
Så mon ikke der kommer nogle i aften???

vedr. 2 ved jeg at der på www.asp.dk eller www.activeserverpages.dk er et script hvor der vises hvordan.

spg 1 er en random ting, som der kan findes utallige af rundt omkring...Det bliver oftest brugt til banner visninger ol. (jeg har selvfølgelig ikke noget link..)

spg2
Kaldes paging, findes rigtig nok på activeserverpages.dk
<http://www.activeserverpages.dk/aspdigital/kapitel2/paging.asp>

Jeg har selv lavet noget til spm 2, men er der ikke en der har en kode til spm 1.

sure...

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"vitser.mdb\")

Set Record =  Conn.Execute(\"Select count(*) as Found from tabel\")

    Ialt = Record(\"found\")

Set Record =  conn.Execute(\"Select * from vits\")

Randomize
RandNum = Int(Rnd * Ialt)

Record.MoveFirst

For i = 1 to RandNum

    Record.MoveNext

next

vits = record(\"vits\")


Conn.Close
Set Conn = Nothing

Response.write vits
   
%>

en lidt mere overskuelig kode:

<%
set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"db.mdb\")

set rs = Server.CreateObject(\"ADODB.Recordset\")
SQL = \"SELECT * FROM tabel\"
rs.Open SQL, Conn, 1

randomize
rs.Move(int(rs.RecordCount * rnd))
%>
<%=rs(\"id\")%>, <%=rs(\"felt\")%><br><br>

Hvad nu hvis der er nogle huller i denne id så vil der opstå en fejl?!? Ikke?

nej

Hejsa

Mange tak.

Jeg giver point til fox2k og tpiil