WinBatch Tech Support Home

Database Search

If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.

TechHome

Shell
plus

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

Accessing Recorded TV Metadata

 Keywords: Recorded TV Metadata System.RecordedTV Shell.Application 

Reference: Shell Properties
;Accessing Recorded TV metadata
directory = 'D:\Recorded TV\'
If DirExist(directory)
   objShell = CreateObject("Shell.Application")
   objFolder = objShell.Namespace(directory)

   For i = 0 To objFolder.Items().Count
        objItem = objFolder.Items().Item(i)
        If objItem == 0 Then Continue
        path = objItem.path
        title = objItem.ExtendedProperty("System.title")
        subtitle = objItem.ExtendedProperty("System.Media.SubTitle")
        episodename = objItem.ExtendedProperty("System.RecordedTV.EpisodeName")
        stationname = objItem.ExtendedProperty("System.RecordedTV.StationName")
        recordingtime = objItem.ExtendedProperty("System.RecordedTV.RecordingTime")
        description = objItem.ExtendedProperty("System.RecordedTV.Description")
        Pause('Details:', path:@CR:title:@CR:subtitle:@CR:episodename:@CR:stationname:@CR:recordingtime:@CR:description)
   Next
   objFolder = 0
   objShell = 0
EndIf
Exit

Article ID:   W18183
Filename:   Accessing Recorded TV Metadata.txt
File Created: 2009:08:24:12:12:06
Last Updated: 2009:08:24:12:12:06