代码如下:<%@LANGUAGE=”VBSCRIPT” CODEPAGE=”936′′%> <% ‘—————————— ‘程序名称:蓝色空间 天气小偷 ‘程序设计:小马 ‘QQ:55100100 ‘网站:http://www.bluespace.cn(蓝色空间) ‘日期:2005-11-15 ‘—————————— Dim strArray(9,2),AreaID strArray(1,0) = “index.htm” strArray(1,1) = “华北地区” strArray(2,0) = “hd.htm” strArray(2,1) = “华东地区” str