Ayúdame a cambiar el código, página web
& lt! -
= = = = Calcular hora mundial
Función TimeAdd(UTC, T)
Dim PlusMinus, DST, y, tSave
Si Left(T, 1)="-" entonces PlusMinus = -1 en caso contrario PlusMinus = 1
UTC=Right(UTC, Len(UTC)-5)
UTC= Izquierda(UTC, Len(UTC)-4)
y = año (UTC)
TimeAdd=DateAdd("n ",, (Cint(Mid(T, 2, 2 ))*60 + Cint(Mid(T, 4, 2))) * PlusMinus, UTC)
Horario de verano de EE. UU.: 00:00 del primer domingo de abril al último domingo de junio 00 :00 10.
If Mid(T, 6, 1)="* "y DateSerial(y, 4, (9 - Weekday(DateSerial(y, 4, 1)) mod 7))<= TimeAdd y DateSerial(y, 10, 31 - día de la semana(DateSerial(y, 10, 31))) > = TimeAdd y luego agrega
TimeAdd = CStr(DateAdd("h", 1, TimeAdd)) & amp; "& ltFONT STYLE = ' Tamaño de fuente: 18pt; Familia de fuente: Wingdings Color: Rojo ' & gtR & lt/FONT >>p>
Otro
Terminará si...
TimeAdd = CStr(TimeAdd)
Finalizar función
-& gt;
& lt/SCRIPT & gt;
& ltSTYLE>. todyaColor {
Color de fondo: verde claro
}
& lt/STYLE>
& ltMETA contenido = " MSHTML 6 . 00 . 2800 . 1505 " nombre = GENERADOR & gt; & lt/HEAD & gt
& ltBODY margen izquierdo = 0 margen superior = 0 onload = inicial()& gt;
& Lenguaje de secuencias de comandos = JavaScript & gt
& lt! -
if(navigator . appname = = " Netscape " | | parse int(navigator . appversion) <4)
document .write(" <h 1>Su navegador no puede ejecutar este programa.
& lt/h 1 & gt; ¡Este programa solo se puede ejecutar después de IE4! !")
//-& gt;
& lt/SCRIPT & gt;
& Lenguaje de scripting = JavaScript & gt
lck = 0;
Función r(hval)
{
si (lck == 0)
{
document.bgColor = hval
}
}
& lt/SCRIPT & gt;
& ltDIV id = estilo de detalle = " POSICIÓN:absoluta " ></DIV>
<Center>
& ltFORM nombre = CLD>
& ltTable>
& ltTBODY & gt
& ltTR & gt
& ltTD vAlign=top align=middle>
& ltFONT id = Esfera del reloj = Color Arial = #. 000080 size = 4
align="center " >& lt/FONT & gt;
& ltP>& lt! - Zona horaria * indica ajuste automático al horario de verano -><FONT estilo = "TAMAÑO DE FUENTE: 9 puntos" TAMAÑO = 2>.
& ltSelection
style = "FONT-SIZE:9pt" onchange = changeTZ()name = TZ>& ltSelection
Value="-1200 Anniwetuk y Guajialan" seleccionados & gtFecha de intercambio internacional
Value="-1100 Midway y Samoa">Samoa Hawaii
Value=-0900*Alaska>Alaska Pacific
Value=-0700* Arizona > Estados Unidos Estados Montañas Montañas de Estados Unidos y Canadá < OPCIÓN
Valor=-0600* Sackvan (Canadá) > Canadá Central México Centroamérica y Canadá < OPCIÓN valor=-0500* Bogotá, Lee Horse>Pacífico Sudamericano
Valor=-0500*Hora del Este (Estados Unidos y Canadá)>Este de Estados Unidos y Canadá< OPCIÓN valor=-0500*Indiana (Este)>Mei Dong< OPCIÓN
Valor =-0400*Caracas, lapaz>Océano Atlántico occidental de América del Sur< OPTION
Value="-0330Isla Nueva (Costa Este de Canadá)">Terranova< OPTION value="-0300 Posina">Sureste de Estados Unidos Estados
Value="-0300 Bruno Alice, Georgetown">Este de Sudamérica Medio Atlántico
Value=-0100*Azores, cap vert >Azores, horario de verano británico
Value="+0000Morovia (Liberia), Casablanca">Hora media de Greenwich
Value="+0100París, Madrid">Roma< OPTION value="+0100Praga, Varsovia, Budapest">Europa Central < OPTION
Value="+0100Berlín, Estocolmo, Roma, Berna, Bruselas, Viena">Europa Occidental
Value="+0200 Israel " >Israel Europa del Este
Valor=+0200*El Cairo>Egipto GFT<Option
Valor=+0200* Herare, Pitori>Sudáfrica
Valor=+0300*Bagdad, Kuwait, Nairobi ( Kenia), Riad (Arabia Saudita)>Arabia Saudita
Valor=+0300*Moscú, San Petersburgo, Guerra Ho, Vavagrad>Rusia, Irán, Arabia
Valor=+0430 *Kabul>Afganistán, Asia Occidental, India, Asia Central, Bangkok< OPTION
Value="+0800Beijing, Chongqing y Heilongjiang" >China< OPTION value="+0800 Provincia de Taiwán, Hong Kong y Singapur" >Taipei< OPCIÓN
Value="+0900 Tokio, Osaka, Sapporo, Seúl, Yamaguchi-gumi (Siberia Oriental) ">Tokio
Value="+0930 Darwin " >Sídney , Australia Central
valor = "+1000 Hobart "> Tus Megna < OPTION value = "+1000 Guam, Port Mosby y Highway " >Pacífico Occidental
Valor=+1100*Maotan , Islas Salomón, Nuevo Karudo>Pacífico Central
Value="+1200Wellington, Auckland">Nueva Zelanda
& lt fontid=city
estilo = " TAMAÑO DE FUENTE: 9pt; ancho: 150 px; color: azul; F
ONT-FAMILY: 'Nuevo buen estilo' " > & lt/FONT & gt; & lt/P & gt; & lt/TD & gt;
& ltTD align = middle & gt
p>& ltDIV style = " Z-INDEX:-1; Posición: Absoluta; SUPERIOR: 30px " >& ltFONT id=YMBG
style = " FONT-SIZE:90pt; Color: # f0f0f0FONT-FAMILY: 'Arial Black'">.?0000<BR>?JUN</FONT>
</DIV>
<Form border=0 & gt
& ltTBODY & gt
& ltTR & gt
& ltTD bgColor=#000080 colSpan=7> estilo & ltFONT -TAMAÑO: 9pt "
color = # ffffff. tamaño = 2 & gtGregorian < SELECT style="FONT-SIZE: 9pt "
onchange = cambiar CLD()name = SY & gt;
<Lenguaje de scripting = JavaScript & gt< -
for(I = 1900;i<2050;i++)document.write('<options>; '+i)
//-& gt;& lt/SCRIPT & gt ;
& lt/SELECT & gt;año < SELECT style = " FONT-SIZE:9pt " onchange = cambiar CLD()
nombre = SM & gt
& Lenguaje de scripting = JavaScript & gt& lt! -
for(I = 1; i <13;i++)document.write('<option>'+i)
//-></SCRIPT>
</ SELECT>Mes