IWMEncEditDecisionData.Value

Windows Media Encoder SDK banner art

The Value property retrieves a specific attribute value from an EDL entry.

Syntax

Variant = IWMEncEditDecisionData.Value(strName)

Parameters

strName

[in]  String containing the attribute name.

Property Value

A Variant containing the attribute value.

Remarks

This property is read-only.

To control digital devices programmatically, you must add the Windows Media Encoder Device Control reference to the project. For more information, see Programming in Visual Basic.

Example Code

' Create a WMEncoder object.
  Dim Encoder As WMEncoder
  Set Encoder = New WMEncoder

' Add the device as the audio source and the video source.
  Dim SrcGrpColl As IWMEncSourceGroupCollection
  Dim SrcGrp As IWMEncSourceGroup2
  Dim SrcAud As IWMEncSource
  Dim SrcVid As IWMEncVideoSource
  Set SrcGrpColl = Encoder.SourceGroupCollection
  Set SrcGrp = SrcGrpColl.Add("SG_1")
  Set SrcAud = SrcGrp.AddSource(WMENC_AUDIO)
  Set SrcVid = SrcGrp.AddSource(WMENC_VIDEO)
  ' Replace the following name with the name of your device.
  SrcAud.SetInput ("Device://Device resource name")
  SrcVid.SetInput ("Device://Device resource name")

' Configure the output and profile.

' Retrieve the device control collection, then add a device to it.
  Dim DCColl As IWMEncDeviceControlCollection
  Set DCColl = SrcGrp.DeviceControlCollection
  Dim DControl As IWMEncDeviceControl
  Set DControl = DCColl.Add
  ' Replace the following name with the name of your device.
  DControl.SetInput ("DeviceControl://Device resource name")

' Initialize the encoding session.
  Encoder.PrepareToEncode True

' Get the plug-in from the device.
  Dim DCPlugin As IWMEncDeviceControlPlugin
  Set DCPlugin = DControl.GetDeviceControlPlugin

' Retrieve a WMEncEditDecisionList object from the device
' control plug-in.
  Dim EDList As WMEncEditDecisionList
  Set EDList = DCPlugin.EditDecisionList

' Create an EDL entry.
  Dim EDData As IWMEncEditDecisionData
  Set EDData = EDList.Add

' Add attributes to the EDL entry specifying mark-in, mark-out,
' tape ID, and description information.
  EDData.Add "MarkIn", 262695
  EDData.Add "MarkOut", 267268
  EDData.Add "TapeID", "A"
  EDData.Add "Description", "Scene 1"

' Retrieve the value for the TapeID attribute.
  MsgBox EDData.Value("TapeiD")

Requirements

Reference: Windows Media Encoder

Library: wmenc.exe

See Also