仓酷云
标题:
ASP网页设计天色预告的小偷,可以偷到全国24小时城市...
[打印本页]
作者:
简单生活
时间:
2015-2-3 23:32
标题:
ASP网页设计天色预告的小偷,可以偷到全国24小时城市...
对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了, ++++++++++++++++ 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 >
<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=====================
登录/注册后可看大图
</IMG>
***************利用申明******************************
将以上三个文件保留到一个目次中,翻开weather.htm就能够看到最新的天色预告了ASP由于使用了COM组件所以它会变的十分强大,但是这样的强大由于Windows NT系统最初的设计问题而会引发大量的安全问题。只要在这样的组件或是操作中一不注意,哪么外部攻击就可以取得相当高的权限而导致网站瘫痪或者数据丢失;
作者:
因胸联盟
时间:
2015-2-4 01:42
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
作者:
兰色精灵
时间:
2015-2-4 06:02
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
作者:
小魔女
时间:
2015-2-7 04:32
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
作者:
蒙在股里
时间:
2015-3-6 17:12
封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
作者:
飘灵儿
时间:
2015-3-8 09:30
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
作者:
只想知道
时间:
2015-3-15 21:11
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
作者:
山那边是海
时间:
2015-3-17 01:50
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
作者:
简单生活
时间:
2015-3-17 19:15
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
作者:
活着的死人
时间:
2015-3-20 00:13
ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。
作者:
若天明
时间:
2015-3-27 16:45
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
作者:
再见西城
时间:
2015-4-28 04:29
不能只是将它停留在纸上谈兵的程度上。
作者:
仓酷云
时间:
2015-6-7 14:58
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
作者:
愤怒的大鸟
时间:
2015-6-7 22:17
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
作者:
透明
时间:
2015-6-15 02:42
作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。
作者:
飘飘悠悠
时间:
2015-6-21 18:37
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
作者:
莫相离
时间:
2015-7-26 17:34
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
作者:
分手快乐
时间:
2015-10-1 06:53
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
作者:
再现理想
时间:
2015-10-3 16:30
我认为比较好的方法是找一些比较经典的例子,每个例子比较集中一种编程思想而设计的。
作者:
金色的骷髅
时间:
2015-10-4 20:06
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
欢迎光临 仓酷云 (http://ckuyun.com/)
Powered by Discuz! X3.2