Ir para conteúdo
Fórum Script Brasil
  • 0

escolher impressora


Marcelo VB

Pergunta

Olá todos,

através do cutepdf eu estou criando relatórios que serão abertos para visualização no pdf.

O problema é que eu tenho que selecionar a impressora do cutepdf para isso e ela não ficará como impressora padrão no windows.

Usando o printer há como eu selecionar a impressora no qual quero imprimir?

Abc e obg a todos

Link para o comentário
Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

  • 0

acho q tipo isso.

Dim p As Printer

Set p = Printers(x)[/code]

onde x é indice da sua impressora, acho q de acordo com a ordem em q foram instaladas no so. ai você imprime a partir do objeto p.

se você não sabe o indice da sua impressora do cutepdf, faca um for de 0 ate Printers.Count e pegue o DeviceName de todos os indices e veja qual o indice q tem o nome da impressora q você quer.

Link para o comentário
Compartilhar em outros sites

  • 0

fala kuroi,

agradeço novamente a atenção e a ajuda.

Através dessa rotina sugerida por você descobri o indice da impressora : 6

Dim i As Integer

For i = 0 To Printers.Count - 1

If Printers(i).DeviceName = "CutePDF Writer" Then

impressora = Printers.Count

End If

next

Agora usando o Set p = Printers(6) dá o seguinte erro:

run-time error 9

subscript out of range

Abc

Link para o comentário
Compartilhar em outros sites

  • 0

certo. agora ele diz que a impressora é a 4 só que continua imprimindo pela padrão.

acredito que isso acorra porque eu não estou imprimindo pelo P como você sugeriu. Estou usando printer.print ""

pediria agora para você me ensinar a imprimir pelo p

grato novamente

abc

resolvido coloquei:

Set Printer = Printers(impressora)

abc e obg

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...