++++++++++++++++ weather.htm +++++++++++++++
<meta http-equiv= "Content-type" content= "text/html; charset=gb2312 ">
<meta http-equiv= "Pragma" content= "No-cache" >
<meta http-equiv= "Cache-control" content= "No-cache" >
<meta http-equiv= "Expires" content= "0" >
<style>body{font-size:9pt}</style>
<title> National 24-hour early morning city weather forecast </title>
<script language= "VBScript" >
Function Bytes2bstr (vIn)
Strreturn = ""
For i = 1 to LenB (vIn)
Thischarcode = AscB (MidB (vin,i,1))
If Thischarcode < &h80 Then
Strreturn = Strreturn & Chr (Thischarcode)
Else
Nextcharcode = AscB (MidB (vin,i+1,1))
Strreturn = Strreturn & Chr (CLng (thischarcode) * &h100 + CInt (nextcharcode))
i = i + 1
End If
Next
Bytes2bstr = Strreturn
End Function
</script>
<script language= "Javascript" >
Self.onerror=null;
The var isload = ' try{
var Http = new ActiveXObject ("Microsoft.XMLHTTP"); Create a XMLHTTP Object
}
catch (E) {alert ("wrong! Use this service you must use the browser above IE5.0 version");
}
function doit ()
{if (http.readystate!=4) {return;}
Back=bytes2bstr (Http.responsebody)
Back=back.substr (Back.indexof ("<map name=map>"));
Parent.tqif.document.open ();
Parent.tqif.document.writeln ("Parent.tqif.document.writeln ("<div id=overdiv style=\" Z-INDEX:1; Position:absolute\ "></DIV>");
Parent.tqif.document.writeln ("<\script language=javascript1.1 src=\" tojava.js\ "><\/SCRIPT>");
Parent.tqif.document.writeln (back);
Parent.tqif.document.writeln ("</body> Parent.tqif.document.close ();
Delete (Http);
}
function Send (Str,url)
{
Http.open ("Get", url,true)
Http.send ()
Http.onreadystatechange=doit;
Return
}
function Rp2 (str,fs,is)
{while (Str.indexof (Fs)!=-1)
STR = str.replace (Fs,is)
Return (STR)
}
function init ()
{Send ("", "http://202.106.103.44/forecast/fc06024.php");
}</script>
<body >
<script language=javascript1.1 src= "Tojava.js" ></SCRIPT>
<iframe width=560 height=560 marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 SCROLLING=no BORDERCOLOR= " #000000 "Name=tqif src=" Javascript:parent.isLoad "></iframe>
</body>
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 = "<table width=" +width+ "border=0 cellpadding=" +border+ "cellspacing=0 bgcolor=\" "+backcolor+" \ "><TR ><td><table width=100% border=0 cellpadding=2 cellspacing=0 bgcolor=\ "+fcolor+" \ "><TR><TD Class=p1><font face=\ "Song color=\" "+textcolor+" > "+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=====================
Use Instructions ******************************
Save the three files to a directory and open weather.htm to see the latest weather forecast.
