WMP version?

[Kira Roark]

How would one check to see if windows media player is installed? and if it is installed then what version? I'd like to prompt the user to install 7.0 if they don't already have it. I've gone thru lots of mp3/media projects on planet-source and haven't found anyone who is checking for media player.

any thoughts?

[Mc Brain]

I'm not sure if this is what you need... but have a look at HKLM\Software\Microsoft\MediaPlayer\PlayerUpgrade and the key is UpgradeVersion

[Mc Brain]

Or HKLM\Software\Microsoft\MediaPlayer\Setup and the key SetupVersion

[Kira Roark]

would this work for win98,win95, win2K...or would I need to check different keys?...I haven't done much with the registrty....going to have to search for code to read.

thanks

[Mc Brain]

I've no idea whether it will work on other systems as well.

[Kira Roark]

thanks McBrain,

This code works on win98 (I'll test the others at on Monday):

Dim WshShell As Object
Set WshShell = CreateObject("WScript.Shell")
 
'WshShell.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Run\runmyprog", "WhateverUwant", "REG_SZ"
Debug.Print WshShell.RegRead("HKLM\Software\Microsoft\MediaPlayer\Setup\SetupVersion")
Set WshShell = Nothing

By the way, is this a good technique for reading registry values?

[Mc Brain]

I don't know... I've never used that way. But, thanks for teaching me that code.

[Mc Brain]

It also works on Win2K. I've just tested it. I got the "6.4" written in the Debug Window, which I suppose has to be the Version of the WMP I've installed.

[Mc Brain]

Yeap.... the about box says 6.4.09.1109

[Kira Roark]

yeah that's what I have, great! This code is so short....I've seen a number of other posts that were much longer. I wonder what the drawback of this method is....maybe it has to do with the shell vs. using a series of APIs?