well it didn't work on my PC at work. I tried it first in Opera, which I'm sure is the reason it didn't work the first time

So I tried it in IE 5 on a 2k machine and it didn't work there either. Perhaps it needs IE 6 to pull this stunt off? I'm no programmer so I don't have a clue what's needed for this to work correctly.
Looking at the code... it looks like you need windows media player installed.
If I remember correctly... on 2k, you have to download that. Or at least a newer version.

I linked a couple of people to that. It worked on some, but not on all.

Set oWMP = CreateObject("WMPlayer.OCX.7" )

Creates an object of windows media player