Método IShellDispatch4.ExplorerPolicy
Obtém o valor de uma política de Explorer da Internet do Windows especificada.
Sintaxe
retVal = IShellDispatch4.ExplorerPolicy(
bstrPolicyName
)
IShellDispatch4.ExplorerPolicy( _
ByVal bstrPolicyName As BSTR _
) As Variant
Parâmetros
-
bstrPolicyName [in]
-
Tipo: BSTR
Uma Cadeia de Caracteres que especifica o nome da política.
Valor retornado
JScript
Tipo: Variant*
O valor associado ao nome da política especificado.
VB
Tipo: Variant*
O valor associado ao nome da política especificado.
Comentários
Os administradores de rede podem controlar e gerenciar o ambiente de computação de seus usuários definindo políticas.
O nome do valor especificado deve estar na subchave HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer. Se o nome do valor não existir, o método retornará nulo.
Exemplos
Os exemplos a seguir mostram o uso adequado de ExplorerPolicy para JScript, VBScript e 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
Requisitos
Requisito | Valor |
---|---|
Cliente mínimo com suporte |
Windows XP [somente aplicativos da área de trabalho] |
Servidor mínimo com suporte |
Windows Server 2003 [somente aplicativos da área de trabalho] |
Cabeçalho |
|
IDL |
|
DLL |
|