一个ini类代替缓存使用

80酷酷网    80kuku.com

  缓存|缓存把下面的代码保存为INI.asp即可运行:
  1<%
  2'Power By Tim
  3'文件摘要:INI类
  4'文件版本:3.0 
  5'文本创建日期:2:17 2004-12-14
  6'================= 属性说明 ================
  7'INI.OpenFile = 文件路径(使用虚拟路径需在外部定义)
  8'INI.CodeSet  = 编码设置,默认为 GB2312
  9'INI.IsTrue   = 检测文件是否正常(存在)
 10'================ 方法说明 =================
 11'IsGroup(组名)            检测组是否存在
 12'IsNode(组名,节点名)            检测节点是否存在
 13'GetGroup(组名)            读取组信息
 14'CountGroup()            统计组数量
 15'ReadNode(组名,节点名)            读取节点数据
 16'WriteGroup(组名)            创建组
 17'WriteNode(组,节点,节点数据)      插入/更新节点数据
 18'DeleteGroup(组名)            删除组
 19'DeleteNode(组名,节点名)      删除节点
 20'Save()                  保存文件
 21'Close()                  清除内部数据(释放)
 22'===============================================
 23
 24
 25
 26Class INI_Class
 27'===============================================
 28     Private Stream            '// Stream 对象
 29     Private FilePath      '// 文件路径
 30     Public Content            '// 文件数据
 31     Public IsTrue            '// 文件是否存在
 32     Public IsAnsi            '// 记录是否二进制
 33

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: