hej

Du skal lave en funktion til dette.. eks.:

<%
Function ZeroPad(sStr,iLen)
ZeroPad = Right(String(iLen-Len(value),"0") & sStr,iLen)
End Function
%>

Den kan du så kalde med dit tal som sStr, og længden på det du vil have ud som iLen.
Eks:

<%
myDay = ZeroPad(Datepart(d,Date),2)
%>

Så skal du nok lave den selv.

function LZ(Value)
  if (Value < 10) then
    LZ = "0" & Value
  else
    LZ = Value
  end if
end function

function FDate(ADate)
  FDate = LZ(Day(ADate)) & "-" & LZ(Month(ADate)) & "-" & Year(ADate)
end function

Response.Write(FDate(Date))

noget i den her stil:

function smartDate(mydate)

    dim dd,mm,yyyy
   
    dd=day(mydate)
    mm=month(mydate)
    yyyy=year(mydate)
   
    smartDate=right("0" & dd,2) & "-" & right("0" & mm,2) & "-" & left(yyyy,2)

end function

benyttes således:
smartDate(FormatdateTime(Now, vbshortdate))

coltau din giver bare datoen...

og
rou din virker ikke:
<%
Function ZeroPad(sStr,iLen)
ZeroPad = Right(String(iLen-Len(value),"0") & sStr,iLen)
End Function
%>

Den kan du så kalde med dit tal som sStr, og længden på det du vil have ud som iLen.
Eks:

<%
myDay = ZeroPad(Datepart(d,Date),2)
%>

fejlen:
Den kan du så kalde med dit tal som sStr, og længden på det du vil have ud som iLen. Eks:
Der opstod en Microsoft VBScript-kørselsfejl fejl '800a0005'

Procedurekaldet eller argumentet er ugyldigt: 'Datepart'

/on/test_v.asp, linje 13

neuro giver 01-02-20

Jeg vil havde det til at være 01!!!

Sorry - Skal du bare have vist dagen. ?

function LZ(Value)
  if (Value < 10) then
    LZ = "0" & Value
  else
    LZ = Value
  end if
end function

function FDay(ADate)
  FDate = LZ(Day(ADate))
end function

Response.Write(FDay(Date))

Kan man ikke bare gør sådan her:

dato = FormatdateTime(Now, vbshortdate)
var = InsStr(dato, "-")
Response.Write Left(dato, var)

//Casper....

Hov, der er to s'er for meget:

dato = FormatdateTime(Now, vbshortdate)
var = InStr(dato, "-")
Response.Write Left(dato, var)

cOLTAU DIT GIVER INGENTING SÅ COOL CASPER FOR POINTSNE FOR DET ET SVAR DET VIORKER!

he he.. Caps Lock.... Thx...

Og ...

bare for at du ikke troede vi synd!

coltau >> Han har vist lidt med tasterne.. Tag dig ikke af det! :-))

buha >> Hvorfor skulle han tro at vi snød...??