VBA to add Description property to AVI file

[u01jmg3]

Hi,

Just wondered if anyone could point me in the right direction. I'm trying to create a VBA script to add in a value to the "Description" property field of an AVI file. Basically, I've written a PHP script to retrieve film synopsis info from IMDB given a film title. Now I want to use VBA to add the synopsis to the AVI film. I have a lot of films so I want to do this dynamically.

Any help would be much appreciated. Whilst I'm very good with PHP, I'm very new to VBA!

(Windows 7 64-bit)

 

[tsuji]

Bring the question to VBA forum proper there:

http://www.tek-tips.com/threadminder.cfm?pid=707

 

[MasterRacker]

Assuming you meant VBS instead of VBA, I found this to read extended properties

Dim arrHeaders(34)

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace("C:\Scripts")

For i = 0 to 33
    arrHeaders(i) = objFolder.GetDetailsOf(objFolder.Items, i)
Next

For Each strFileName in objFolder.Items
    For i = 0 to 33
        Wscript.Echo i & vbtab & arrHeaders(i) _
            & ": " & objFolder.GetDetailsOf(strFileName, i) 
    Next
Next

Source:

http://www.activexperts.com/activmonitor/windowsmanagement/scripts/storage/filesystems/

Unfortunately, from other links, there does not appear to be an equivalent "SetDetailsOf" method. You might be out of luck.

Jeff
[small][purple]It's never too early to begin preparing for [/purple]International Talk Like a Pirate Day
"The software I buy sucks, The software I write sucks. It's time to give up and have a beer..." - Me[/small]