I'm making an app that lives on a CD that opens wmv's from the CD. I
thought everything was going well until I realized that if wmplayer
isn't the default player the thing crashes. I have no idea why this is
(I'm a Web dev and I'm totally out of my league here). Anyway, I'm
trying to get around this by forcing wmplayer to open. Here's my code:

Sub OpenFile (theFile)
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "assets\" & theFile
'            objShell.Run "wmplayer.exe D:assets\TheFile.wmv"
End Sub

This works: objShell.Run "assets\" & theFile

And if I hard code a file reference it works:
objShell.Run "wmplayer.exe D:assets\TheFile.wmv"

I'm essentially trying to fuse those two lines of code - open 'theFile'
in the assets directory via a relative path (not absolute) in wmplayer.
I've tried so many ways to get this going but can't seem to find the one
that works.

Will someone show me how this is done?

--
cdubone