当前位置: 首页 > 图文教程 > 网络编程 > ASP > 不能ASP图像组件来生成图像的ASP计数器程序(一)

ASP
出现404页面错误的自动发送邮件的代码
ASP视频教程:建立显示已经添加的新闻页面
ASP视频教程:使用Eweb编辑器丰富新闻内容的格式
ASP视频教程:建立修改新闻页面
ASP视频教程:制作删除新闻的功能
ASP视频教程:建立产品类别表和添加类别页面
ASP视频教程:建立管理产品的页面
ASP视频教程:制作其它栏目管理页面
ASP实例教程:隐藏下载地址和防盗
ASP教程:虚拟目录下不能上传图片
ASP视频教程:制作网站前台顶部导航页面
ASP视频教程:制作前台导航菜单
ASP视频教程:对前台导航菜单进行调整美化
ASP视频教程:制作新闻中心显示页面
ASP视频教程:制作新闻详细内容显示页面
ASP视频教程:制作前台产品显示页面(按产品类别显示)
ASP视频教程:制作前台产品显示页面(横向重复显示图片)
ASP视频教程:制作在线订购页面
ASP视频教程:制作关于我们和联系我们页面
ASP视频教程:后台功能的一些完善

不能ASP图像组件来生成图像的ASP计数器程序(一)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 49 ::
收藏到网摘: n/a

  不能ASP图像组件来生成图像的ASP计数器程序
这是我去年编的一个ASP程序,那时用惯了C语言,所以对Basic反而忘了,但由于觉得ASP很热门,所以试着编了这个程序,程序没经过优化,代码很长,主要是数据那时候不知道该怎么用:) 别笑我,因为现在我会用啦!!
这是个简单的计数器申请系统,采用文本,所以只要是支持ASP的空间就都可以测试!!
其中TXT目录放的是所有人的计数文本文件
number是用来统计当前申请计数器的最大人数 初始化内容为0
apply.asp applycheck.asp是用来提供申请计数器的
header 是我用C语言从一个256色的bmp图像中提取出来的bmp图像的头部信息,太大了,有时间的人可以改为2色的bmp图像的头部信息,当然代码改变了。我取为256色只是为了方便编制下面的counter.asp
counter.asp 当然是计数器的核心程序啦!!
里面还有一个counter.txt 时隔久了,不知有没有用,反正我也把它放上去嘛算啦!!


ZIP下载地方:
http://grwy.online.ha.cn/explorer

下面只例举出来几个ASP程序的源程序:
--------------apply.asp----------------
<%set fsFilesys=CreateObject("Scripting.FileSystemObject")
set myText=fsFilesys.OpenTextFile(Server.MapPath("/explorer/")&"/counter/number.txt")
counter=mytext.readline
mytext.close
counter=counter+1
user=counter
%>
<html>

<head>
<title></title>
<style type="text/css"><!--
.p9 {  font-family: "宋体"; font-size: 9pt}a        {text-transform: none; text-decoration: none;}
a:hover {text-decoration: underline; color: #002255;}
--></style>
</head>

<body bgcolor="#FFE0D7">

<table border="1" cellspacing="0" cellpadding="0" bgcolor="#0E3700">
  <tr bgcolor="#EEF9FF">
    <td valign="middle" align="center" bgcolor="#FFFCD2" width="694"><span class="p9"><font
    color="#1F9B00"><a href="../../index.html" target="_blank">网站主页</a> </font></span></td>
    <td valign="middle" align="center" bgcolor="#FFFCD2" width="694"><span class="p9"><font
    color="#1F9B00"><a href="../../zdlink/zdjx.htm" target="_blank">网站精选</a> </font></span></td>
    <td valign="middle" align="center" bgcolor="#FFFCD2" width="694"><span class="p9"><font
    color="#1F9B00"><a href="../../program/bcyd111.htm" target="_blank">编程圆地</a> </font></span></td>
    <td valign="middle" align="center" bgcolor="#FFFCD2" width="694"><span class="p9"><font
    color="#1F9B00"><a href="../../zypic/zyfg.htm" target="_blank">中雁风光</a> </font></span></td>
    <td valign="middle" align="center" bgcolor="#FFFCD2" width="694"><span class="p9"><font
    color="#1F9B00"><a href="../../downfile/ljxz.htm" target="_blank">软件下载</a> </font></span></td>
    <td align="center" bgcolor="#FFFCD2" width="695"><p align="center"><span class="p9"><font
    color="#1F9B00"><a href="http://grwy.online.ha.cn/explorer/diablo2/diablo.htm"
    target="_blank">暗黑帝国</a> </font></span></td>
   &nbs