Метод Shell.IsRestricted

Извлекает параметр ограничения группы из реестра.

Синтаксис

iRetVal = Shell.IsRestricted(
  sGroup,
  sRestriction
)

Shell.IsRestricted( _
  ByVal sGroup As BSTR, _
  ByVal sRestriction As BSTR _
) As Integer

Параметры

sGroup [in]

Тип: BSTR

Строка, содержащая имя группы. Это значение является именем подраздела реестра, в котором проверка ограничения.

sRestriction [in]

Тип: BSTR

Строка, содержащая ограничение, значение которого требуется извлечь.

Возвращаемое значение

Язык JScript

Тип: Целое число*

Значение ограничения. Если указанное ограничение не найдено, возвращаемое значение равно 0.

VB

Тип: Целое число*

Значение ограничения. Если указанное ограничение не найдено, возвращаемое значение равно 0.

Комментарии

IsRestricted сначала ищет имя подраздела, соответствующее sGroup , под следующим ключом.

HKEY_LOCAL_MACHINE
   Software
      Microsoft
         Windows
            CurrentVersion
               Policies

Ограничения объявляются как значения отдельных подразделов политики. Если ограничение с именем в sRestriction найдено в подразделе sGroup, IsRestricted возвращает текущее значение ограничения. Если ограничение не найдено в разделе HKEY_LOCAL_MACHINE, в разделе HKEY_CURRENT_USER проверяется тот же подраздел.

В настоящее время этот метод недоступен в Microsoft Visual Basic.

Примеры

В следующих примерах показано использование IsRestricted для получения значения данных ограничения undockwithoutlogon из подраздела System . Использование отображается для JScript и VBScript.

Jscript:

<script language="JScript">
    function fnIsRestricedJ()
    {
        var objShell = new ActiveXObject("shell.application");
        var lReturn;
        
        lReturn = objShell.IsRestricted("system", "undockwithoutlogon");
        document.write(lReturn);
    }
</script>

Vbscript:

<script language="VBScript">
    function fnIsRestricedVB()
        dim objShell
        dim lReturn

        set objShell = CreateObject("shell.application")

        lReturn = objShell.IsRestricted("system", "undockwithoutlogon")
        document.write(lReturn)

        set objShell = nothing
    end function
</script>

Требования

Требование	Значение
Минимальная версия клиента	Windows 2000 Professional, Windows XP [только классические приложения]
Минимальная версия сервера	Windows Server 2003 [только классические приложения]
Заголовок	Shldisp.h
IDL	Shldisp.idl
DLL	Shell32.dll (версия 5.0 или более поздняя)