AlwaysReclaimAssocations and Quicktime
Change MIME types in the registry like this for example:
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\MIME\Database\Content Type\audio/mpeg]
"Extension"=".mp3"
"CLSID"="{cd3afa76-b84f-48f0-9393-7edc34128127}"
You visit a site serving up a mime type like this: http://www.yolinux.com/MIME-EXAMPLES/SnowboardJump-DSC_0350.mov
You will get a dialog that says this: Some of the MIME types previously associated with the Quicktime Plugin are currently associated with other applications. Should I restore these MIME type associations to QuickTime?
If you check the box to leave you alone, it writes this entry and you won't see it again:
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\InternetRegistry\REGISTRY\USER\S-1-5-21-3619046908-4072206937-1722288935-1001\Software\Apple Computer, Inc.\QuickTime\ActiveX]
"AlwaysReclaimAssocations"=dword:00000002
Here is the problem. Considering this entry contains a SID, i'm not sure how to get it to duplicate to all users when deploying QuickTime. If it was a generic entry I could throw it the default profile, or sneak it into the MSI.
Any ideas?
Answers (2)
Thanks. Sloppy editing that script and throwing it into RunOnce did the trick.
Dim objNetwork : Set objNetwork = CreateObject("WScript.Network")
Dim wmiQuery : wmiQuery = "Select * From Win32_UserAccount Where Domain='" & objNetwork.UserDomain & _
"' And Name='" & objNetwork.UserName & "'"
Dim objWMIService : Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Dim colItems : Set colItems = objWMIService.ExecQuery(wmiQuery)
Dim sid
Dim objItem
For Each objItem in colItems
sid = objItem.SID
Next
Const HKEY_LOCAL_MACHINE = &H80000002
Const HKEY_CURRENT_USER = &H80000001
strComputer = "."
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _
strComputer & "\root\default:StdRegProv")
strKeyPath = "Software\Microsoft\Internet Explorer\InternetRegistry\REGISTRY\USER\"+sid+"\Software\Apple Computer, Inc.\QuickTime\ActiveX"
strDWORDValueName = "AlwaysReclaimAssocations"
strValue = "00000002"
oReg.CreateKey HKEY_CURRENT_USER,strKeyPath
oReg.SetDWORDValue HKEY_CURRENT_USER,strKeyPath,strDWORDValueName,strValue
you could create a vb script to do this. have it read the current users SID and then create the registry string to replace thru it. See link below and look at Peter's second post
http://social.technet.microsoft.com/Forums/en-US/ITCG/thread/eb40f288-ac10-4ead-b408-6eb0690fe119/