帮我改改代码,网页

& lt！-

'====算世界时间

函数TimeAdd(UTC，T)

Dim PlusMinus，DST，y，tSave

If Left(T，1)=--"然后plus MINUS =-1 Else plus MINUS = 1

UTC = Right(UTC，Len(UTC)-5)

UTC=Left(UTC，Len(UTC)-4)

y = Year(UTC)

time add = DateAdd(" n "，(Cint(Mid(T，2，2))* 6+CIN美国日光节约期间: 4月第一个星日: 至 1月最后一个星期日:

If Mid(T，6，1)="*" And DateSerial(y，4，(9 -工作日(DateSerial(y，4，1))mod 7))& lt；= TimeAdd和DateSerial(y，1，31 - Weekday(DateSerial(y，1，31)))& gt；= time add Then

time add = CStr(DateAdd(" h "，1，time add))& amp；“& ltFONT STYLE='font-size:18pt。字体系列:Wingdings颜色:红色' & gtR & lt/FONT >

Else

End If

time add = CStr(time add)

End Function

'-& gt；

& lt/SCRIPT & gt；

& ltSTYLE & gt。todyaColor {

BACKGROUND-COLOR:aqua/STYLE & gt；

& ltMETA content = " MSHTML 6 . . 28 . 155 " name = GENERATOR & gt；& lt/HEAD & gt；

& ltBODY left margin = top margin = onload = initial()& gt；

& lt脚本语言= JavaScript & gt

& lt！-

if(navigator . appname = = " Netscape " | | parse int(navigator . appversion)& lt；4)

document . write(" & lt；h1 & gt你的浏览器无法执行此程序. 1 & lt；/h1 & gt；此程序在IE4以后的版本才能执行！!")

//-& gt；

& lt/SCRIPT & gt；

& lt脚本语言= JavaScript & gt

lck = ；函数r(hval)

{

if(lck = = )

{

document . bgcolor = hval；}

}

& lt/SCRIPT & gt；

& ltDIV id = detail style = " POSITION:absolute " & gt；& lt/DIV & gt；

& lt中心& gt

& ltFORM name = CLD & gt；

& lt表& gt

& ltTBODY & gt

& ltTR & gt

& ltTD vAlign=top align=middle>。& ltBR & gt

& ltFONT id = Clock face = Arial color = # 8 size = 4。& lt/FONT & gt；

& ltP & gt& lt！-时区 *表示自动调整为日光节约时间-& gt；& ltFONT style = " FONT-SIZE:9pt " SIZE = 2 & gt。& ltSELECT

style = " FONT-SIZE:9pt " onchange = changeTZ()name = TZ & gt；& lt选项

值="-12安尼威土克、瓜甲兰"选定的& gt国际换日线& lt选项

值="-11中途岛、萨摩亚群岛" & gt萨摩亚& lt选项值="-1夏威夷" & gt夏威夷& lt选项

值=-9*阿拉斯加& gt阿拉斯加& lt选项值=-8*太平洋时间（美加)、提亚纳& gt太平洋& lt选项

值=-7*亚历桑那& gt美国山区& lt选项值=-7*山区时间（美加)& gt美加山区& lt选项

值=-6*萨克其万（加拿大)& gt加拿大中部& lt选项值=-6*墨西哥市、塔克西卡帕& gt墨西哥& lt选项

值=-6*中部时间（美加)& gt美加中部& lt选项值=-5*波哥大、里玛& gt南美洲太平洋& lt选项

值=-5*东部时间（美加)& gt美加东部& lt选项值=-5*印第安纳（东部)& gt美东& lt选项

值=-4*加拉卡斯、拉帕兹& gt南美洲西部& lt选项值="-4*大西洋时间 加拿大)" & gt大西洋& lt选项

值="-33新岛（加拿大东岸)" & gt纽芬兰& lt选项值="-3波西尼亚" & gt东南美洲& lt选项

值="-3布鲁诺斯爱丽斯、乔治城" & gt南美洲东部& lt选项值=-2*大西洋中部& gt大西洋中部& lt选项

值=-1*亚速尔群岛、维德角群岛& gt亚速尔& lt选项

值="+格林威治时间、都柏林、爱丁堡、伦敦" & gt英国夏令& lt选项

值="+莫洛维亚（赖比瑞亚)、卡萨布兰卡" & gt格林威治标准& lt选项

值="+1巴黎、马德里" & gt罗马& lt选项值="+1布拉格,华沙,布达佩斯" & gt中欧& lt选项

值="+1柏林、斯德哥尔摩、罗马、伯恩、布鲁赛尔、维也纳" & gt西欧& lt选项

值="+2以色列" & gt以色列& lt选项值=+2*东欧& gt东欧& lt选项

值=+2*开罗& gt埃及& lt选项值=+2*雅典、赫尔辛基、伊斯坦堡& gtGFT<选项

值=+2*赫拉雷、皮托里& gt南非& lt选项

值=+3*巴格达、科威特、奈洛比（肯亚)、里雅德（沙乌地)& gt沙乌地阿拉伯& lt选项

值=+3*莫斯科、圣彼得堡、贺占、窝瓦格瑞德& gt俄罗斯& lt选项值=+33*德黑兰& gt伊朗& lt选项

值=+4*阿布达比（东阿拉伯)、莫斯凯、塔布理斯（乔治亚***和)& gt阿拉伯& lt选项

值=+43*喀布尔& gt阿富汗& lt选项值="+5伊斯兰马巴德、克洛奇、伊卡特林堡、塔须肯" & gt西亚& lt选项

值="+53孟买、加尔各答、马垂斯、新德里、可伦坡" & gt印度& lt选项

值="+6阿马提、达卡" & gt中亚& lt选项值="+7曼谷、亚加达、胡志明市" & gt曼谷& lt选项

值="+8北京、重庆、黑龙江" & gt中国& lt选项值="+8台湾、香港、新加坡" & gt台北& lt选项

值="+9东京、大阪、扎幌、汉城、亚库兹（东西伯利亚)" & gt东京& lt选项

值="+93达尔文" & gt澳洲中部& lt选项值="+1布里斯本、墨尔本、席德尼" & gt席德尼& lt选项

值="+1霍巴特" & gt塔斯梅尼亚& lt选项值="+1关岛、莫斯比港、海 威" & gt西太平洋& lt选项

值=+11*马哥大、所罗门群岛、新卡伦多尼亚& gt太平洋中部& lt选项

值="+12威灵顿、奥克兰" & gt纽西兰& lt选项

值="+12斐济、肯加塔、马歇尔群岛" & gt斐济& lt/OPTION & gt；& lt/SELECT & gt；时间& lt/FONT & gt；& ltBR & gt& ltFONT

id = clock 2 face = Arial color = # 8 size = 4 align = " center " >& lt/FONT & gt；& ltBR & gt

& ltBR & gt

& ltid=CITY

style="FONT-SIZE: 9pt。宽度:15px颜色:蓝色；字体系列: '新细明体" & gt& lt/FONT & gt；& lt/P & gt；& lt/TD & gt；

& ltTD align = middle & gt

& ltDIV style = " Z-INDEX:-1；位置:绝对；TOP: 3px " >& ltFONT id = YMBG

style = " FONT-SIZE:9pt。颜色:# fffFONT-FAMILY: 'Arial Black'">。？ & ltBR & gt？JUN & lt/FONT & gt；

& lt/DIV & gt；

& lt表格边框= & gt

& ltTBODY & gt

& ltTR & gt

& ltTD bgColor=#8 colSpan=7>。& ltFONT style = " FONT-SIZE:9pt "

color = # ffffff SIZE = 2 >公历& ltSELECT style = " FONT-SIZE:9pt "

onchange = change CLD()name = SY >

& lt脚本语言= JavaScript & gt& lt！-

for(I = 19；我& lt25;i++)document . write(' & lt；选项>；'+I)

//-& gt；& lt/SCRIPT & gt；

& lt/SELECT & gt；年& ltSELECT style = " FONT-SIZE:9pt " onchange = change CLD()

name = SM & gt。

& lt脚本语言= JavaScript & gt