Opret dato og klok til nyhed

Du skal tilføje et felt i tabellen af typen dato/klokkeslet og i SQL-sætningen indsættes dags dato i feltet sammen med nyheden.

Session.LCID = 1033
strDate = Now ' Gem dato/tid i engelsk format
Session.LCID = 1033 ' Vælg evt. dansk igen

Så skal SQL-sætningen udvides

Ok jeg har nu lavet et felt i databasen der heller dato, men hvordan ligger jeg dato og klokkeslet ind fx. her:

<table width="170" border="0" cellspacing="0" cellpadding="0">
                                      <tr>
                                        <td class="nyheder">
                                          <div align="right">Her skal dato og klok stå???</div>
                                        </td>
                                      </tr>
                                    </table>

<table width="170" border="0" cellspacing="0" cellpadding="0">
                                      <tr>
                                        <td class="nyheder">
                                          <div align="right"><%=Date%><div>
                                        </td>
                                      </tr>
                                    </table>

Når du udskriver nedenstående har du vel fat i en post fra tabellen. ?

table width="170" border="0" cellspacing="0" cellpadding="0">
                                      <tr>
                                        <td class="nyheder">
                                          <div align="right"><%RS("Dato")%></div>
                                        </td>
                                      </tr>
                                    </table>

Jeg har sat det ind: <%RS("dato")%> men jeg får en fejl der siger:

Der opstod en Microsoft VBScript-kørselsfejl fejl '800a01b6'
Objektet understøtter ikke denne egenskab eller metode
/tab2/nyheder.asp, linje 151

Ved du hved det betyder?? Der er data i alle felterne..

Kan du ikke finde fejlen?

Jo - Du har ikke fat i en post fra databasen når du udskriver linierne.

Ok - hvordan får jeg klokkeslet på også ??

Nu er jeg slet ikke med. ?

Hvis du blot skal udskriv tiden her og nu så er det på denne måde.

table width="170" border="0" cellspacing="0" cellpadding="0">
                                      <tr>
                                        <td class="nyheder">
                                          <div align="right"><%=Now%><div>
                                        </td>
                                      </tr>
                                    </table>

MEN - hvis du skal gemme tidspunktet sammen med nyheden og vise den igen skal linierne se således ud:

table width="170" border="0" cellspacing="0" cellpadding="0">
                                      <tr>
                                        <td class="nyheder">
                                          <div align="right"><%=RS("Dato")%><div>
                                        </td>
                                      </tr>
                                    </table>

Men det kan du kun hvis du har fundet posten frem i recordsettet (RS) med en SQL-sætning.

justdoit: Du kan ikke bruge <%RS("dato")%> uden Response.Write

Så du skal bruge en af nedenstående i stedet for:

<%
Response.Write rs("Dato")
%>

eller

<%=rs("Dato")%>

Håber det var hvad du mente?

/peter

Det forstår jeg altså ikke, den skriver fejl når jeg skriver <%=RS("Dato")%>

Er der fejl i disse??

<%

Dim strConnect, Rs
' ---------------- skaber forbindelse til database med Rs
Set Rs = Server.CreateObject("ADODB.Connection")
Rs.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../tab2/db/database.mdb")

' ---------------- SQL sætning der henter alt fra bruger
sql = "SELECT dato, overskrift, tekst FROM nyheder ORDER by dato"


' ---------------- Opretter et recordset = objRec
Set objRec = Server.CreateObject("ADODB.Recordset")


' ----------------- recordset åbner databse ved hjælp af Rs og "kører" SQL sætning
objRec.open sql, Rs

%>

<%
' ----------------- Mens recordsettet ikke ved slutningen...

While NOT objRec.EOF

' ----------------- Udskriv data fra bruger
%>

Dit recordset hedder ikke RS men objRec

Så det skal være:

<%=objRec("Dato")%>

Det har jeg rettet nu og den udskriver fint datoerne, men kun hvis jeg selv skriver datoerne i db - hvordan får jeg den til selv at skrive det??

I den SQL-sætning der indsætter nyheden. Den skal udvides med et felt mere nemlig dato = Now

Skal <%=objRec("Dato")%> se sådan ud <%=objRec("Dato = Now")%> ???

Nej slet ikke. Det er et andet sted i koden det skal gøres.

Det er der hvor nyheden bliver skrevet til databasen. Noget i denne stil.

SQL = "insert into osv ..."

Ok tusind tak, så virker det..

Lige det sidste: Kan jeg få klok til at stå uden sekunder?

Så skal du selv formatere datoen før du udskriver den.

<%strDate = Day(RS("Dato")) & "-" & Month(RS("Dato")) & "-" & Year(RS("Dato"))%>

table width="170" border="0" cellspacing="0" cellpadding="0">
                                      <tr>
                                        <td class="nyheder">
                                          <div align="right"><%=strDate%><div>
                                        </td>
                                      </tr>
                                    </table>

Mange tak!