把下面的代码保存为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