Probá una cosa por el estilo a ver si te anda:

Dim p As Printer
For Each p In Printers
    If p.DeviceName = "quiero esta impresora" Then
        Set Printer = p
        Exit For
    End If
Next


----- Original Message ----
From: Jesús dos Santos <[EMAIL PROTECTED]>
To: vbusers List Member <[email protected]>
Sent: Tuesday, September 25, 2007 10:44:01 AM
Subject: [vbusers] Objeto Printer




 
 

 


<!--

_filtered {margin:70.85pt 3.0cm 70.85pt 3.0cm;}
_filtered {font-family:Tahoma;panose-1:2 11 6 4 3 5 4 4 2 4;}
_filtered {font-family:Verdana;panose-1:2 11 6 4 3 5 4 4 2 4;}
_filtered {margin:70.85pt 3.0cm 70.85pt 3.0cm;}

 _filtered {font-family:Tahoma;panose-1:2 11 6 4 3 5 4 4 2 4;}
 _filtered {font-family:Verdana;panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;margin-bottom:.0001pt;font-size:12.0pt;font-family:"Times 
New Roman";}
a:link, span.MsoHyperlink
        {color:blue;text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {color:purple;text-decoration:underline;}
span.estilocorreo17
        {font-family:Arial;color:windowtext;}
span.estilocorreo18
        {font-family:Arial;color:navy;}
span.EstiloCorreo19
        {font-family:Arial;color:navy;}
 _filtered {margin:70.85pt 3.0cm 70.85pt 3.0cm;}
div.Section1
        {}
-->






Es así:
 

Dialogo.showprinter
 

(ahí se elije la impresora para el
formulario, por ejemplo una laser hp)
 

Printer.print “imprimo todo lo del
formulario”
 

Printer.enddoc
 

  
 

Dialogo.showprinter
 

 (ahí elijo otra impresora, por ejemplo,
dymo label writer)
 

Printer.print  “imprimo una etiqueta”
 

Printeir.enddoc
 

  
 

Pero esta etiqueta me imprimie en la
primer impresora, o sea la hp, no me toma en cuenta la segunda selección.
 

  
 










De:
 [email protected] [mailto: [email protected] ]
En nombre de Sebastian Ariel
Gambolati

Enviado el: lunes, 24 de
septiembre de 2007 23:07

Para: vbusers List Member

Asunto: [vbusers] Objeto Printer
 




  
 



Si no estoy equivocado, el Common Dialog de impresoras te
deja seleccionado en el objeto printer la impresora elegida. Podras mandar un
poco de codigo para poder ayudarte mejor?
 



 
 




Sebastian
Gambolati
 



  
 



----- Mensaje original
----

De: Jesús dos Santos 
<[EMAIL PROTECTED]>

Para: vbusers List Member < [email protected] >

Enviado: lunes 24 de septiembre de 2007, 21:16:09

Asunto: [vbusers] Objeto Printer
 



El tema es asi, imprimo un listado en una
impresora, la cual es elegida por el usuario con un commond dialog, luego tiene
que emitir una etiqueta en otra impresora, que tambien elije en el commond
dialogo, y en ese momento, la segunda selección la ignora
 

 
 










De:
 [email protected] [mailto: [email protected] ]
En nombre de Sebastian Ariel
Gambolati

Enviado el: lunes, 24 de
septiembre de 2007 21:06

Para: vbusers List Member

Asunto: [vbusers] Objeto Printer
 




 
 



Como seleccionas la segunda impresora? No entendi muy bien
que es lo que pasa. Imprime algunas paginas en la impresora seleccionada y
despues imprime en la por default?
 



 
 




Sebastian
Gambolati
 



 
 



----- Mensaje original
----

De: Jesús dos Santos 
<[EMAIL PROTECTED]>

Para: vbusers List Member < [email protected] >

Enviado: lunes 24 de septiembre de 2007, 19:25:59

Asunto: [vbusers] Objeto Printer
 



Lista, tengo el siguiente problema, estoy trabajando con vb6
y quiero imprimir, mediante el método printer, en 2 impresoras distintas, pero
cuando elijo la segunda, no me da corte y me sigue imprimiendo en
 la primera. Alguien 
tiene alguna idea de cómo solucionar esto?
 

Muchas gracias desde ya.
 

 
 







 
 







 
 










Los referentes más importantes en compra/venta de autos se
juntaron:

Demotores y Yahoo!. Ahora comprar o vender tu auto es más fácil. 

Visitá http://ar.autos.yahoo.com/



__________ Información de NOD32, revisión 2545 (20070923) __________



Este mensaje ha sido analizado con NOD32 antivirus system

http://www.nod32.com
 







  
 







  
 










El Mundial de Rugby 2007

Las últimas noticias en Yahoo! Deportes:

http://ar.sports.yahoo.com/mundialderugby



__________ Información de NOD32, revisión 2545 (20070923) __________



Este mensaje ha sido analizado con NOD32 antivirus system

http://www.nod32.com
 










      
____________________________________________________________________________________
Luggage? GPS? Comic books? 
Check out fitting gifts for grads at Yahoo! Search
http://search.yahoo.com/search?fr=oni_on_mail&p=graduation+gifts&cs=bz

Responder a