Sep 05

I never could find a good script to check to see if a Macromedia Contribute key had been installed for a user on a machine, and if not then to run the key. So I made one. This one is for Contribute 2, but I think it will work with 3 (if you change the Site folder to 3). And it assumes that the user will only be running one Site. I make the Contribute Icon/Shortcut point to this script.

You will need to change “h:\” to the location of your key. You will need to save the following script as a .vbs

Set objFSO = CreateObject(“Scripting.FileSystemObject”)
Set objNetwork = WScript.CreateObject(“WScript.Network”)
strUserName = objNetwork.UserName
If objFSO.FileExists(“C:\Documents and Settings\” & strUserName & “\Local Settings\Application Data\Macromedia\Contribute 2\Sites\Site1\_mm\contribute.xml”) Then
Set wshShell = WScript.CreateObject (“”) “””C:\Program Files\Macromedia\Contribute 2\Contribute.exe”””, 6, True
set wshshell = nothing
Wscript.Echo “Your Contribute Key needs to be installed on this computer. Click OK to begin.”
Set wshShell = WScript.CreateObject (“”) “h:\”, 6, True
set wshshell = nothing
End If