Retrive a file keywords using script

  • Thread starter Thread starter Micaelsjogren
  • Start date Start date
M

Micaelsjogren

I cant find out how to get a file keywords, i can get title, aurthor and everything else.
I can rightclick the file and choose properties to enter new keywords but it would be great if it works by using script..

Here is an example..
Dim arrHeaders(35)
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("C:\Scripts")
For i = 0 to 34
arrHeaders(i) = objFolder.GetDetailsOf(objFolder.Items, i)
Next
For Each strFileName in objFolder.Items
For i = 1 to 34
Wscript.Echo i & vbtab & arrHeaders(i) _
& ": " & objFolder.GetDetailsOf(strFileName, i)
Next
Next

Continue reading...
 
Back
Top