(Resolvido) Simples! formatação de data

[WEBIER]

possuo o seguinte codigo:

<%
'inicio de codigo ASP

Dim data, dia, mes, ano
data = Rs("data")
dia = day(data)
mes = month(data)
ano = year(data)

if dia < 10 then
  dia = "0" & dia
end if

if mes < 10 then
mes = "0" & mes
end if

response.Write(dia & "/" & mes & "/" & ano)

'fim do codigo ASP
%>

Como eu faço pra converter o ano pra 2 digitos? eu tentei

ano = format(year(data), "yy")

e não deu!

Editado Novembro 11, 2009 por WEBIER

[SK15]

No seu caso não era mais facil usar "FormatDateTime": http://www.w3schools.com/vbScript/func_formatdatetime.asp ?

<%
Dim data, formato

data = Rs("data")
formato = FormatDateTime(data, 2)

Response.Write (formato)
%>

Vale lembrar que o padão é "MM/DD/YY" para apresentar na forma que usamos deve estar com "SetLocale" configurado para o Brasil ou você pode fazer isso manualmente então minha segunda sugestão é ... corte somente os dois ulitimos números ... com "Right": http://www.w3schools.com/VBscript/func_right.asp

...
ano = right(year(data), 2)
...

[Rafael Spilki]

ou da um "mid" na variável ano... google it...

mas isso seria meio POG... a alternativa do sk15 é bem mais elegante!

[]'s

[WEBIER]

usei

ano = right(year(data), 2)

deu certo!

ObrigadoQ