datum

Tjao!

Hur får man in Session.LCID = 1033 i följande kod?
Var i koden ska man lägga in det för att få den datumformateringen?

<%

if request("show") = "all" then
	show = 999
else
	show = 5
end if

set rs = databas.execute("SELECT * FROM news order by datum desc")
 	do until rs.eof or i = show
			response.write "<i>" & day(rs("datum")) & "/" & month(rs("datum")) & "/" & year(rs("datum")) & "</i><br>"
			response.write "" & replace(rs("rubbe"),vbcrlf,"<br>") & "<br><br>"
			response.write "" & replace(rs("texten"),vbcrlf,"<br>") & "<br><br>"
			i = i + 1
		rs.movenext
 	loop 
rs.close

if request("show") = "all" then
	response.write "<a href=""default.asp"">Show only latest news</a><br><br>"
else
	response.write "<a href=""default.asp?show=all"">Show all news</a><br><br>"
end if

%>

Kod läses uppifrån och ner, så lägg koden så den är körd innan dina datum ska skrivas ut. Sedan är det bara att se till att datumen är av datumtyp (med CDate()), så ska det bli fint.

@nders skrev:

Kod läses uppifrån och ner, så lägg koden så den är körd innan dina datum ska skrivas ut. Sedan är det bara att se till att datumen är av datumtyp (med CDate()), så ska det bli fint.

Då tänkte jag såhär...
Men det blev inte bra. Var är felet?

<%if request("show") = "all" then
	show = 999
else
	show = 5
end if

set rs = databas.execute("SELECT * FROM news order by datum desc")
 	do until rs.eof or i = show
			response.write "" & replace(rs("rubbe"),vbcrlf,"<br>") & "<br><br>"
			response.write "" & replace(rs("texten"),vbcrlf,"<br>") & "<br><br>"
Posted by <%=RecSet("author")%> on 
      <%
Session.LCID = 1033
Response.Write FormatDateTime(RecSet("datum"),1)
%>
      at <%=FormatDateTime(RecSet("datum"),3)%>
			i = i + 1
		rs.movenext
 	loop 
rs.close

if request("show") = "all" then
	response.write "<a href=""default.asp"">Show only latest news</a><br><br>"
else
	response.write "<a href=""default.asp?show=all"">Show all news</a><br><br>"
end if

%>

På vilket sätt blev det inte bra?
Hur blir utskriften, och vad hade du förväntat dig?

@nders skrev:

På vilket sätt blev det inte bra?
Hur blir utskriften, och vad hade du förväntat dig?

Jag hadde förväntar mig att author, datum, rubrik och text ska skrivas ut.

Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A0408)
Ogiltigt tecken
/mc/www/TMP1skspnmt21.asp, line 16, column 11
Posted by <%=RecSet("author")
----------^

Tack / Erik

Kontrollera dina contextswitchar (de är galet placerade) och användandet av response.write.

HEJ!

Det har inte så mycket, eller inget alls, men Lcid att göra.

Kontrollera var du har dina context-switchar (dvs <% %>) någonstans.

Ännu bättre, ta din första kod, lägg lcid högst upp på sidan, lägg in din extra utskriftskod av datum etc.

Du behöver inte Lcid där datumen ska skrivas ut. (OM du nu inte använder olika format på olika ställen i sidan.)

J.N. skrev:

HEJ!

Det har inte så mycket, eller inget alls, men Lcid att göra.

Kontrollera var du har dina context-switchar (dvs <% %>) någonstans.

Ännu bättre, ta din första kod, lägg lcid högst upp på sidan, lägg in din extra utskriftskod av datum etc.

Du behöver inte Lcid där datumen ska skrivas ut. (OM du nu inte använder olika format på olika ställen i sidan.)

Jag får helt enkelt inte ihopp det... :r
Har denna kod i ett annat news script

Published by <%=RecSet("skribent")%> on 
      <%
Session.LCID = 1033
Response.Write FormatDateTime(RecSet("datum"),1)
%>
      at <%=FormatDateTime(RecSet("datum"),3)%>

och då skrivs datumet ut perfekt.
Men jag lyckas inte föra in det i detta script... :q
Finns det någon som kan ge ett konkret kod exempel på hur det blir?

Tack

HEJ!

Sätt %> före Posted.

När det är gjort, och du är nöjd och ser att det fungerar, kan du städa i don kod så den blir lika fins om innan du kompletterade den.

Då hade du två i början och slutet, vilket du efter lite justering klarar dig med nu också.

J.N. skrev:

HEJ!

Sätt %> före Posted.

När det är gjort, och du är nöjd och ser att det fungerar, kan du städa i don kod så den blir lika fins om innan du kompletterade den.

Då hade du två i början och slutet, vilket du efter lite justering klarar dig med nu också.

Tack för att du försöker hjälpa till. Men jag förstår inte ditt svar riktigt.
Att sätta %> före Posted gör tyvärr ingen skillnad. Funkar inte ändå...

Sammanfattningsvis så vill jag att raden:

response.write "<i>" & day(rs("datum")) & "/" & month(rs("datum")) & "/" & year(rs("datum")) & "</i><br>"

Ska ändras så den ger samma ytskrift som
Published by <%=RecSet("skribent")%> on
<%
Session.LCID = 1033
Response.Write FormatDateTime(RecSet("datum"),1)
%>
at <%=FormatDateTime(RecSet("datum"),3)%>

Men det verkar tyvärr vara omöjligt...

Speciellt omöjligt vill jag inte säga att det är.
Bara du går igenom contextswitcharna och se till att de är korrekta så lär det fungera, eller använda Response.write istället för att contextswitcha överallt. Till exempel så här:

<%
Session.LCID = 1033
if request("show") = "all" then
	show = 999
else
	show = 5
end if

set rs = databas.execute("SELECT * FROM news order by datum desc")
 	do until rs.eof or i = show
		response.write "" & replace(rs("rubbe"),vbcrlf,"<br>") & "<br><br>"
		response.write "" & replace(rs("texten"),vbcrlf,"<br>") & "<br><br>"
		response.write "Posted by " & RecSet("author") & " on " & FormatDateTime(RecSet("datum"),1)
		response.write " at " & FormatDateTime(RecSet("datum"),3)
		i = i + 1
		rs.movenext
 	loop 
rs.close

if request("show") = "all" then
	response.write "<a href=""default.asp"">Show only latest news</a><br><br>"
else
	response.write "<a href=""default.asp?show=all"">Show all news</a><br><br>"
end if

%>

Tack @nders nu känns det som vi är på rätt väg men får följande fel mess:

Feltyp:
Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'RecSet'
/mc/www/TMPahhoqnn4bk.asp, line 16

På rad 16 så står det:

response.write "Posted by " & RecSet("author") & " on " & FormatDateTime(RecSet("datum"),1)

lägg session lcid på rad 1 på sidan och byt ut <% %> mot "& &" när de är ogivna av första och sista <% %>

Ska inte datum vara #"& ditt rs("kolumn") &"# om du har datum/tid i db

Jag läste din kod lite otydligt/slarvigt. Ditt recordset heter ju rs, inte RecSet. Byt alltså RecSet till rs på de ställen där det står det.

Du får inte cut & pastea så mycket... ;)

@nders skrev:

Jag läste din kod lite otydligt/slarvigt. Ditt recordset heter ju rs, inte RecSet. Byt alltså RecSet till rs på de ställen där det står det.

Du får inte cut & pastea så mycket... ;)

Tack@nders! Nu skrivs datumet ut helt perfekt! Det var RecSet till rs som löste det.
Däremot skrivs tiden ut som 12:00:00 AM i alla inlägg men alla är postade vid olika tider.
Vad tusan kan det vara för fel? Något med Databas filen?

Något med Databas filen?

Det kan bero lite på vilka fältegenskaper datumfältet har. Så; vilka egenskaper har fältet? :)

@nders skrev:

Något med Databas filen?

Det kan bero lite på vilka fältegenskaper datumfältet har. Så; vilka egenskaper har fältet? :)

Den ser ut såhär: http://www.jettrocker.com/access.gif

När du tittar i Access, har du med tider då i inläggen?

@nders skrev:

När du tittar i Access, har du med tider då i inläggen?

Nej! :q

Ok, då skulle det vara intressant att se hur du gör när du sparar till databasen.

Mvh