Jens GyldenkærneClausen wrote in
dk.edb.internet.webdesign.serverside.asp:
> laursen skrev: 
>  
> > Siderne er bygget op over eksempler fra disse sider. 
>  
> Du skriver i en nyhedsgruppe - ikke på en hjemmeside. Læs evt. 
> <
http://html.dk/nyhedsgrupper/usenet.asp> 
>  
> > Jeg har en indsæt og en hent og en læs side. Kort fortalt. 
>  
> Ja, det var meget kort. Jeg vil stadig gerne se et link til 
> siderne. 
> --  
Den ser sådan her ud:
> <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"
http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Hente data fra database</title>
<meta http-equiv="Content-Type" content="text/html;
charset=iso-8859-1">
<style type="text/css">
<!--
TD {FONT-FAMILY: Arial, Helvetica, sans-serif;FONT-SIZE: 12px;}
body,td,th {
   color: #06275B;
}
a {
   font-family: Arial, Helvetica, sans-serif;
   font-size: 14px;
   color: #003399;
}
a:visited {
   color: #06275B;
   text-decoration: underline;
}
a:hover {
   color: #6699FF;
   text-decoration: none;
}
a:active {
   color: #06275B;
   text-decoration: underline;
}
a:link {
   text-decoration: underline;
   color: #06275B;
}
style2 {font-family: Arial, Helvetica, sans-serif}
h1,h2,h3,h4,h5,h6 {
   font-family: Arial, Helvetica, sans-serif;
}
-->
</style>
<!--
style1 {font-family: Arial, Helvetica, sans-serif}
-->
</style>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN
strSQL = "Select * From personer Order by Efternavn Desc"
Set rs = Conn.Execute(strSQL)
response.write "<TABLE>"
Do 
bgshift=not bgshift
if bgshift then
BG = "bgcolor=#99CCFF"
BC = "#99CCFF"
else
BG = "bgcolor=#FFFFFF"
BC = "#FFFFFF"
end if
   
   response.write "<TR " & BG & " ><TD>" & rs ("Fornavn") &
"</TD><TD>" & rs("Efternavn") & "</TD><TD>" & rs("Telefon") &
"</TD><TD>" & rs("Foedselsdato") & "</TD></TR>"
      rs.MoveNext
Loop until rs.eof 
response.write "</TABEL>"
Conn.Close
Set Conn = Nothing
%>
</body>
<p><a href="navn.asp">Ny bruger</a>
      
<a href="navn.asp">Slet bruger</a></p>
      
</html>
-- 
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
 - Pædagogiske tutorials på dansk
 - Kom godt i gang med koderne
KLIK HER! => 
http://www.html.dk/tutorials