Visual Basic - objeto printer

Life is soft - evento anual de software empresarial
 
Vista:

objeto printer

Publicado por albe (6 intervenciones) el 28/12/2003 07:17:58
Hola a todos.
Tengo una preguntilla.... ¿Cómo se puede seleccionar la impresora con el objeto printer?
Gracias.
Estoy hablando de que tengo mas de una impresora instaladas.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:objeto printer

Publicado por Cecilia Colalongo (3116 intervenciones) el 28/12/2003 13:39:10
Lo puedes hacer con la colección Printers, en http://msdn.microsoft.com/library/en-us/vb98/html/vbobjPrinter.asp tienes la forma de enumerarlas y selecionar la que quieras.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:objeto printer

Publicado por Francisco (65 intervenciones) el 29/12/2003 15:18:01
Hola:
Me hice esta funcioncilla (la mayoría es ayuda de visual, debo reconocerlo) y me funciona muy bien.

Private Function EstablecePrinter(NomPrter As String) As Boolean
Dim X As Printer
EstablecePrinter = False 'Opción por defecto.
For Each X In Printers
If InStr(UCase(X.DeviceName), NomPrter) Then
' Establece la impresora como predeterminada.
Set Printer = X
EstablecePrinter = True
' Termina la búsqueda.
Exit For
End If
Next

End Function

La uso así:
if estableceprinter("facturas") then
'Existe la impresora que contiene la cadena "facturas" en
su nombre, y queda establecida.
else
'El proceso falló porque la impresora no existe
end if


Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar