仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 2161|回复: 18
打印 上一主题 下一主题

[学习教程] ASP教程之一个天色预告的小偷

[复制链接]
跳转到指定楼层
楼主
发表于 2015-2-3 23:40:22 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
使用filesystemobject,可以对服务器上的文件进行操作,浏览、复制、移动、删除等。有ado的支持,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=http://www.163design.net/http://www.163design.net/a/y/"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=http://www.163design.net/a/y/"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=\&quot</p>  缺点:正版成本价格贵(盗版就不说了)、不够安全,大多数服务器用windows系统,没有linux安全
海妖 该用户已被删除
沙发
发表于 2015-2-4 05:26:39 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
活着的死人 该用户已被删除
板凳
发表于 2015-2-9 16:22:50 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
简单生活 该用户已被删除
地板
发表于 2015-2-26 23:53:48 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
老尸 该用户已被删除
5#
发表于 2015-3-1 18:13:07 | 只看该作者
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
乐观 该用户已被删除
6#
发表于 2015-3-6 17:09:03 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
变相怪杰 该用户已被删除
7#
发表于 2015-3-13 04:29:21 | 只看该作者
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
8#
 楼主| 发表于 2015-3-20 12:45:27 | 只看该作者
下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...
若相依 该用户已被删除
9#
发表于 2015-4-1 06:11:27 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
第二个灵魂 该用户已被删除
10#
发表于 2015-4-3 04:20:51 | 只看该作者
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
爱飞 该用户已被删除
11#
发表于 2015-4-7 01:29:36 | 只看该作者
在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。
若天明 该用户已被删除
12#
发表于 2015-4-12 23:52:24 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
因胸联盟 该用户已被删除
13#
发表于 2015-4-16 05:40:30 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
再见西城 该用户已被删除
14#
发表于 2015-4-27 21:15:09 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
金色的骷髅 该用户已被删除
15#
发表于 2015-5-2 16:29:29 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
冷月葬花魂 该用户已被删除
16#
发表于 2015-6-27 21:40:23 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
admin 该用户已被删除
17#
发表于 2015-7-11 03:36:30 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
愤怒的大鸟 该用户已被删除
18#
发表于 2015-7-11 20:32:55 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
灵魂腐蚀 该用户已被删除
19#
发表于 2015-7-11 23:37:20 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-22 21:40

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表