Vbscript VBS从INI文件中获取一个节名,该文件只有一个唯一的键名ADODB.Stream

Vbscript VBS从INI文件中获取一个节名,该文件只有一个唯一的键名ADODB.Stream,vbscript,adodb,ini,Vbscript,Adodb,Ini,我希望使用ADODB.Stream而不是使用字符集为“\u autodetect\u all”的scripting.FileSystemObject,从INI文件中查找只有唯一键名的节名 我的ini文件: ... ... ... [Area.104] Title=Central North America Local=Scenery\NAMC Layer=104 Active=TRUE Required=FALSE [Area.105] Local=Scenery\NAME

我希望使用ADODB.Stream而不是使用字符集为“\u autodetect\u all”的scripting.FileSystemObject,从INI文件中查找只有唯一键名的节名

我的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 

... 
... 
...
如何从unique key Title=东北部获取节名[Area.105]
美国钥匙是按随机顺序排列的。谢谢

这是我从另一个网站得到的答案(非常感谢)

这段代码与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

可能的重复有很大的不同,因为我用ADODB.Stream问了一个代码。这几乎就像你问了一个问题,得到了一个不太合适的答案,然后决定写另一个问题,希望有人能给你答案。你甚至写过代码,一个怎么样?至于一个很大的区别,这是有争议的。至少你应该修改你的原始问题,以包含
ADODB.Stream
要求,而不是创建一个重复的问题。你好,Lankymart,你是对的,我必须在发布新问题之前修改原始问题,对不起。我今天订阅了这个网站,但我没有找到编辑我文章的方法,我还不熟悉这个系统。对我的第一个问题的回答非常好。如果这是你第一次来,欢迎。我还建议你阅读并搜索该网站(或使用谷歌搜索该网站),以确保你的问题尚未得到回答。