datum

Vill du ha det exakt så?
Annars använder du bara Date...

Jo, jag skulle vilja ha exakt så

<%
Date = Date
NewDate = Left(Date, 2)

myString = NewDate
myArray = Split(myString,"-")
For i = 0 To Ubound(myArray)
Response.Write myArray(i)
Next
%>

kanske fungerar?

response.write right(cstr(year(date())),2) & right("0" & cstr(month(date()),2) & right("0" & cstr(day(date()),2)

Fungerar

<%
	dim Y
	dim M
	dim D
	Y=Mid(DatePart("yyyy",date),3)
	M=DatePart("m",date)
	D=DatePart("d",date)
	if M<10 then M="0" & M
	if D<10 then D="0" & D
	Response.Write(y & m & d)
%>

/Viktor

... hoppas min kod fungerar och din, Viktor, gör det säkert också men jag tror ändå att LarsGs är bäst!

Viktors kod vann Den funka utan problem
Tack allihopa för hjälpen.

Fungerade min (kan inte själv testa den från den datorn jag sitter)?

Nee, fick felmeddelande på ditt och LarsG's. Men icke på Viktors

trexter.com: output från din blir "8/" när man har tagit bort "Date=Date".

/Viktor

LarsGs kod är bäst... Han missade 2 parenteser bara.

response.write right(cstr(year(date())),2) & right("0" & cstr(month(date())[b])[/b],2) & right("0" & cstr(day(date())[b])[/b],2)