Hem

   
 
<%Set Databas = Server.CreateObject("ADODB.Connection") Databas.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("\Gastbok\guestbook2.mdb") Set Poster = Databas.Execute("SELECT *, Format$([datum],'yyyy/mm/dd') AS formdatum FROM Gastbok Order by Id desc") %>

Skriv i gästboken

<%Do Until Poster.EOF%> <% Poster.MoveNext Loop%>
Namn: <%= Poster("Namn")%> Från: <%= Poster("Ort")%> Datum:<%= Poster("FormDatum")%>
Inlägg: <%= Poster("Inlagg")%>

<%Databas.Close%>