Метод IShellDispatch4.ExplorerPolicy
Возвращает значение для указанной политики Windows Internet Обозреватель.
Синтаксис
retVal = IShellDispatch4.ExplorerPolicy(
bstrPolicyName
)
IShellDispatch4.ExplorerPolicy( _
ByVal bstrPolicyName As BSTR _
) As Variant
Параметры
-
bstrPolicyName [in]
-
Тип: BSTR
Строка, указывающая имя политики.
Возвращаемое значение
Язык JScript
Тип: Variant*
Значение, связанное с указанным именем политики.
VB
Тип: Variant*
Значение, связанное с указанным именем политики.
Комментарии
Администраторы сети могут управлять вычислительной средой своих пользователей, задавая политики.
Указанное имя значения должно находиться в подразделе HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Обозреватель. Если имя значения не существует, метод возвращает значение NULL.
Примеры
В следующих примерах показано правильное использование ExplorerPolicy для JScript, VBScript и Visual Basic.
Jscript:
<script language="JScript">
function fnIShellDispatch4ExplorerPolicyJ()
{
var objShell = new ActiveXObject("shell.application");
var vReturn;
vReturn = objshell.ExplorerPolicy("ValueName");
alert(vReturn);
}
</script>
Vbscript:
<script language="VBScript">
function fnIShellDispatch4ExplorerPolicyVB()
dim objShell
dim vReturn
set objShell = CreateObject("shell.application")
vReturn = objshell.ExplorerPolicy("ValueName")
alert(vReturn)
set objShell = nothing
end function
</script>
Visual Basic:
Private Sub fnIShellDispatch4ExplorerPolicyVB()
Dim objShell As Shell
Dim vReturn As Variant
Set objShell = New Shell
vReturn = objshell.ExplorerPolicy("ValueName")
Debug.Print vReturn
Set objShell = Nothing
End Sub
Требования
Требование | Значение |
---|---|
Минимальная версия клиента |
Windows XP [только классические приложения] |
Минимальная версия сервера |
Windows Server 2003 [только классические приложения] |
Заголовок |
|
IDL |
|
DLL |
|