帝国软件
  设为首页 加入收藏 关于我们
 
解密帝国网站管理系统
栏 目:
 
您的位置:首页 > 技术文档 > ASP编程
不能ASP图像组件来生成图像的ASP计数器程序(二) 
作者: 发布时间:2005-03-12 来源:
-----------------------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)=1

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



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

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

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

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

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

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

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

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




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

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

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

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

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

data1(3,3,0)=0
data1(3,3,1)=0
data1(3,3,2)=0
data1(3,3,3)=0
data1(3,3,4)=0
data1(3,3,5)=0
data1(3,3,6)=0
data1(3,3,7)=1
  
评论】【加入收藏夹】【 】【打印】【关闭
※ 相关链接
 ·能不能在ASP中实现对服务器上执行  (2005-03-12)
 ·不能ASP图像组件来生成图像的ASP  (2005-03-12)
 ·ASP中FSO的神奇功能 - FSO不能做  (2005-03-12)
 ·域名专题 - NT 4.0究竟能不能进行  (2005-03-12)
 ·len(),lift(),right()不能正常识  (2005-03-12)

   栏目导行
  PHP编程
  ASP编程
  ASP.NET编程
  JAVA编程
   站点最新
·致合作伙伴的欢迎信
·媒体报道
·帝国软件合作伙伴计划协议
·DiscuzX2.5会员整合通行证发布
·帝国CMS 7.0版本功能建议收集
·帝国网站管理系统2012年授权购买说
·PHPWind8.7会员整合通行证发布
·[官方插件]帝国CMS-访问统计插件
·[官方插件]帝国CMS-sitemap插件
·[官方插件]帝国CMS内容页评论AJAX分
   类别最新
·在ASP中使用数据库
·使用ASP脚本技术
·通过启动脚本来感受ASP的力量
·学习使用ASP对象和组件
·解析asp的脚本语言
·初看ASP-针对初学者
·ASP开发10条经验总结
·ASP之对象总结
·ASP与数据库应用(给初学者)
·关于学习ASP和编程的28个观点
 
关于帝国 | 广告服务 | 联系我们 | 程序开发 | 网站地图 | 留言板 帝国网站管理系统