Datum och tid för när en databas senast uppdaterats

Permalänk
Medlem

Datum och tid för när en databas senast uppdaterats

Halloj! På en hemsida i asp och med accessdatabaser vill jag på indexsidan visa datum och tid för när några databaser senast är uppdaterade.

Vissa databaser uppdaterar jag manuellt och då fyller jag manuellt i tid och datum i databasen. Vissa databaser uppdateras dock via nätet av mig och av andra.

1. Går det att få någon tid och datum på dem också?
2. Går det att ordna sortering så den senast uppdaterade ligger överst hela tiden?

Här är en exempelkod för en databas jag fyller i själv.

<%
set rUppdat = Request("uppdat")
%>

<%
DBPath = "dbq=" & Server.MapPath("databaser/nyheter.mdb")
Set Database = Server.CreateObject("ADODB.Connection")
Database.Open "driver={Microsoft Access Driver (*.mdb)};" & DBPath

SQLstring = "SELECT * FROM info "

set RS=Database.Execute(SQLstring)

if RS.EOF then
Response.Write("<FONT FACE=verdana SIZE=1 COLOR=navy></B></FONT>")
end if

do while not RS.EOF

Response.Write("<TABLE CELLSPACING=0 WIDTH='100%'><TR>")
Response.Write("<TD ALIGN=left COLSPAN=1><FONT FACE=verdana SIZE=1 COLOR=black><B>Senaste uppdateringar:</B></TR></TD>")
Response.Write("<TR><TD ALIGN=left><FONT FACE=verdana SIZE=1><A HREF=http://www.XXXXXXXXXXX.com/nyheter.asp>Nyheter</A></TD>")
Response.Write("<TD ALIGN=left><FONT FACE=verdana SIZE=1> "&RS("uppdat")&"  "&RS("uppdattid")&"</TD></TR>")

RS.MoveNext
Loop

RS.Close
set RS = Nothing

Database.Close
set Database = Nothing

%>

Visa signatur

[size="1"]1700+ JIUHB 0308MPMW | NF7-S 2.0 | 2 x 256 TwinMos Winbond 3200 | Hercules 8500 LE | Seagate Barracuda 80Gb IV | Enermax EG365P-VE 350W | Alpha PAL 8045 | Enermax 80 mm | Sony Trinitron G420 19"[/size]