funzione di formattazione (date)

[agenti]

<%FUNCTION datashort(dtData)
datashort = Day(dtData) & "/" & Month(dtData) & "/" & Right(Year(dtData) ,2)
END FUNCTION %>

in questo modo ottengo...
datashort(data)

2/9/05

vorrei ottenere invece

02/09/05

grazie.

[maximum]

Prova così:

<%
FUNCTION datashort(dtData) 
   
   Dim gg, mm as string

   if Day(dtData) <= 9 then
      gg = "0" & Day(dtData)
   end if

   if Month(dtData) <= 9 then
      mm = "0" & Month(dtData)
   end if
   datashort = gg & "/" & mm & "/" & Right(Year(dtData) ,2) 
END FUNCTION 
%>

[agenti]

ehi max...

avevi perso qualcosa...

<%
FUNCTION datashort(dtData)

Dim gg,mm

if Day(dtData) <= 9 then
gg = "0" & Day(dtData)
else
gg = Day(dtData)
end if

if Month(dtData) <= 9 then
mm = "0" & Month(dtData)
else
mm = Month(dtData)

end if

datashort = gg & "/" & mm & "/" & Right(Year(dtData) ,2)
END FUNCTION
%>


ciao.

[maximum]

Scusami, hai ragione.
Funziona?

[agenti]

si...

leggi pvt!

[maximum]

Bene.

[Dirk Pitt]

Io risolsi in questo modo:

giorno = Day(tua_data)
mese   = Month(tua_data)

If len(giorno) < 2 then
giorno = "0" & giorno
Else
giorno = giorno
End if

If len(mese) < 2 then
mese = "0" & mese
Else
mese = mese
End if

[1qualunque]

perché invece non utilizzi FormatDateTime(data,0/1/2/3/4)?