Adaptación de la hora de un servidor extranjero


http://www.asptutor.com

Adaptación de la hora de un servidor extranjero

 

Colaboración enviada por ElectroAlfonso

Voy a poner mi granito de arena para ayudar a todos los que tienen su pagina en un server extranjero y la diferencia horaria con la española les trae algunos problemas para realizar algunas cosas como me pasaba a mi.

Lo primero deciros que he desarrollado dos códigos, uno para servidores con formato de hora de 24 horas y otro con formato de hora de 12 horas (am/pm) que como supongo que son la mayoría. 
Otra cosa, ambos códigos estas desarrollados para servidores con una diferencia horaria de -6 horas como pueden ser los americanos.
CODIGO PARA SERVER CON FORMATO DE FECHA 12 HORAS (AM/PM)
========================================================
<%' Guardamos la hora del servidor en la variable horaservidor
horaservidor = time()
' Guardamos la hora, mes, año y el AM/PM del server en
variables
horaamerica=hour(horaservidor)
minuto=minute(horaservidor)
segundo=second(horaservidor)
ampm=(right(horaservidor, 2))
if horaamerica=12 and ampm="AM" then hora=6
if horaamerica<12 and ampm="AM" then hora=horaamerica+6
if horaamerica=12 and ampm="PM" then hora=18
if horaamerica<6 and ampm="PM" then hora=horaamerica+18
if horaamerica>=6 and horaamerica<12 and ampm="PM" then hora=horaamerica-6
' Añadimos ceros a las cifras de un solo digito para que quede
'mas bonito<
if hora <10 then hora="0"&hora
if minuto <10 then minuto="0"&minuto
if segundo <10 then segundo="0"&segundo
'damos formato a la hora dentro de horaespanol
horaespanol=hora&":"&minuto&":"&segundo
' Ya tenemos la hora en español ahora a por la fecha
' Guardamos la fecha en la variable fecha
fecha = date()
' Guardamos el dia, mes y año en variables, el dia dependera de la hora en español
if hora>=0 and hora<=5 then
dia=day(fecha)+1
else if hora>=18 and hora<=23 then
dia=day(fecha)-1
else
dia=day(fecha)
end if
end if
mes=month(fecha)
ano=year(fecha)
' Al igual que con la fecha añadimos ceros al dia y al mes
if dia <10 then dia="0"&dia
if mes <10 then mes="0"&mes
'damos formato a la fecha dentro de fechaespanol
fechaespanol=dia&"/"&mes&"/"&ano
' Ya tenemos tambien la fecha, ahora solo queda imprimirla en pantalla
%>


<%= fechaespanol%>&nbsp;<%= horaespanol%>

 

Con esto el resultado sería por ejemplo:

     12/05/2002 13:05:30

Mientras que si lo hubieramos hecho con un simple <%= now()%> el resultado
hubiera sido:

     5/12/2002 1:05:30 PM

Espero que le sirva a mucha gente

ElectroAlfonso