Asp frequentemente encontra problemas de processamento de formato de data ao criar sites. Apresentamos uma função vbscript formatdatetime() para a data armazenada no campo do tipo datetime do banco de dados de acesso, o efeito de exibição é lido diretamente do banco de dados com o tempo. 2009-06 -13 18:00, o que devo fazer se quiser apenas exibir a data?
Vbscript possui uma função FormatDateTime(). Sua descrição é a seguinte:
Retorna uma expressão formatada como data ou hora.
FormatDateTime(Data[, NamedFormat])
parâmetro
Data
Obrigatório. A expressão de data a ser formatada.
Formato Nomeado
Opcional. Um valor numérico que indica o formato de data/hora usado; se omitido, vbGeneralDate será usado.
configurar
O parâmetro NamedFormat pode ter os seguintes valores:
constante | valor | descrever |
vbDataGeral | 0 | Exibir data e/ou hora. Se houver uma parte de data, exiba essa parte em formato de data abreviada. Se houver uma parte da hora, exiba-a no formato de hora longa. Se ambos existirem, todas as seções serão exibidas. |
vbLongDate | 1 | Exibe a data usando o formato de data longo especificado nas configurações regionais do computador. |
vbShortDate | 2 | Exibe a data usando o formato de data abreviada especificado nas configurações regionais do computador. |
vbLongTime | 3 | Exibe a hora usando o formato de hora especificado nas configurações regionais do computador. |
vbShortTime | 4 | Exibe a hora no formato de 24 horas (hh:mm). |
Strdate=formatodatahora(rs(data),2).
Como existe apenas uma região de computador no vbscript, que é os Estados Unidos, existe apenas um formato curto
aaaa-mm-dd.
saída formatada com data e hora asp
1, 2010-10-10 00:00:00
2, 10/10/2010
3, 2010/10/10
4, 10 de outubro de 2010 00 horas 00 minutos 00 segundos
5, 10-10 00:00:00
6,10/10
7, 10 de outubro
Outras transformações podem ser adicionadas por você mesmo de acordo com o programa.
Copie o código do código da seguinte forma:
'Converter hora em formato de hora
Função formatDate(Byval t,Byval ftype)
dim y, m, d, h, mi, s
formatoData=
Se IsDate(t)=False então sai da função
y=cstr(ano(t))
m=cstr(mês(t))
Se len(m)=1 Então m=0 & m
d=cstr(dia(t))
Se len(d)=1 Então d=0 & d
h = cstr(hora(t))
Se len(h)=1 Então h=0 & h
mi = cstr(minuto(t))
Se len(mi)=1 Então mi=0 & mi
s = cstr(segundo(t))
Se len(s)=1 Então s=0 & s
selecione case cint(ftype)
caso 1
'aaaa-mm-dd
dataformato=y & - & m & - & d
caso 2
'aa-mm-dd
dataformato=direita(y,2) & - & m & - & d
caso 3
'mm-dd
dataformato=m & - & d
caso 4
'aaaa-mm-dd hh:mm:ss
formatDate=y & - & m & - & d & & h & : & mi & : & s
caso 5
'hh:mm:ss
formatDate=h & : & mi & : & s
caso 6
'AAAA ano mm mês dd dia
formatDate=y & ano & m & mês & d & dia
caso 7
'aaaammdd
dataformato=y&m&d
caso 8
'aaaammddhhmmss
formatDate = y & m & d & h & mi & s
final selecionar
Função final