[Resolvido] Inserindo Data com o seguinte formato: 2009-07-12

[Martinsrj 0]

Ola pessoal, boa tarde!

Nao estou sabendo o porque o ASP esta recuperando os valores de data dessa forma: 2009-jul-12

 

O meu codigo que trata a requisicao e esse:

<% Option Explicit %>
<!--#Include file="conexao.asp"-->
<%
Dim conbd_gd, rsInsere, strINS, var_data, hora, Minuto, Segundo, var_codeprojeto, var_acao, var_status, var_responsavel, var_datedia, var_datemes, var_dateano, var_legenda

var_codeprojeto = TRIM(Request.Form("txt_codprojeto"))
var_acao = TRIM(Request.Form("txt_acao"))
var_status = TRIM(Request.Form("txt_status"))
var_legenda = "img_smiles/nao_iniciado.gif"
var_responsavel = TRIM(Request.Form("txt_responsavel"))
var_datedia = TRIM(Request.Form("date_dia"))
var_datemes = TRIM(Request.Form("date_mes"))
var_dateano = TRIM(Request.Form("date_ano"))
var_data = var_dateano &"-"& var_datemes &"-"& var_datedia
'-- Essa variavel e da pagina ins.dadosprojeto.asp  var_posicaoatual = "Ativado"
'Imprimindo as variaveis data
Response.Write(var_dateano &"-"& var_datemes &"-"& var_datedia)
Response.End()

Se for necessario eu posto o codigo onde o usuario preenche as combo dia, mes, ano.

 

Abracos galera.

 

Funcionou Galera!!!

[Patrique 0]

O problema esta no form date_mes do combo da página anterior, poste ae pra gente ver como esta o campo

[xanburzum 169]

O Session.LCID permite realizar a formatação de datas e configurações regionais de acordo com o país que o desenvolvedor necessitar, setando o código atribuído para cada país,coloke no inicio do code o Session.LCID = 1046 pra formatar em Português (Brasileiro):

 

<%
Session.LCID = 1046
%>

existe uma funcao no forum k você converte os dados antes para exibicao, da uma procurada

[Martinsrj 0]

RESOLVIDO!

 

O Session.LCID permite realizar a formatação de datas e configurações regionais de acordo com o país que o desenvolvedor necessitar, setando o código atribuído para cada país,coloke no inicio do code o Session.LCID = 1046 pra formatar em Português (Brasileiro):

 

<%
Session.LCID = 1046
%>

existe uma funcao no forum k você converte os dados antes para exibicao, da uma procurada

[Patrique 0]

ué??? mais não era você quem estava montando

 

Response.Write(var_dateano &"-"& var_datemes &"-"& var_datedia)

essa eu não entendi? como ficou agora?

[Martinsrj 0]

O designer da empresa havia colocado errado na combo: <option value="jul">Julho</option>

O correto e assim: <option value="07">Julho</option>

 

Nunca iria imaginar que ele iria colocar da forma errada.

 

Valeu Patrique! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

ué??? mais não era você quem estava montando

 

Response.Write(var_dateano &"-"& var_datemes &"-"& var_datedia)

essa eu não entendi? como ficou agora?

[Patrique 0]

hhaaaaaaaaaaaaa bommmmmmmmm, beleza então, achei estranho.

[xanburzum 169]

você tb pode usar esta funcaun

Function DataBrazil(sData)

	sDia = Day(sData)
	sMes = Month(sData)
	sHoras  = Hour( sData )
	sMinutos	= Minute( sData )
	sSegundos	= Second( sData )
	
	If sDia <= 9 Then sDia = "0" & sDia 
	If sMes <= 9 Then sMes = "0" & sMes 
	If sHoras <= 9 Then sHoras = "0" & sHoras
	If sMinutos <= 9 Then sMinutos = "0" & sMinutos
	If sSegundos <= 9 Then sSegundos = "0" & sSegundos
	
	DataBrazil = sDia & "/" & sMes & "/" & Year(sData) & " " & sHoras & ":" & sMinutos & ":" & sSegundos

End Function

[Martinsrj 0]

hehehehehehe.......

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

RESOLVIDO!

 

hhaaaaaaaaaaaaa bommmmmmmmm, beleza então, achei estranho.

[Martinsrj 0]

beleza AMIGAO!!!

Otima funcao!

 

você tb pode usar esta funcaun

Function DataBrazil(sData)

	sDia = Day(sData)
	sMes = Month(sData)
	sHoras  = Hour( sData )
	sMinutos	= Minute( sData )
	sSegundos	= Second( sData )
	
	If sDia <= 9 Then sDia = "0" & sDia 
	If sMes <= 9 Then sMes = "0" & sMes 
	If sHoras <= 9 Then sHoras = "0" & sHoras
	If sMinutos <= 9 Then sMinutos = "0" & sMinutos
	If sSegundos <= 9 Then sSegundos = "0" & sSegundos
	
	DataBrazil = sDia & "/" & sMes & "/" & Year(sData) & " " & sHoras & ":" & sMinutos & ":" & sSegundos

End Function

[xanburzum 169]

sempre dê uma verificada no lab. de scripts,existem ótimas soluções

[Patrique 0]

se ele esta trazendo os dados por campos do form diferentes todos separados... dia... mes... e ano.... não há necessidade de usar esta função

[xanburzum 169]

no seu caso, sim, pois como pratique disse , você recupera separado, mas para gravar no banco, é interessante você gravar no formato brasileiro,

12/07/2009, dae você pode fazer assim

 

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

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

mais funções aki

 

a funcaun postada antes é se você recuperar ela integral, muitas vezes poupa, campos no form