Dato nyheden er posted !

Du smider da bare Date() eller now() i dit databasefelt når nyheden bliver oprettet.

som jeg forstår det skal du også kunne smide gamle nyheder ind i dit system, så laver du bare et felt der hedder dato, og sætter dette ind i databasen sammen med de andre informationer i din sql...

Hvis det er aktuelle nyheder altså fra den dag det er nu, smider du en now() ind i stedet...

Hvor skal jeg smide den now() ind henne ?

I det textfelt hvor der kan indtastes dato i øjeblikket ?

Jeg har mistet overblikket lige nu :o/

kom lige med din sql sætning...

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db/nyheder.mdb")
Conn.Open DSN

' SQL sætning opbygges
strSQL = "Insert into nyheder ("

strSQL = strSQL & "titel, "
strSQL = strSQL & "nyhed, "
strSQL = strSQL & "dato, "
strSQL = strSQL & "forfatter) "

strSQL = strSQL & "values( "

strSQL = "INSERT INTO nyheder (titel, nyhed, dato, forfatter) VALUES('"& Request.Form("titel") &"','"& Request.Form("nyhed") &"','"& Request.Form("dato") &"','"& Request.Form("forfatter") &"')"

' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db/nyheder.mdb")
Conn.Open DSN

' SQL sætning opbygges
strSQL = "Insert into nyheder ("

strSQL = strSQL & "titel, "
strSQL = strSQL & "nyhed, "
strSQL = strSQL & "dato, "
strSQL = strSQL & "forfatter) "

strSQL = strSQL & "values( "

strSQL = "INSERT INTO nyheder (titel, nyhed, dato, forfatter) VALUES('"& Request.Form("titel") &"','"& Request.Form("nyhed") &"','"& now() &"','"& Request.Form("forfatter") &"')"

' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db/nyheder.mdb")
Conn.Open DSN

' SQL sætning opbygges
strSQL = "INSERT INTO nyheder (titel, nyhed, dato, forfatter) VALUES('"& Request.Form("titel") &"','"& Request.Form("nyhed") &"','"& now() &"','"& Request.Form("forfatter") &"')"

' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

Tusind tak :)
Der var vist osse en masse overflødigt kode i min SQL hva :D

det må man sige :-)

Velbekomme..