funcao para formatar data

[razs 0]

Boas malta, visto que tenho defenido a minha pagina com tipo pt e a data aparecer em dd/mm/yyyy queria formatar para inserir no mysql.

 

Fiz esta funcao mas nao esta a dar, alguma ideia?

function func_data(datdb)
        dat=(Year(datdb) &"-"& Month(datdb) &"-"& Day(datdb))
		hor=(hour(datdb) &":"& Minute(datdb) &":"& second(datdb))
		datdb = dat&" "&hor
end function


response.write "<br>*****************************<br>-> "&response.write (func_data(CDate(now)))&" <-<br>******************************************<br><br>"

Obrigado

ok, ja funciona mas nao estou a perceber a logica, alguem me pode explicar porque funciona assim?

function func_data(datdb)
        dat=(Year(datdb) &"-"& Month(datdb) &"-"& Day(datdb))
		hor=(hour(datdb) &":"& Minute(datdb) &":"& second(datdb))
		varr = dat&" "&hor
end function

response.write varr&"##"
func_data(CDate((now)))
response.write "<br>*****************************<br>-> "&varr&" <-<br>******************************************<br><br>"

 

##
*****************************
-> 2015-4-30 15:13:11 <-
******************************************

 

 

Nao me parece ter logica

[xanburzum 169]

olha estes exemplos

 

session.lcid=1046
function formatadata(data)
dia=day(data)
mes =month(data)
ano=year(data)
formatadata=dia&"/"&mes&"/"&ano
end function

SQL1 = "INSERT INTO NEWSLETTER (NewsletterNome,NewsletterEmail,NewsletterData,NewsletterHora,NewsletterIP,FL

G_EMAIL) VALUES ('"&Nome&"','"&Email&"',#"&formatadata(NewsletterData)&"#,'"&NewsletterHora&"','"&NewsletterIP&"','"&NewsletterFLG&"')"

Formato: aaaa-mm-dd

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Year(ConDataBanco) &"-"& Right("0"&Month(ConDataBanco),2) &"-"& Right("0"&Day(ConDataBanco),2)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>

Formato: dd-mm-aaaa

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Right("0"&Day(ConDataBanco),2) &"-"& Right("0"&Month(ConDataBanco),2) &"-"& Year(ConDataBanco)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>

Formato: mm-dd-aaaa

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Right("0"&Month(ConDataBanco),2) &"-"& Right("0"&Day(ConDataBanco),2) &"-"& Year(ConDataBanco)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>

Formato: mm/dd/aaaa

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Right("0"&Month(ConDataBanco),2) &"/"& Right("0"&Day(ConDataBanco),2) &"/"& Year(ConDataBanco)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>

[rafaeldupalio 5]

xanbur me ajuda ae,

 

O mysql salva a data no formato aaaa-mm-dd e o usuario coloca a data no site da seguinte forma dd/mm/aaaa.

na minha pagina asp eu tenho:

Var_datafiscal = request.Form("datafiscal")
onde recolhe 04/05/2015 como faço para converter para o padrao mysql aaaa/mm/dd???

[razs 0]

faz assim

dat=(Year(request.Form("datafiscal")) &"-"& Month(request.Form("datafiscal")) &"-"& Day(request.Form("datafiscal")))

[xanburzum 169]

usa esse

 

<%
Function ConverterDataBanco(ConDataBanco)
ConDataBanco = Year(ConDataBanco) &"-"& Right("0"&Month(ConDataBanco),2) &"-"& Right("0"&Day(ConDataBanco),2)
ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>