VBS获取Ini配置文件一个节点下的所有字段的值

最新推荐文章于 2026-06-23 15:37:59 发布

原创

最新推荐文章于 2026-06-23 15:37:59 发布 · 1.2k 阅读

标签

#ini #文档 #function #存储

收录于

本文档提供了一个VBS函数，用于读取INI配置文件中特定节点下的所有字段值。通过输入参数指定文件路径和节点类型，函数返回一个包含找到的字段值的数组。示例展示了如何调用此函数并显示结果。

'/****************************************************/
'* 功能：使用VBS读取ini文件中指定节点下的所有值
'* 输入参数：inipath ：ini文件的地址
'*           initypes ：ini文件中包含在"["和"]"之间的值
'* 返回值：找到的字段的值组成的array
'* 编写人： chenyb
'* 编写日期：2008-12-26
'* 其他说明：以下只是方法，具体问题具体修改
'/****************************************************/
Function vbsGetIniFields(inipath,initypes)
Const ForReading = 1 '定义常量
'FSO对象，文本对象，下一行数据变量，字串搜索位置
Dim objFSO,objTextFile,strNextLine,intLineFinder
Dim state '指定是否在匹配的initypes中是否找到字段
Dim tmp    '临时存储字符串
Dim typeList '分割字符串后的字串list
Dim rsStr    '函数返回值
Set objFSO = CreateObject("Scripting.FileSystemObject") '建立FSO对象
Set objTextFile = objFSO.OpenTextFile(inipath, ForReading)'打开文档
Do Until objTextFile.AtEndOfStream   '遍历每一行
  strNextLine = objTextFile.ReadLine '读取一行数据
&nb