📄 一个天气预报的小偷.htm
字号:
<TD align=middle class=p4
colSpan=2><B>一个天气预报的小偷</B></FONT><BR>2001-10-9 动网先锋
</TD></TR>
<TR>
<TD class=p4 colSpan=2>
<BLOCKQUOTE><BR>++++++++++++++++ weather.htm
+++++++++++++++<BR><html>
<P></P>
<P><head><BR><meta http-equiv="Content-Type"
content="text/html; charset=gb2312"><BR><META
HTTP-EQUIV="Pragma" CONTENT="no-cache"><BR><META
HTTP-EQUIV="Cache-Control" CONTENT="no-cache"><BR><META
HTTP-EQUIV="Expires"
CONTENT="0"><BR><style>body{font-size:9pt}</style><BR><title>全国24小时早间城市天气预报</title><BR><script
language="vbscript"><BR>Function bytes2BSTR(vIn)<BR>strReturn =
""<BR>For i = 1 To LenB(vIn)<BR>ThisCharCode =
AscB(MidB(vIn,i,1))<BR>If ThisCharCode < &H80
Then<BR>strReturn = strReturn &
Chr(ThisCharCode)<BR>Else<BR>NextCharCode =
AscB(MidB(vIn,i+1,1))<BR>strReturn = strReturn &
Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))<BR>i = i
+ 1<BR>End If<BR>Next<BR>bytes2BSTR = strReturn<BR>End
Function<BR></script><BR><script
language="Javascript"><BR>self.onerror=null;<BR>var isLoad =
'<HTML><BODY text=#003366><center><span
style=\"font-size:9pt\">正在读取数据, 请稍候
......</span></center></BODY></HTML>';<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("<MAP
name=Map>"));<BR>parent.tqif.document.open();<BR>parent.tqif.document.writeln("<HTML><style>td,body{font-size:9pt}</style><body
leftmargin=0 topmargin=0
>");<BR>parent.tqif.document.writeln("<DIV id=overDiv
style=\"Z-INDEX: 1; POSITION:
absolute\"></DIV>");<BR>parent.tqif.document.writeln("<\SCRIPT
language=JavaScript1.1
src=\"tojava.js\"><\/SCRIPT>");<BR>parent.tqif.document.writeln
(Back);<BR>parent.tqif.document.writeln("<IMG
src=\"chinamapzj.gif\" width=559 useMap=\"#Map\"
border=0></body></html>");<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>}</script><BR></head><BR><body
onload="init()"><BR><SCRIPT language=JavaScript1.1
src="tojava.js"></SCRIPT><BR><IMG src="chinamapzj.gif"
width=1 border=0><BR><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><BR></body></P>
<P></html></P>
<P>***************** tojava.js ****************</P>
<P>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>}
<BR>function drawcitys(text) {<BR>dts(1,text);<BR>}<BR>function
mout() {<BR>if ( cnt >= 1 ) { sw = 0 };<BR>if ( sw == 0 )
{<BR>snow = 0;<BR>hideObject(over);<BR>} else
{<BR>cnt++;<BR>}<BR>}<BR>function dts(d,text) {<BR>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=\"宋体\"
COLOR=\""+textcolor+"\">"+text+"</FONT></TD></TR></TABLE></TD></TR></TABLE>"<BR>layerWrite(txt);<BR>dir
= d;<BR>disp();<BR>}<BR>function disp() {<BR>if (snow ==
0)<BR>{<BR>if (dir == 2) { //
Center<BR>moveTo(over,x+offsetx-(width/2),y+offsety);<BR>}<BR>if
(dir == 1) { //
Right<BR>moveTo(over,x+offsetx,y+offsety);<BR>}<BR>if (dir == 0) {
//
Left<BR>moveTo(over,x-offsetx-width,y+offsety);<BR>}<BR>showObject(over);<BR>snow
= 1;<BR>} <BR>}<BR>function mouseMove(e)
{<BR>x=event.x+document.body.scrollLeft;
<BR>y=event.y+document.body.scrollTop;<BR>if (snow) {<BR>if (dir
== 2) { //
Center<BR>moveTo(over,x+offsetx-(width/2),y+offsety);<BR>}<BR>if
(dir == 1) { //
Right<BR>moveTo(over,x+offsetx,y+offsety);<BR>}<BR>if (dir == 0) {
//
Left<BR>moveTo(over,x-offsetx-width,y+offsety);<BR>}<BR>}<BR>}<BR>function
cClick() {<BR>hideObject(over);<BR>sw=0;<BR>}<BR>function
layerWrite(txt) {<BR>document.all["overDiv"].innerHTML =
txt<BR>}<BR>function showObject(obj) {<BR>obj.visibility =
"visible"<BR>}</P>
<P>function hideObject(obj) {<BR>obj.visibility =
"hidden"<BR>}<BR>function moveTo(obj,xL,yL) {<BR>obj.left =
xL<BR>obj.top =
yL<BR>}<BR>=====================chinamapzj.gif=====================<BR><IMG
SRC="http://202.106.103.44/forecast/images/chinamapzj.gif"
border=0><BR>***************使用说明******************************<BR>将以上三个文件保存到一个目录中,打开weather.htm就可以看到最新的天气预报了.<BR><BR><BR></P></BLOCKQUOTE></TD></TR>
<TR>
<TD class=p4 vAlign=top width="50%">
<BLOCKQUOTE>原作者：netnice<BR>来 源：chinaasp<BR>共有5299位读者阅读过此文<BR>【<A
href="http://bbs.aspsky.net/list.asp?boardid=1">发表评论</A>】
</BLOCKQUOTE></TD>
<TD class=p4 vAlign=top width="50%">
<P>
<LI><FONT color=#0772b1>上篇文章</FONT>：<A
href="http://www.aspsky.net/article/list.asp?id=2404">NT及低配置老机上用ASP.net的体会--M2上也用ASP+</A>
<BR>
<LI><FONT color=#0772b1>下篇文章</FONT>：<A
href="http://www.aspsky.net/article/list.asp?id=2406">如何用asp.net向其他服务器post一条信息</A>
</LI></TD></TR>
<TR>
<TD bgColor=#297dff class=p4 height=20 width="50%"><FONT
color=#ceffff> → 本周热门</FONT></TD>
<TD bgColor=#297dff class=p4 width="50%"><FONT color=#ceffff> →
相关文章</FONT></TD></TR>
<TR>
<TD bgColor=#586011 colSpan=2 height=1><SPACER type="block"
width="1"></TD></TR>
<TR>
<TD colSpan=2 height=7></TD></TR>
<TR>
<TD class=p4 vAlign=top width="50%">
<LI><A href="http://www.aspsky.net/article/list.asp?id=1510"
target=_top title="SQL Server 7.0 入门（一）">SQL Server 7.0
入门（...</A>[<FONT color=red>7239</FONT>]<BR>
<LI><A href="http://www.aspsky.net/article/list.asp?id=1540"
target=_top title=PHP4实际应用经验篇(1)>PHP4实际应用经验篇(1)</A>[<FONT
color=red>7135</FONT>]<BR>
<LI><A href="http://www.aspsky.net/article/list.asp?id=1536"
target=_top
title=无组件文件上传代码实例（支持多文件上传及文件和input域混合上传）>无组件文件上传代码实例（支持多文件上...</A>[<FONT
color=red>6029</FONT>]<BR>
<LI><A href="http://www.aspsky.net/article/list.asp?id=2557"
target=_top title=树型结构在ASP中的简单解决>树型结构在ASP中的简单解决</A>[<FONT
color=red>5757</FONT>]<BR>
<LI><A href="http://www.aspsky.net/article/list.asp?id=1545"
target=_top title=PHP4实际应用经验篇(6)>PHP4实际应用经验篇(6)</A>[<FONT
color=red>5599</FONT>]<BR>
<LI><A href="http://www.aspsky.net/article/list.asp?id=2563"
target=_top title=一个老个写的无组件上传>一个老个写的无组件上传</A>[<FONT
color=red>5014</FONT>]<BR>
<LI><A href="http://www.aspsky.net/article/list.asp?id=1542"
target=_top title=PHP4实际应用经验篇(3)>PHP4实际应用经验篇(3)</A>[<FONT
color=red>4731</FONT>]<BR></LI></TD>
<TD class=p4 vAlign=top width="50%">
<LI><A
href="http://www.aspsky.net/article/list.asp?id=2478">一个例子：从新浪提取上海天气的vbs</A><BR>
<LI><A
href="http://www.aspsky.net/article/list.asp?id=2405">一个天气预报的小偷</A><BR></LI></TD></TR>
<TR>
<TD colSpan=2 height=7></TD></TR></TBODY></TABLE>
<TD bgColor=#297dff width=1> </TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=755>
<TBODY>
<TR>
<TD bgColor=#297dff height=1><SPACER type="block"
width="1"></TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=755>
<TBODY>
<TR>
<TD align=middle height=30></TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=755>
<TBODY>
<TR>
<TD align=middle class=p2 width="100%">
<TABLE border=0 cellPadding=0 cellSpacing=0 width=755>
<TBODY>
<TR>
<TD align=middle class=p2 width="100%">
<P align=center><A
href="http://www.aspsky.net/produce/index.asp">客户服务</A> -- <A
href="http://www.aspsky.net/aspads.asp">广告合作</A> -- <A
href="http://www.aspsky.net/about.asp">关于本站</A> -- <A
href="http://www.aspsky.net/tell.asp">联系方法</A><BR><BR>动网先锋版权所有 <FONT
face=Verdana, size=1 Arial, Helvetica, sans-serif>Copyright ©
2000-2001 <B>AspSky<FONT color=#cc0000>.Net</FONT></B>, All Rights
Reserved .</FONT>
</P></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></CENTER></CENTER></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -