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

ASP
javascript css 三级目录(简单的)
asp下sql和access数据库随机取10条记录的代码newid()
新增加一个防垃圾评论的asp代码,鄙视垃圾
asp ADO GetString函数与用GetString来提高ASP的速度
windows2003下使用asp WScript.Shell的设置方法
asp UTF-8 乱码问题的解决方法小结
JavaScript面向对象的两种书写方法以及差别
响应对象 错误 ''ASP 0185 : 80020003'' 缺少默认属性
ASP生成伪参数程序设计技巧
asp中使用mysql数据库的注意实现
使用FSO修改文件夹的名称实现文件转移防盗链
asp下request.querystring("id")与request("id")区别
asp将全角的字符转变成半角字符,将半角转变成全角d的代码
asp创建表,复制表 字段类型附录
asp加密解密函数decrypt
asp获取当前网页地址的代码
asp下经常用到的代码
asp 的中文分词
修改正确的asp冒泡排序
rustysun同学ASP代码书写规范

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


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

  -----------------------counter.asp---------------------
<%user=request.querystring("user")%>
<!--#include file="header"-->
<%
set fsFilesys=CreateObject("Scripting.FileSystemObject")
set myText=fsFilesys.OpenTextFile(Server.MapPath("/explorer/")&"/counter/txt/"&user&".ddd")
counter=myText.ReadLine
myText.close
counter=counter+1
set myText=fsFilesys.CreateTextFile(Server.MapPath("/explorer/")&"/counter/txt/"&user&".ddd",true)

myText.WriteLine(counter)
myText.close %>
<%
dim a(512)
dim data1(10,8,8)
data1(8,0,0)=0
data1(8,0,1)=0
data1(8,0,2)=0
data1(8,0,3)=0
data1(8,0,4)=0
data1(8,0,5)=0
data1(8,0,6)=0
data1(8,0,7)=0

data1(8,1,0)=0
data1(8,1,1)=1
data1(8,1,2)=1
data1(8,1,3)=1
data1(8,1,4)=1
data1(8,1,5)=1
data1(8,1,6)=1
data1(8,1,7)=1

data1(8,2,0)=0
data1(8,2,1)=1
data1(8,2,2)=0
data1(8,2,3)=0
data1(8,2,4)=0
data1(8,2,5)=0
data1(8,2,6)=0
data1(8,2,7)=1

data1(8,3,0)=0
data1(8,3,1)=1
data1(8,3,2)=0
data1(8,3,3)=0
data1(8,3,4)=0
data1(8,3,5)=0
data1(8,3,6)=0
data1(8,3,7)=1

data1(8,4,0)=0
data1(8,4,1)=1
data1(8,4,2)=1
data1(8,4,3)=1
data1(8,4,4)=1
data1(8,4,5)=1
data1(8,4,6)=1
data1(8,4,7)=1

data1(8,5,0)=0
data1(8,5,1)=1
data1(8,5,2)=0
data1(8,5,3)=0
data1(8,5,4)=0
data1(8,5,5)=0
data1(8,5,6)=0
data1(8,5,7)=1

data1(8,6,0)=0
data1(8,6,1)=1
data1(8,6,2)=0
data1(8,6,3)=0
data1(8,6,4)=0
data1(8,6,5)=0
data1(8,6,6)=0
data1(8,6,7)=1

data1(8,7,0)=0
data1(8,7,1)=1
data1(8,7,2)=1
data1(8,7,3)=1
data1(8,7,4)=1
data1(8,7,5)=1
data1(8,7,6)=1
data1(8,7,7)=1

data1(0,0,0)=0
data1(0,0,1)=0
data1(0,0,2)=0
data1(0,0,3)=0
data1(0,0,4)=0
data1(0,0,5)=0
data1(0,0,6)=0
data1(0,0,7)=0

data1(0,1,0)=0
data1(0,1,1)=1
data1(0,1,2)=1
data1(0,1,3)=1
data1(0,1,4)=1
data1(0,1,5)=1
data1(0,1,6)=1
data1(0,1,7)=1

data1(0,2,0)=0
data1(0,2,1)=1
data1(0,2,2)=0
data1(0,2,3)=0
data1(0,2,4)=0
data1(0,2,5)=0
data1(0,2,6)=0
data1(0,2,7)=1

data1(0,3,0)=0
data1(0,3,1)=1
data1(0,3,2)=0
data1(0,3,3)=0
data1(0,3,4)=0
data1(0,3,5)=0
data1(0,3,6)=0
data1(0,3,7)=1

data1(0,4,0)=0
data1(0,4,1)=1
data1(0,4,2)=0
data1(0,4,3)=0
data1(0,4,4)=0
data1(0,4,5)=0
data1(0,4,6)=0
data1(0,4,7)=1

data1(0,5,0)=0
data1(0,5,1)=1
data1(0,5,2)=0
data1(0,5,3)=0
data1(0,5,4)=0
data1(0,5,5)=0
data1(0,5,6)=0
data1(0,5,7)=1

data1(0,6,0)=0
data1(0,6,1)=1
data1(0,6,2)=0
data1(0,6,3)=0
data1(0,6,4)=0
data1(0,6,5)=0
data1(0,6,6)=0
data1(0,6,7)=1

data1(0,7,0)=0
data1(0,7,1)=1
data1(0,7,2)=1
data1(0,7,3)=1
data1(0,7,4)=1
data1(0,7,5)=1
data1(0,7,6)=1
data1(0,7,7)=1


data1(1,0,0)=0
data1(1,0,1)=0
data1(1,0,2)=0
data1(1,0,3)=0
data1(1,0,4)=0
data1(1,0,5)=0
data1(1,0,6)=0
data1(1,0,7)=0

data1(1,1,0)=0
data1(1,1,1)=0
data1(1,1,2)=0
data1(1,1,3)=0
data1(1,1,4)=0
data1(1,1,5)=0
data1(1,1,6)=1
data1(1,1,7)=1

data1(1,2,0)=0
data1(1,2,1)=0
data1(1,2,2)=0
data1(1,2,3)=0
data1(1,2,4)=0
data1(1,2,5)=0
data1(1,2,6)=1
data1(1,2,7)=1

data1(1,3,0)=0
data1(1,3,1)=0
data1(1,3,2)=0
data1(1,3,3)=0
data1(1,3,4)=0
data1(1,3,5)=0
data1(1,3,6)=1
data1(1,3,7)=1

data1(1,4,0)=0
data1(1,4,1)=0
data1(1,4,2)=0
data1(1,4,3)=0
data1(1,4,4)=0
data1(1,4,5)=0
data1(1,4,6)=1
data1(1,4,7)=1

data1(1,5,0)=0
data1(1,5,1)=0
data1(1,5,2)=0
data1(1,5,3)=0
data1(1,5,4)=0
data1(1,5,5)=0
data1(1,5,6)=1
data1(1,5,7)=1

data1(1,6,0)=0
data1(1,6,1)=0
data1(1,6,2)=0
data1(1,6,3)=0
data1(1,6,4)=0
data1(1,6,5)=0
data1(1,6,6)=1
data1(1,6,7)=