使用VBscript设置/调整rtf文件的文件版本

我创建了一个登录脚本来自动为Outlook创建电子邮件签名。此脚本创建以下文件“C:\Users\%username%\AppData\Roaming\Microsoft\Signatures\Default\u signature.rtf”

我想向该文件添加一个版本号，以便检查是否需要更新该文件。如果没有，请退出登录脚本。否则，请使用更高版本号更新签名

获取版本号非常容易找到，但我找不到如何使用VBscript设置/更改版本号

使用DSOFile.OleDocumentProperties对我不起作用。我一直收到一个ActiveX错误“无法创建对象”。可能是我必须注册 系统中的dsofile.dll，但此代码必须适用于我们公司的每个用户，在使用此登录脚本之前，我不想在每个设备上安装此代码

'Code for requesting versionnumber    
Set objFSO = CreateObject("Scripting.FileSystemObject")
    file = "C:\Users\%username%\AppData\Roaming\Microsoft\Signatures\Default_signature.rtf"
    Wscript.Echo "Version = " & objFSO.GetFileVersion(file)

---

我希望有人能告诉我如何做到这一点：）

据我所知，DSO是Microsoft唯一支持的在不重写文件的情况下更改文件属性的方法。Excel中有一些VBA脚本，但这不适用于RTFs

但是，我可以建议另一种选择吗？我在我的基础设施中有一个脚本，可以在每次登录时运行，并在共享上检查某个文件的上次修改日期。如果计算机上的文件较旧，则会被共享上的文件替换

 Dim objFSO, strFileName

    strFileName = "C:\Users\user\Desktop\Tests\fdsfsd.rtf"

    Set objFSO = CreateObject( "Scripting.FileSystemObject" )

    WScript.Echo objFSO.GetFile( strFileName ).DateLastModified

    Set objFSO = Nothing

---

嗨，亚历克斯，谢谢你的建议。这似乎是我唯一的选择。。。