' Set whether the IE Save As menu item is enabled' Note: requires the SetRegistryValue, CheckRegistryKey and CreateRegistryKey ' routines, you can find them in the CodeBank' Example:' SetIEsaveAsEnabled FalsePublic Sub SetIEsaveAsEnabled(ByVal bEnabled As Boolean) Const HKEY_CURRENT_USER = &H80000001 Dim sKey As String sKey = "SoftwarePoliciesMicrosoftInternet ExplorerRestrictions" ' if the Key does not exist If CheckRegistryKey(HKEY_CURRENT_USER, sKey) = False Then ' create the key CreateRegistryKey HKEY_CURRENT_USER, sKey End If ' set the value SetRegistryValue HKEY_CURRENT_USER, sKey, "NoBrowserSaveAs", _ Abs(Not bEnabled) End Sub