如何使用VBScript将自定义属性添加到文件中

Question

当您在Windows资源管理器中右键单击文件并单击属性，然后单击自定义选项卡时，会出现一个属性列表。我想使用VBScript文件添加这些自定义属性之一。该属性的名称必须是Version，并且该值必须是版本号，例如1.0.0.0。文件类型是msi。

Answer 1

要读取和写入自定义文件属性，您需要使用dsofile.dll库提供的DSOFile.OleDocumentProperties COM对象。

这里的示例代码来完成你的任务：

Set oFile = CreateObject("DSOFile.OleDocumentProperties") 
oFile.Open("E:\Setup.msi") 

oFile.CustomProperties.Add "Version", "1.0.0.0" 
oFile.Save 
oFile.Close 

运行此代码之前，请确保您已注册dsofile.dll系统：关于使用dsofile

regsvr32 dsofile.dll 

更多信息。 dll在this TechNet article。