Add an embedded video or sound on a slide

[Jerome Bellanger]

I would like to dynamically add a sound or video on a ppt slide.
The method Shapes.AddMediaObject is not interesting for me because it
links the file and I want it embedded.
The method Shapes.AddOLEObject can insert an embedded video but if we
insert an MPEG movie for example, it doesn't show the player but just
the name of the file.

An alternative is to force to display the Media Player control with
ClassName="MPlayer":
curSlide.Shapes.AddOLEObject(Link:=msoFalse, ClassName="MPlayer")

But it's not possible to specify both the ClassName and the Filename,
so I don't know how to dynamically specify the sound or video file.

Any idea would be greatly appreciated,
Thanks,
Jerome Bellanger.