Partilhar via


Método SWbemPrivilegeSet.AddAsString

Você pode usar o método AddAsString do objeto SWbemPrivilegeSet para adicionar um privilégio a uma coleção SWbemPrivilegeSet usando uma cadeia de caracteres de privilégio. Use este método para adicionar um privilégio ou habilitar um privilégio para objetos SWbemSecurity. Consulte Executar operações privilegiadas usando VBScript.

Para conferir uma explicação dessa sintaxe, consulte Convenções de documentação para API de script.

Sintaxe

objPrivilege = .AddAsString( _
  ByVal strPrivilege, _
  [ ByVal bIsEnabled ] _
)

Parâmetros

strPrivilege

Obrigatórios. Uma das cadeias de caracteres de privilégio. Para obter uma lista completa dessas cadeias de caracteres e as constantes associadas do WMI, consulte Constantes de privilégio. Cada cadeia de caracteres de privilégio representa um privilégio específico. Por exemplo, para adicionar o privilégio que usa para desligar um sistema de computador, use a cadeia de caracteres SeShutdownPrivilege.

bIsEnabled [opcional]

Valor booliano que habilita ou desabilita esse privilégio. O valor padrão é True.

Retornar valor

Se tiver êxito, este método retornará um objeto SWbemPrivilege que representa o novo privilégio. Caso contrário, um objeto nulo será retornado.

Códigos do Erro

Após a conclusão do método AddAsString, o objeto Err pode conter o código de erro na lista a seguir.

wbemErrFailed - 2147749889 (0x80041001)

Erro não especificado.

Exemplos

O exemplo de código VBScript a seguir cria uma nova porta para um servidor de impressão usando Win32_TCPIPPrinterPort. SeLoadDriverPrivilege é necessário para esta operação. Consulte Executar operações privilegiadas.

Set objWMIService = GetObject("Winmgmts:")
objWMIService.Security_.Privileges. _
    AddAsString "SeLoadDriverPrivilege", True
Set objNewPort = objWMIService.Get _
    ("Win32_TCPIPPrinterPort").SpawnInstance_
objNewPort.Name = "IP_111.222.111.11"
objNewPort.Protocol = 1
objNewPort.HostAddress = "111.222.111.11"
objNewPort.PortNumber = "9999"
objNewPort.SNMPEnabled = False
objNewPort.Put_

Um exemplo de código que usa esse método também é descrito no tópico SWbemPrivilegeSet.

Requisitos

Requisito Valor
Cliente mínimo com suporte
Windows Vista
Servidor mínimo com suporte
Windows Server 2008
Cabeçalho
Wbemdisp.h
Biblioteca de tipos
Wbemdisp.tlb
DLL
Wbemdisp.dll
CLSID
CLSID_SWbemPrivilegeSet
IID
IID_ISWbemPrivilegeSet

Confira também

SWbemPrivilegeSet

SWbemPrivilegeSet.Add

SWbemPrivilegeSet.Remove

WbemPrivilegeEnum

Constantes de privilégio

Executar operações privilegiadas

Executar operações privilegiadas usando VBScript