快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

天气预告的小偷,可以偷到全国24小时城市天气预告

++++++++++++++++ weather.htm +++++++++++++++
<html>

<head>
<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>全国24小时早间城市天气预告</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;
var isLoad = \\\'<HTML><BODY text=#003366><center><span style="font-size:9pt">正在读取数据, 请稍候 ......</span></center></BODY></HTML>\\\';
try{
var Http = new ActiveXObject("Microsoft.XMLHTTP"); //建立XMLHTTP对象
}
catch(e){alert("Wrong!使用本服务您必须使用IE5.0以上版本的浏览器");
}
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("<HTML><style>td,body{font-size:9pt}</style><body leftmargin=0 topmargin=0 >");
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("<IMG src="chinamapzj.gif" width=559 useMap="#Map" border=0></body></html>");
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>
</head>
<body onload="init()">
<SCRIPT language=JavaScript1.1 src="tojava.js"></SCRIPT>
<IMG src="chinamapzj.gif" width=1 border=0>
<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>

</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 = "<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>"
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就可以看到最新的天气预告了
返回类别: 教程
上一教程: 用VB编写ACTIVEX DLL实现ASP编程
下一教程: 如何在页面上动态的生成 WEBFORM控件

您可以阅读与"天气预告的小偷,可以偷到全国24小时城市天气预告"相关的教程:
· 采用XMLHTTP编写一个天气预告的程序
· 止网站内容被人小偷和采集的ASP代码
· 下拉框连动的小例子(数据库版)
· ASP中实现小偷程序的原理和简朴
· 小偷程序大揭秘
    微笑服务 优质保证 索取样品