++++++++++++++++ weather.htm +++++++++++++++
1<html>
2<head>
3<meta content="text/html; charset=utf-8" http-equiv="Content-Type"/>
4<meta content="no-cache" http-equiv="Pragma"/>
5<meta content="no-cache" http-equiv="Cache-Control"/>
6<meta content="0" http-equiv="Expires"/>
7<style>body{font-size:9pt}</style>
8<title>全国24小时早间城市天气预报</title>
9<script language="vbscript">
10Function bytes2BSTR(vIn)
11strReturn = ""
12For i = 1 To LenB(vIn)
13ThisCharCode = AscB(MidB(vIn,i,1))
14If ThisCharCode < &H80 Then
15strReturn = strReturn & Chr(ThisCharCode)
16Else
17NextCharCode = AscB(MidB(vIn,i+1,1))
18strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
19i = i + 1
20End If
21Next
22bytes2BSTR = strReturn
23End Function
24</script>
25<script language="Javascript">
26self.onerror=null;
27var isLoad = '<HTML><BODY text=#003366><center><span style=\"font-size:9pt\">正在读取数据, 请稍候 ......</span></center></BODY></HTML>';
28try{
29var Http = new ActiveXObject("Microsoft.XMLHTTP"); //建立XMLHTTP对象
30}
31catch(e){alert("Wrong!使用本服务您必须使用IE5.0以上版本的浏览器");
32}
33function doit()
34{if (Http.readystate!=4){return;}
35Back=bytes2BSTR(Http.responseBody)
36Back=Back.substr(Back.indexOf("<MAP name=Map>"));
37parent.tqif.document.open();
38parent.tqif.document.writeln("<HTML><style>td,body{font-size:9pt}</style><body leftmargin=0 topmargin=0 >");
39parent.tqif.document.writeln("<DIV id=overDiv style=\"Z-INDEX: 1; POSITION: absolute\"></DIV>");
40parent.tqif.document.writeln("<\SCRIPT language=JavaScript1.1 src=\"tojava.js\"><\/SCRIPT>");
41parent.tqif.document.writeln (Back);
42parent.tqif.document.writeln("<IMG src=\"chinamapzj.gif\" width=559 useMap=\"#Map\" border=0></body></html>");
43parent.tqif.document.close();
44delete(Http);
45}
46function Send(Str,URL)
47{
48Http.open("GET",URL,true)
49Http.send()
50Http.onreadystatechange=doit;
51return;
52}
53function rp2(Str,Fs,Is)
54{while (Str.indexOf(Fs)!=-1)
55Str = Str.replace(Fs,Is)
56return(Str)
57}
58function init()
59{Send("","http://202.106.103.44/forecast/fc06024.php");
60}</script>
61</head>
62<body onload="init()">
63<script language="JavaScript1.1" src="tojava.js"></script>
64<img border="0" src="chinamapzj.gif" width="1"/>
65<iframe bordercolor="#000000" frameborder="0" height="560" hspace="0" marginheight="0" marginwidth="0" name="tqif" scrolling="no" src="javascript:parent.isLoad" vspace="0" width="560"></iframe>
66</body>
67</html>
***************** tojava.js ****************
if (typeof fcolor == 'undefined') { var fcolor = "#CCFFCC";}
if (typeof backcolor == 'undefined') { var backcolor = "#333399";}
if (typeof textcolor == 'undefined') { var textcolor = "#0000FF";}
if (typeof capcolor == 'undefined') { var capcolor = "#FFFFFF";}
if (typeof closecolor == 'undefined') { var closecolor = "#9999FF";}
if (typeof width == 'undefined') { var width = "120";}
if (typeof border == 'undefined') { var border = "1";}
if (typeof offsetx == 'undefined') { var offsetx = -120;}
if (typeof offsety == 'undefined') { var offsety = 10;}
var x = 0;
var y = 0;
var snow = 0;
var sw = 0;
var cnt = 0;
var dir = 1;
var tr=1;
if (top.location!= location){
over = overDiv.style
document.onmousemove = mouseMove
}
function drawcitys(text) {
dts(1,text);
}
function mout() {
if ( cnt >= 1 ) { sw = 0 };
if ( sw == 0 ) {
snow = 0;
hideObject(over);
} else {
cnt++;
}
}
function dts(d,text) {
txt = "
1<table bgcolor='\""+backcolor+"\"' border="0" cellpadding="+border+" cellspacing="0" width="+width+"><tr><td><table bgcolor='\""+fcolor+"\"' border="0" cellpadding="2" cellspacing="0" width="100%"><tr><td class="P1"><font color='\""+textcolor+"\"' face='\"宋体\"'>"+text+"</font></td></tr></table></td></tr></table>
"
layerWrite(txt);
dir = d;
disp();
}
function disp() {
if (snow == 0)
{
if (dir == 2) { // Center
moveTo(over,x+offsetx-(width/2),y+offsety);
}
if (dir == 1) { // Right
moveTo(over,x+offsetx,y+offsety);
}
if (dir == 0) { // Left
moveTo(over,x-offsetx-width,y+offsety);
}
showObject(over);
snow = 1;
}
}
function mouseMove(e) {
x=event.x+document.body.scrollLeft;
y=event.y+document.body.scrollTop;
if (snow) {
if (dir == 2) { // Center
moveTo(over,x+offsetx-(width/2),y+offsety);
}
if (dir == 1) { // Right
moveTo(over,x+offsetx,y+offsety);
}
if (dir == 0) { // Left
moveTo(over,x-offsetx-width,y+offsety);
}
}
}
function cClick() {
hideObject(over);
sw=0;
}
function layerWrite(txt) {
document.all["overDiv"].innerHTML = txt
}
function showObject(obj) {
obj.visibility = "visible"
}
function hideObject(obj) {
obj.visibility = "hidden"
}
function moveTo(obj,xL,yL) {
obj.left = xL
obj.top = yL
}
=====================chinamapzj.gif=====================
使用说明***************
将以上三个文件保存到一个目录中,打开weather.htm就可以看到最新的天气预报了