仓酷云

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

[学习教程] ASP网页设计收集精英计数器源程序

[复制链接]
愤怒的大鸟 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:22:17 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
ASP脚本是采用明文(plaintext)方式来编写的。程序|计数器|收集利用了imagelib组件!
<%
site_id=Request.QueryString("site_id")
ifisempty(site_id)then
Response.End
endif

SetSistema=CreateObject("Scripting.FileSystemObject")
setILIB=server.createobject("Overpower.ImageLib")
path=server.MapPath("../保留计数文件的路径/")
CounterFile=path&"count_"&site_id&".txt"
contagem=0
ifSistema.FileExists(counterfile)then
Setarquivo=Sistema.GetFile(counterfile)
Settexto=arquivo.OpenAsTextStream(1,-2)
contagem=texto.readline
texto.close
endif
contagem=contagem+1

Settexto=sistema.CreateTextFile(counterfile,true,false)
texto.writelinecontagem
texto.close

texto=contagem
ifcontagem>1thentexto=texto
textolen=len(texto)
fori=1to8-textolen
texto="0"&texto
next

ILIB.FontColor="#00ff00"字体色
ILIB.BrushColor="#000000"背景致
ILIB.FontFace="Verdana"
ILIB.FontFace="Checkers"
ILIB.FontSize=8
ILIB.FontBold=false
ILIB.width=ILIB.GetTextwidth(texto)+5
ILIB.height=ILIB.GetTextHeight(texto)+5
ILIB.PenColor="#307C3B"边框色
ILIB.Box1,1,ILIB.WIDTH,ILIB.HEIGHT
ILIB.Textouttexto,3,3

ILIB.Textout"",ILIB.width/2-tamanho/2,10

ILIB.PictureBinaryWrite2,0,""

SetSistema=nothing
setILIB=nothing
Setarquivo=nothing
Settexto=nothing
%>
本计数器利用了ImageLib组件,在利用程序前必要先注册该组件;
假设说你将文件保留为count.asp,然后在与count.asp,然后经由过程上面代码援用本计数器:
</a>


不外利用之前请发个email给我,以免我在清算的时分将你的数据删了:)
计数器程序代码请看这里http://www.chinanetboy.com/website/read.asp?id=123;

</p>ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用
兰色精灵 该用户已被删除
沙发
发表于 2015-1-24 19:15:26 | 只看该作者
以上是语言本身的弱点,在功能方面ASP同样存在问题,第一是功能太弱,一些底层操作只能通过组件来完成,在这点上是远远比不上PHP/JSP,其次就是缺乏完善的纠错/调试功能,这点上ASP/PHP/JSP差不多。
爱飞 该用户已被删除
板凳
发表于 2015-2-2 12:31:12 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
精灵巫婆 该用户已被删除
地板
发表于 2015-2-7 19:32:05 | 只看该作者
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
山那边是海 该用户已被删除
5#
发表于 2015-2-23 07:43:08 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
透明 该用户已被删除
6#
发表于 2015-3-7 05:53:05 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
简单生活 该用户已被删除
7#
发表于 2015-3-14 11:53:07 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
小妖女 该用户已被删除
8#
发表于 2015-3-21 05:47:10 | 只看该作者
掌握asp的特性而且一定要知道为什么。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-12-23 18:55

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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