Campo Date (SQLSERVER)

[PRSolucaoWeb 0]

Boa tarde

Tenho em uma determinada tabela o campo DATE, quando eu gravo ele grava assim no sql:
2013-04-07, e me mostra na minha aplicação nesse mesmo modo.

Como que faço para mostrar na minha aplicação 04/07/2013?

Eu estou utilizando a linguagem ASP.

Na visualização eu utilizo essa chamada:

<%=replace(g_o_m("data_abertura"),".","/")%>

 

 

Obrigado

[Gilberto Jr 26]

function mask_data( obj )
		obj = CDAte( obj )
		dia = Day( obj  )
		mes = Month( obj )
		ano = Year( obj )
	
			if dia < 10 then
				dia = "0" & dia
			end if

			if mes < 10 then
				mes = "0" & mes
			end if
					
		 mask_data = dia &"/"& mes &"/"& ano
end function

 

https://www.facebook.com/webprogramation

 

Att;

[xanburzum 169]

olha alguns exemplos que uso

 

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()))
%>

 

[PRSolucaoWeb 0]

Bom dia

 

Na pagina que exibe a data eu coloquei assim:

 

session.lcid = 1046

function formatadata(data_abertura)
dia = day(data_abertura)
mes = month(data_abertura)
ano = year(data_abertura)
formatadata = dia&"/"&mes&"/"&ano
end function

 

E na exibição está assim:

<%=formatadata(g_o_m("data_abertura"))%>

 

Só que aparece assim na tela:

 

7/10/2013

 

O que pode ser?

 

Obrigado

[Gilberto Jr 26]

Simples

function formatadata(data_abertura)
dia = day(data_abertura)
if dia <10 then
"0"&dia
end if
mes = month(data_abertura)
if mes <10 then
"0"&mes 
end if
ano = year(data_abertura)
formatadata = dia&"/"&mes&"/"&ano
end function

 

https://www.facebook.com/webprogramation

 

Att;

[PRSolucaoWeb 0]

Eu fiz assim:

 

Function formatadata(data_abertura)
dia = day(data_abertura)
if len(dia) < 2 then
dia = "0" & dia
end if
mes = month(data_abertura)
if len(mes) < 2 then
mes = "0" & mes
end if
ano = year(data_abertura)
formatadata = dia & "/" & mes & "/" & ano
End Function
data_abertura = formatadata(data_abertura)

 

E a data continua assim:

 

07/10/2013 |

 

Sendo que é 10/07/2013.

 

Obrigado

[Gilberto Jr 26]

Usa essa função aqui que vai resolver o seu caso.

function mask_data( obj )
		obj = CDAte( obj )
		dia = Day( obj  )
		mes = Month( obj )
		ano = Year( obj )
	
			if dia < 10 then
				dia = "0" & dia
			end if

			if mes < 10 then
				mes = "0" & mes
			end if
					
		 mask_data = dia &"/"& mes &"/"& ano
end function

response.write(mask_data(Date))

 

 

https://www.facebook.com/webprogramation

 

Att;

[PRSolucaoWeb 0]

Está correto o modo que coloquei para mostrar a data correta que vem da tabela do sql server?

<%=mask_data(g_o_m("data_abertura"))%>

 

Obrigado

[Gilberto Jr 26]

Para usar a sua função usa ela assim

<%
function formatadata(data_abertura)
dia = day(data_abertura)
mes = month(data_abertura)
ano = year(data_abertura)
formatadata = dia&"/"&mes&"/"&ano
end function
 
data_abertura = Date

response.Write(formatadata(data_abertura ))
%>

 

tira o

g_o_m

 

 

https://www.facebook.com/webprogramation

 

Att;

[PRSolucaoWeb 0]

Gilberto, ele está pegando a data de hoje, do servidor.

E não a data que está na gravado na tabela do sql server.

Está aparecendo assim:

11/7/2013

E o correto e mostrar a data:
10/07/2013

 

Obrigado

[Gilberto Jr 26]

Na sua busca que você faz no banco de dados

dim rs
set rs = conn.execute("select * from tabela")
data_abertura=rs("data")

function formatadata(data_abertura) 
dia = day(data_abertura) 
mes = month(data_abertura) 
ano = year(data_abertura) 
formatadata = dia&"/"&mes&"/"&ano 
end function 

response.Write(formatadata(data_abertura ))

 

 

https://www.facebook.com/webprogramation

 

Att;

[PRSolucaoWeb 0]

Vamos lá para eu poder entender:

Eu fiz um select para pegar os campos da tabela e visualizar na tela.

 

Ai coloquei essa função para mostrar a data:

 

session.lcid = 1046

function formatadata(data_abertura)
dia = day(data_abertura)
mes = month(data_abertura)
ano = year(data_abertura)
formatadata = dia&"/"&mes&"/"&ano
end function

response.Write(formatadata(data_abertura))

 

Só que agora em vez de mostrar 11/07/2013, está mostrando 30/12/1899.

 

Desculpe ficar martelando na mesma tecla, pois sou iniciante em asp.

 

Obrigado

[Gilberto Jr 26]

Ok, posta o seu select ai pra mim e como recupera a coluna de data.

 

https://www.facebook.com/webprogramation

 

Att;

[PRSolucaoWeb 0]

set g_o_m = server.CreateObject("adodb.recordset")
set g_o_m = db_conn.execute ("select * from TB_GERAR_ATENDIMENTO where no_os = '"&request.QueryString("no_os")&"'")

 

E recupera a coluna data aqui:

<%
session.lcid = 1046

function formatadata(data_abertura)
dia = day(data_abertura)
mes = month(data_abertura)
ano = year(data_abertura)
formatadata = dia&"/"&mes&"/"&ano
end function

response.Write(formatadata(data_abertura))
%>

 

Obrigado

[Gilberto Jr 26]

Como esta o nomo da sua coluna onde vai a data?

 

https://www.facebook.com/webprogramation

 

Att;

[PRSolucaoWeb 0]

Nome da Coluna: data_abertura

[Gilberto Jr 26]

Faz dessa forma, vai ter que funcionar.

<%
function mask_data( obj )
		obj = CDAte( obj )
		dia = Day( obj  )
		mes = Month( obj )
		ano = Year( obj )
	
			if dia < 10 then
				dia = "0" & dia
			end if

			if mes < 10 then
				mes = "0" & mes
			end if
					
		 mask_data = dia &"/"& mes &"/"& ano
end function

set g_o_m = server.CreateObject("adodb.recordset")
set g_o_m = db_conn.execute ("select * from TB_GERAR_ATENDIMENTO where no_os = '"&request.QueryString("no_os")&"'")

response.write(mask_data(g_o_m(" data_abertura")))

%>

 

 

https://www.facebook.com/webprogramation

 

Att;

[PRSolucaoWeb 0]

Só uma coisinha Gilberto, a data está 07/11/2013 e não 11/07/2013.

Coloquei o Session.LCID = 1046 e continua 07/11/2013.

O que pode ser?

 

Obrigado

[Gilberto Jr 26]

E se vc tirar o Session.LCID?

 

https://www.facebook.com/webprogramation

 

Att;

[xanburzum 169]

formata ela antes 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()))
%>