Método Shell.FindPrinter

Exibe a caixa de diálogo Localizar Impressora .

Sintaxe

iRetVal = Shell.FindPrinter(
  [ sName ],
  [ sLocation ],
  [ sModel ]
)

Shell.FindPrinter( _
  [ ByVal sName As BSTR ], _
  [ ByVal sLocation As BSTR ], _
  [ ByVal sModel As BSTR ] _
) As Integer

Parâmetros

sName [in, opcional]

Tipo: BSTR

Uma Cadeia de Caracteres que contém o nome da impressora.

sLocation [in, opcional]

Tipo: BSTR

Uma Cadeia de Caracteres que contém o local da impressora.

sModel [in, opcional]

Tipo: BSTR

Uma Cadeia de Caracteres que contém o modelo de impressora.

Comentários

Se você atribuir cadeias de caracteres a um ou mais dos parâmetros opcionais, elas serão exibidas como valores padrão no controle de edição associado quando a caixa de diálogo Localizar Impressora for exibida. O usuário pode aceitar ou substituir esses valores. Se nenhum valor for atribuído a um parâmetro, a caixa de edição associada estará vazia e o usuário deverá inserir um valor.

Esse método não está disponível no momento no Microsoft Visual Basic.

Exemplos

Os exemplos a seguir mostram o uso do FindPrinter para exibir a caixa de diálogo Localizar Impressora para um aplicativo específico. O uso é mostrado para JScript, VBScript e Visual Basic.

Jscript:

<script language="JScript">
    function fnFindPrinterJ()
    {
        var objShell = new ActiveXObject("shell.application");
        
        objShell.FindPrinter();
    }
</script>

Vbscript:

<script language="VBScript">
    function fnFindPrinterVB()
        dim objShell
        dim bReturn

        set objShell = CreateObject("shell.application")
        objShell.FindPrinter()

        set objShell = nothing
    end function
</script>

Requisitos