SELECCION DE IMPRERORA CON VB
Carlos Alberto Juarez
27 de Noviembre del 2003
Saludos cordiales,
estoy realizando una aplicacion en VB. y tengo problemas en la forma de seleccion de una impresora en red. El codigo me funciona para una local, y si esta seleccionada desde el SO:
For Each ImpresoraCocina In Printers
If ImpresoraCocina.DeviceName = "Cocina" Then
Set Printer = ImpresoraCocina
RepComandaBar.PrintReport
DataEnvComandas.rsconBar.Close
Exit For
End If
Next
ella hace la seleccion peroimprime en la que esta definia por defecto en el SO.
quiero que imprima en la que se seleccione por codigo
gracias
estoy realizando una aplicacion en VB. y tengo problemas en la forma de seleccion de una impresora en red. El codigo me funciona para una local, y si esta seleccionada desde el SO:
For Each ImpresoraCocina In Printers
If ImpresoraCocina.DeviceName = "Cocina" Then
Set Printer = ImpresoraCocina
RepComandaBar.PrintReport
DataEnvComandas.rsconBar.Close
Exit For
End If
Next
ella hace la seleccion peroimprime en la que esta definia por defecto en el SO.
quiero que imprima en la que se seleccione por codigo
gracias
sdemingo
27 de Noviembre del 2003
Hola,
prueba con esto
Dim impresoraPorDefecto As String
For Each ImpresoraCocina In Printers
If ImpresoraCocina.DeviceName = "Cocina" Then
impresoraPorDefecto = ActivePrinter
ActivePrinter = ImpresoraCocina
Set Printer = ImpresoraCocina
RepComandaBar.PrintReport
DataEnvComandas.rsconBar.Close
' Y después de imprimir, vuelves a poner por defecto la que estaba
ActivePrinter = impresoraPorDefecto
Exit For
End If
Next
prueba con esto
Dim impresoraPorDefecto As String
For Each ImpresoraCocina In Printers
If ImpresoraCocina.DeviceName = "Cocina" Then
impresoraPorDefecto = ActivePrinter
ActivePrinter = ImpresoraCocina
Set Printer = ImpresoraCocina
RepComandaBar.PrintReport
DataEnvComandas.rsconBar.Close
' Y después de imprimir, vuelves a poner por defecto la que estaba
ActivePrinter = impresoraPorDefecto
Exit For
End If
Next
Carlos Alberto Juarez
27 de Noviembre del 2003
Muchas gracias por su ayuda, se lo agradezco, pero ActivePrinter, no es una propiedad del PRINTER podria especificarme mejor su idea por favor
sdemingo
27 de Noviembre del 2003
ActivePrinter no es una propiedad de printer, es la impresora por defecto del S.O.
Por eso si la cambias y le dices que la impresora por defecto del S.O sea la tuya....... Debería funcionar.
Lo que no se es si debería estar detectada por lo menos por windows....
Por eso si la cambias y le dices que la impresora por defecto del S.O sea la tuya....... Debería funcionar.
Lo que no se es si debería estar detectada por lo menos por windows....
Carlos Alberto Juarez
27 de Noviembre del 2003
De la forma en que me esta planteando la solucion si se hace, pero lo que yo quiero es que selccione la que le envio a cargar poruqe de la terminal saldran dos ordenes de impresion a imprimirse, vlaga la redundancia a dos impresoras diferente en dos lugares diferentes dentro de la misma red.
Entonces, mi pregunta será puede VB, configurar una impresora que esta en red, por codigo, o siempre tengo que depender de la caja de dialogo?? para poder predefinir la impresora que esta en red????
Gracias!
Entonces, mi pregunta será puede VB, configurar una impresora que esta en red, por codigo, o siempre tengo que depender de la caja de dialogo?? para poder predefinir la impresora que esta en red????
Gracias!