⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 asp制作每天更新的全24小天气.htm

📁 较为详细的介绍了asp自定义的各种函数,方便asp的各种开发.
💻 HTM
📖 第 1 页 / 共 2 页
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0052)http://www.meetchinese.com/earticles/show.cgi?id=904 -->
<HTML><HEAD><TITLE>ASP制作每天更新的全国24小时天气预报 - 读者网摘</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<STYLE>TD {
	FONT-SIZE: 14px
}
LI {
	FONT-SIZE: 14px
}
SELECT {
	FONT-SIZE: 14px
}
INPUT {
	FONT-SIZE: 14px
}
.f7 {
	FONT-SIZE: 7px
}
.f24 {
	FONT-SIZE: 24px
}
.f14 {
	FONT-SIZE: 14px
}
.l17 {
	LINE-HEIGHT: 170%
}
A:link {
	COLOR: #0000ff
}
A:visited {
	COLOR: #800080
}
A:active {
	COLOR: #ff0000
}
A:hover {
	COLOR: #ff0000
}
A.a01:link {
	COLOR: #07015b; TEXT-DECORATION: none
}
A.a01:visited {
	COLOR: #07015b; TEXT-DECORATION: none
}
A.a01:active {
	COLOR: #ff0000; TEXT-DECORATION: none
}
A.a01:hover {
	COLOR: #ff0000; TEXT-DECORATION: none
}
A.a02:link {
	COLOR: #0000ff; TEXT-DECORATION: none
}
A.a02:visited {
	COLOR: #0000ff; TEXT-DECORATION: none
}
A.a02:active {
	COLOR: #ff0000; TEXT-DECORATION: none
}
A.a02:hover {
	COLOR: #ff0000; TEXT-DECORATION: none
}
A.sp1:link {
	COLOR: #0000ff; TEXT-DECORATION: none
}
A.sp1:visited {
	COLOR: #0000ff; TEXT-DECORATION: none
}
A.sp1:active {
	COLOR: #ff0000; TEXT-DECORATION: none
}
A.sp1:hover {
	COLOR: #ff0000; TEXT-DECORATION: none
}
.bsgb {
	COLOR: #ffffff; FONT-SIZE: 12px; TEXT-DECORATION: none
}
A.bsgb:link {
	COLOR: #ffffff; FONT-SIZE: 12px; TEXT-DECORATION: none
}
A.bsgb:visited {
	COLOR: #ffffff; FONT-SIZE: 12px; TEXT-DECORATION: none
}
A.bsgb:active {
	COLOR: #ffffff; FONT-SIZE: 12px; TEXT-DECORATION: none
}
A.bsgb:hover {
	COLOR: #ffffff; FONT-SIZE: 12px; TEXT-DECORATION: none
}
.x14 {
	FONT-SIZE: 14px; LINE-HEIGHT: 130%
}
.title12 {
	FONT-SIZE: 12px
}
.title14 {
	FONT-SIZE: 14px; LINE-HEIGHT: 130%
}
P {
	FONT-SIZE: 14px; LINE-HEIGHT: 170%
}
</STYLE>

<META content="MSHTML 5.00.2919.6307" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff leftMargin=5 topMargin=5 marginheight="5" marginwidth="5">
<SCRIPT language=javascript>function sendmail(id){window.open("http://www.meetchinese.com/earticles/mail.cgi?id="+id,"","height=240,width=470,resizable=no,scrollbars=no,status=no,toolbar=no,menubar=no,location=no");}function review(id){window.open("http://www.meetchinese.com/earticles/review.cgi?action=show&id="+id,"","height=500,width=550,resizable=no,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");}function checksearch(){	if (document.search.key.value=="")	 {			alert("请输入想查询的内容!");		document.search.key.focus();		return false;	 }	 return true;}</SCRIPT>

<DIV align=center>
<TABLE border=0 cellSpacing=0 width=750>
  <TBODY>
  <TR>
    <TD width="100%">您的位置:&nbsp; <A 
      href="http://www.meetchinese.com/">MeetChinese.com</A> &gt; <A 
      href="http://www.meetchinese.com/earticles/main.cgi">读者网摘</A> &gt; <A 
      href="http://www.meetchinese.com/earticles/list.cgi?class=9">ASP</A> &gt; 
      <A 
      href="http://www.meetchinese.com/earticles/list.cgi?class=9&amp;type=102">ASP程序制作</A> 
      &gt; 正文 -- <A 
      href="javascript:window.external.AddFavorite('http://www.meetchinese.com/earticles/show.cgi?id=904', 'ASP制作每天更新的全国24小时天气预报')" 
      target=_self>收藏本文</A> 
      <HR noShade SIZE=1>
    </TD></TR></TBODY></TABLE></DIV>
<DIV align=center>
<TABLE border=0 cellSpacing=0 height=237 width=750>
  <TBODY>
  <TR>
    <TD height=%100 vAlign=top width=590>
      <TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
        <TBODY>
        <TR>
          <TD width="100%">
            <P align=center><SPAN class=title>ASP制作每天更新的全国24小时天气预报</SPAN> 
        </P></TD></TR>
        <TR>
          <TD width="100%"><IMG height=5 
            src="ASP制作每天更新的全24小天气 - 者网摘.files/space.gif" width=1></TD></TR>
        <TR>
          <TD vAlign=center width="100%">
            <DIV align=center>netnice 11-08-2001 20:41:18 阅读789次 <SPAN><A 
            href="http://www.meetchinese.com/earticles/show.cgi?id=903" 
            title=用ASP实现网上“五子棋”大赛>上一篇</A></SPAN> <SPAN 
            title=已经没有了>下一篇</SPAN></DIV></TD></TR>
        <TR>
          <TD vAlign=center width="100%"><IMG height=5 
            src="ASP制作每天更新的全24小天气 - 者网摘.files/space.gif" width=1></TD></TR>
        <TR>
          <TD bgColor=#808080 width="100%"><IMG height=1 
            src="ASP制作每天更新的全24小天气 - 者网摘.files/space.gif" width=1></TD></TR>
        <TR>
          <TD width="100%"><IMG height=5 
            src="ASP制作每天更新的全24小天气 - 者网摘.files/space.gif" width=1></TD></TR>
        <TR>
          <TD class=text width="100%">++++++++++++++++ weather.htm 
            +++++++++++++++ <BR>&lt;html&gt; <BR><BR>&lt;head&gt; <BR>&lt;meta 
            http-equiv="Content-Type" content="text/html; charset=gb2312"&gt; 
            <BR>&lt;META HTTP-EQUIV="Pragma" CONTENT="no-cache"&gt; <BR>&lt;META 
            HTTP-EQUIV="Cache-Control" CONTENT="no-cache"&gt; <BR>&lt;META 
            HTTP-EQUIV="Expires" CONTENT="0"&gt; 
            <BR>&lt;style&gt;body{font-size:9pt}&lt;/style&gt; 
            <BR>&lt;title&gt;全国24小时早间城市天气预报&lt;/title&gt; <BR>&lt;script 
            language="vbscript"&gt; <BR>Function bytes2BSTR(vIn) <BR>&nbsp; 
            &nbsp;strReturn = "" <BR>&nbsp; &nbsp;For i = 1 To LenB(vIn) 
            <BR>&nbsp; &nbsp; &nbsp; &nbsp;ThisCharCode = AscB(MidB(vIn,i,1)) 
            <BR>&nbsp; &nbsp; &nbsp; &nbsp;If ThisCharCode &lt; &amp;H80 Then 
            <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;strReturn = strReturn 
            &amp; Chr(ThisCharCode) <BR>&nbsp; &nbsp; &nbsp; &nbsp;Else 
            <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;NextCharCode = 
            AscB(MidB(vIn,i+1,1)) <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp;strReturn = strReturn &amp; Chr(CLng(ThisCharCode) * &amp;H100 
            + CInt(NextCharCode)) <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;i 
            = i + 1 <BR>&nbsp; &nbsp; &nbsp; &nbsp;End If <BR>&nbsp; &nbsp;Next 
            <BR>&nbsp; &nbsp;bytes2BSTR = strReturn <BR>End Function 
            <BR>&lt;/script&gt; <BR>&lt;script language="Javascript"&gt; 
            <BR>self.onerror=null; <BR>var isLoad = '&lt;HTML&gt;&lt;BODY 
            text=#003366&gt;&lt;center&gt;&lt;span 
            style=\"font-size:9pt\"&gt;正在读取数据, 请稍候 
            ......&lt;/span&gt;&lt;/center&gt;&lt;/BODY&gt;&lt;/HTML&gt;'; 
            <BR>try{ <BR>var Http = new ActiveXObject("Microsoft.XMLHTTP"); 
            //建立XMLHTTP对象 <BR>} 
            <BR>catch(e){alert("Wrong!使用本服务您必须使用IE5.0以上版本的浏览器"); <BR>} 
            <BR>function doit() <BR>{if (Http.readystate!=4){return;} 
            <BR>Back=bytes2BSTR(Http.responseBody) 
            <BR>Back=Back.substr(Back.indexOf("&lt;MAP name=Map&gt;")); 
            <BR>parent.tqif.document.open(); 
            <BR>parent.tqif.document.writeln("&lt;HTML&gt;&lt;style&gt;td,body{font-size:9pt}&lt;/style&gt;&lt;body 
            leftmargin=0 topmargin=0 &gt;"); 
            <BR>parent.tqif.document.writeln("&lt;DIV id=overDiv 
            style=\"Z-INDEX: 1; POSITION: absolute\"&gt;&lt;/DIV&gt;"); 
            <BR>parent.tqif.document.writeln("&lt;\SCRIPT language=JavaScript1.1 
            src=\"tojava.js\"&gt;&lt;\/SCRIPT&gt;"); 
            <BR>parent.tqif.document.writeln (Back); 
            <BR>parent.tqif.document.writeln("&lt;IMG src=\"chinamapzj.gif\" 
            width=559 useMap=\"#Map\" border=0&gt;&lt;/body&gt;&lt;/html&gt;"); 
            <BR>parent.tqif.document.close(); <BR>delete(Http); <BR>} 
            <BR>function Send(Str,URL) <BR>{ <BR>Http.open("GET",URL,true) 
            <BR>Http.send() <BR>Http.onreadystatechange=doit; <BR>return; <BR>} 
            <BR>function rp2(Str,Fs,Is) <BR>{while (Str.indexOf(Fs)!=-1) <BR>Str 
            = Str.replace(Fs,Is) <BR>return(Str) <BR>} <BR>function init() 
            <BR>{Send("","http://202.106.103.44/forecast/fc06024.php"); 
            <BR>}&lt;/script&gt; <BR>&lt;/head&gt; <BR>&lt;body 
            onload="init()"&gt; <BR>&lt;SCRIPT language=JavaScript1.1 
            src="tojava.js"&gt;&lt;/SCRIPT&gt; <BR>&lt;IMG src="chinamapzj.gif" 
            width=1 &nbsp;border=0&gt; <BR>&lt;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"&gt;&lt;/iframe&gt; <BR>&lt;/body&gt; 
            <BR><BR>&lt;/html&gt; <BR><BR>***************** tojava.js 
            **************** <BR><BR>if (typeof fcolor == 'undefined') { var 
            fcolor = "#CCFFCC";} <BR>if (typeof backcolor == 'undefined') { var 
            backcolor = "#333399";} <BR>if (typeof textcolor == 'undefined') { 
            var textcolor = "#0000FF";} <BR>if (typeof capcolor == 'undefined') 
            { var capcolor = "#FFFFFF";} <BR>if (typeof closecolor == 
            'undefined') { var closecolor = "#9999FF";} <BR>if (typeof width == 
            'undefined') { var width = "120";} <BR>if (typeof border == 
            'undefined') { var border = "1";} <BR>if (typeof offsetx == 
            'undefined') { var offsetx = -120;} <BR>if (typeof offsety == 
            'undefined') { var offsety = 10;} <BR>var x = 0; <BR>var y = 0; 
            <BR>var snow = 0; <BR>var sw = 0; <BR>var cnt = 0; <BR>var dir = 1; 
            <BR>var tr=1; <BR>if (top.location!= location){ <BR>over = 
            overDiv.style <BR>document.onmousemove = mouseMove <BR>} &nbsp; 
            &nbsp; <BR>function drawcitys(text) { <BR>&nbsp; &nbsp; &nbsp; 
            &nbsp;dts(1,text); <BR>} <BR>function mout() { <BR>&nbsp; &nbsp; 
            &nbsp; &nbsp;if ( cnt &gt;= 1 ) { sw = 0 }; <BR>&nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;if ( sw == 0 ) { <BR>&nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp;snow = 0; <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;hideObject(over); <BR>&nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;} else { <BR>&nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp;cnt++; <BR>&nbsp; &nbsp; &nbsp; &nbsp;} <BR>} 
            <BR>function dts(d,text) { <BR>&nbsp; &nbsp; &nbsp; &nbsp;txt = 
            "&lt;TABLE WIDTH="+width+" BORDER=0 CELLPADDING="+border+" 
            CELLSPACING=0 
            BGCOLOR=\""+backcolor+"\"&gt;&lt;TR&gt;&lt;TD&gt;&lt;TABLE 
            WIDTH=100% BORDER=0 CELLPADDING=2 CELLSPACING=0 
            BGCOLOR=\""+fcolor+"\"&gt;&lt;TR&gt;&lt;TD CLASS=P1&gt;&lt;FONT 
            FACE=\"宋体\" 
            COLOR=\""+textcolor+"\"&gt;"+text+"&lt;/FONT&gt;&lt;/TD&gt;&lt;/TR&gt;&lt;/TABLE&gt;&lt;/TD&gt;&lt;/TR&gt;&lt;/TABLE&gt;" 
            <BR>&nbsp; &nbsp; &nbsp; &nbsp;layerWrite(txt); <BR>&nbsp; &nbsp; 
            &nbsp; &nbsp;dir = d; <BR>&nbsp; &nbsp; &nbsp; &nbsp;disp(); <BR>} 
            <BR>function disp() { <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp;if (snow == 0) <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; { <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;if (dir == 2) { // 
            Center <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp;moveTo(over,x+offsetx-(width/2),y+offsety); <BR>&nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp;} <BR>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp;if (dir == 1) { // Right <BR>&nbsp; 
            &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -