IShellDispatch4.ExplorerPolicy 方法

获取指定 Windows Internet Explorer 策略的值。

语法

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\策略\资源管理器 子项内。 如果值名称不存在，则该方法返回 null。

示例

以下示例演示了如何正确使用适用于 JScript、VBScript 和 Visual Basic 的 ExplorerPolicy 。

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 [仅限桌面应用]
标头	Shldisp.h
IDL	Shldisp.idl
DLL	Shell32.dll (6.0 或更高版本)