Hey... Jeg sidder her og har mange problemer med mit news
system.. Nu er jeg ikke lige en ørn til ASP, men når jeg har
tilføjet en nyhed, så skriver den dato'en sån her: 3/14/2003...
Jeg vil gerne have den til at skrive det sådan her: 14/3/2003...
Hvordan gør jeg det... Dokumentet ligger under..
<%
Response.Buffer = True
' Connection til database
Set Con = Server.CreateObject("ADODB.Connection")
DBPath = "DBQ=" & server.mappath("nyheder.mdb")
Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
' Her hiver vi indholdet af databasen ud, sorterer dem efter dato
Sql = "SELECT * FROM nyheder ORDER BY Dato DESC"
Set Record = Con.Execute(Sql)
%>
<style TYPE="text/css">
td.bottom {
border-top: none;
border-bottom: black 1px solid;
border-left: black 1px solid;
border-right: black 1px solid;
}
td.titel {
border-top: black 1px solid;
border-bottom: none;
border-left: black 1px solid;
border-right: black 1px solid;
background-repeat: no-repeat;
}
td.nyhed {
border-top: black 1px solid;
border-bottom: black 1px solid;
border-left: black 1px solid;
border-right: black 1px solid;
}
td.nederste {
border-top: none;
border-bottom: none;
border-left: none;
border-right: none;
}
table.udenom {
border-top: none;
border-bottom: none;
border-left: none;
border-right: none;
}
</style>
<style><!--a:hover{color:C7C7C7; }--></style>
<style>
<!--
a{text-decoration:none}
//-->
</style>
<html>
</head>
<body background="
http://BoboNic.dk/barf/GFX/bg.gif"
topmargin="0" leftmargin="0" link="#000000" vlink="#000000"
alink="#000000">
<table border="1" cellspacing="" width="100%" height="100%"
bordercolor="#000000">
<tr>
</tr>
<table class="udenom" border="1" cellspacing="0" cellpadding=0
width="100%" bordercolor="#AEAEAE">
<tr>
</tr>
<tr><td></td></tr>
<!-- Her nedenunder smider vi saa nyhederne ud i en tabel -->
<% Do While Not Record.EOF %>
<td background="
http://BoboNic.dk/Barf/GFX/menutop.gif"
bgcolor="FFFFFF" colspan=2 class="titel"><font face="verdana"
color="000000" size="1"><b align="center"><% Response.Write
Record("Titel")%></b></font></td>
</tr>
<tr>
<td colspan="2" class="nyhed" bgcolor="DEDEDE"><font
face="verdana" size="1"><% Response.Write Record("Nyhed")
%></font></td>
</tr>
<tr><td class="bottom"><font face="verdana" size="1">Skrevet af:
<i><% Response.Write Record("Forfatter")%></i> d. <%
Response.Write Record("Dato")%></font></td></tr>
<tr><td class="nederste"> </td></tr>
<%
Record.MoveNext
Loop
%>
<!-- Og her har den saa gjort det, og vi kan afslutte dokumentet
-->
</table>
</table>
</body>
</html>
<%
' Lukke connection
Con.Close
Set Con = Nothing
%>
</font>
--
Danmarks største specialiserede IT jobdatabase
- Udelukkende med IT- og internetrelaterede jobs
- Opret en profil og lad drømmejobbet finde dig
KLIK HER! =>
http://www.html.dk/job