Hej!
Jag har problem med datum i min gästbok.
Datumet skrivs ut: 3/19/2004 5:32:51 PM
Jag skulle vilja att det skrevs ut så här: 2003-11-18 21:43:54
Har sökt runt lite här och la till <%@ LANGUAGE=VBScript LCID=1053 %>, men detta hjälpte inte.
Behöver jag nämna att mina kunskaper i asp är väldigt begränsade än så länge! Tacksam för hjälp här!
<%@ LANGUAGE=VBScript LCID=1053 %>
<html>
<head><title>Gästbok</title>
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body style="margin: 0px;">
<div align="center">
<table width="425" cellpadding="0" cellspacing="0" bgcolor="#052A85" style="padding:10px;">
<%
pg = Trim(Request("pg"))
if pg = "" Then
pg = 1
End If
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../db/gb.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * From gb ORDER BY datum DESC"
RecSet.Open Addera, Conn, 1, 3
RecSet.PageSize = 5
RecSet.AbsolutePage = pg
While Not RecSet.EOF and rowCount < RecSet.PageSize
rowCount = rowCount + 1
%>
<tr>
<td height="86" valign="top"><div align="center">
<table width="300" align="center" cellpadding="5" cellspacing="0">
<tr>
<td bgcolor="#052A85" style="border : 1px solid Black;"> [<%=RecSet("datum")%>] - <a href="mailto:<%=RecSet("mail")%>"><%=RecSet("namn")%></a> | <a href="delete.asp?id=<%=RecSet("id")%>">Radera</a>
</td>
</tr>
<tr>
<td bgcolor="#CB0101" style="border-top: 1px solid #FFFFFF; border-bottom: 1px solid #FFFFFF;"><font color="#FFFFFF"><%=RecSet("inlagg")%><br>
<br>
</font> </td>
</tr>
<tr>
<td bgcolor="#052A85" style="border : 1px solid Black;"> Hemsida:
<a href="<%=RecSet("url")%>" target="blanK"><%=RecSet("url")%></a></td>
</tr>
</table>
</div></td>
</tr>
</table>
<br>
<%
RecSet.MoveNext
Wend
%>
<%
If RecSet.PageCount > 1 Then
For i = 1 to RecSet.PageCount
If i <> cINT(pg) Then
%>
<a href="gb.asp?pg=<%=i%>"><%=i%></a>
<% else %>
<b><%=i%></b>
<%
end if
next
end if
%></div>