使用这个链接，我可以用vba编写一个读取扩展文件属性的程序。 现在，我想创build一个可以编辑扩展文件属性的程序 – 特别是属性22，文件的“主题”。 所以，给定一个文件path，你怎么能编辑与该文件关联的主题？
它不能用你现在使用的方法来完成。 您可以安装并使用Microsoft ActiveX dsofile.dll来使用VBScript获取和设置扩展属性。
Set objFile = CreateObject("DSOFile.OleDocumentProperties") objFile.Open("C:\My Path\MyFile.doc") objFile.SummaryProperties.Subject = "My Subject" objFile.Save set objFile = Nothing '使文件只读
SetAttr "c:\temp\Sample.txt", vbReadOnly
'使文件隐藏
SetAttr "c:\temp\Sample.txt", vbHidden
'请注意，如果您更改了一个属性，现有的属性将被覆盖。 为了使文件既是只读又是隐藏的，在函数中使用这两个属性
SetAttr "c:\temp\Sample.txt", vbHidden + vbReadOnly
'删除所有属性 – 将只读文件转换为读写文件，取消隐藏文件等
SetAttr "c:\temp\Sample.txt", vbNormal