我想从INI文件中找到一个部分名称,只使用 ADODB.Stream 而不是使用Charset“_autodetect_all”编写脚本.FileSystemObject的唯一键名
我的ini文件:
...
...
...
[Area.104]
Title=Central North America
Local=Scenery\NAMC Layer=104
Active=TRUE
Required=FALSE
[Area.105]
Local=Scenery\NAME
Layer=105
Active=TRUE
Required=FALSE
Title=Eastern North America
[Area.106]
Local=Scenery\NAMW
Layer=106
Title=Western North America
Active=TRUE
Required=FALSE
...
...
...
如何从唯一键Title = Eastern North获取章节名称[Area.105] 美国???密钥是随机顺序的。感谢
答案 0 :(得分:2)
以下是我从其他网站获得的答案(非常感谢omen999)
此代码与ADODB完美配合
Dim TitleName
TitleName = Array("Central North America")
Set IniStream=CreateObject("ADODB.Stream")
IniStream.Open
Inistream.Charset="_autodetect_all"
IniStream.LoadFromFile "Area.ini"
IniFile=IniStream.ReadText
PosEnd=InStrRev(IniFile,"]",InStrRev(IniFile,TitleName(0)))
PosStart=InStrRev(IniFile,"[",PosEnd)+1
Wscript.Echo Mid(IniFile,PosStart,PosEnd-PosStart)
IniStream.Close