Upperfilters verwijderen voor usb, maar dan geen office 2010

Pagina: 1
Acties:

Acties:
  • 0 Henk 'm!

  • LollieStick
  • Registratie: Juni 2001
  • Laatst online: 03-10 17:14
Geachte medetweakers,

Op mijn werk zijn we bezig een probleem te tackelen met USB Mass storage. Het probleem lijkt te zitten in de Upperfilters in het register (HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E967-E325-11CE-BFC1-08002BE10318}\UpperFilters)

Wanneer we deze key verwijderen kunnen onze users hun eigen USB-stickjes zonder problemen intalleren. Echter, werkt Office 2010 dan niet meer. Deze kan dan de licentie niet valideren (*klik*)

Hiervoor zou deze key juist moeten bestaan maar dan moeten we voor elke gebruiker die een USB-stick bij zich heeft telkens een admin wachtwoord invoeren 8)7

Weet iemand een middenweg zodat zowel Office 2010 gebruikt kan worden en gebruikers gewoon zelf hun USB-sticks kunnen gebruiken?

OS: Windows XP Pro SP3

Acties:
  • 0 Henk 'm!

  • LollieStick
  • Registratie: Juni 2001
  • Laatst online: 03-10 17:14
Klopt... In Vista zal Office dan ook wel werken waarschijnlijk, maar in XP dus niet.

Anyway, we hebben het opgelost. Het probleem is te omzeilen door ipv Class filters, Device Filters te gebruiken. Deze stel je in voor de HDD, maar laat USB drives ongemoeid.

Middels Scriptomatic hebben we een scriptje gemaakt welke het met de 1001 verschillende schijfconfiguraties zou moeten doen:



On Error Resume Next
Dim regClassFilterkey, regDeviceFilterkey , sh Const wbemFlagReturnImmediately = &h10 Const wbemFlagForwardOnly = &h20

regClassFilterkey =
"HKLM\SYSTEM\CurrentControlSet\Control\Class\{4D36E967-E325-11CE-BFC1-08002BE10318}\UpperFilters"
regDeviceFilterkey = "HKLM\SYSTEM\CurrentControlSet\Enum\"
Set sh = WScript.CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:\\localhost\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_DiskDrive", "WQL", _
wbemFlagReturnImmediately +
wbemFlagForwardOnly)

For Each objItem In colItems
If objItem.Name = "\\.\PHYSICALDRIVE0" Then
regDeviceFilterkey = regDeviceFilterkey & objItem.PNPDeviceID & "\UpperFilters"
sh.regwrite regDeviceFilterkey, "PartMgr"
sh.regDelete regClassFilterkey
End if
Next



Vandaag zullen we zien of het allemaal werkt :)

Tnx