Comunicación por infrarrojos en VB .Net 2003

27/11/2003 - 21:01 por AOG | Informe spam
Hola Grupo!
He hecho un proyecto en VB .net 2003 para Pocket PC, tengo
que imprimir un ticket desde mi aplicacíon (Pocket) a una
impresora portatil (HP 450) mediate infrarrojos he mirado
en la ayuda me he encontrado un una serie de objetos que
hace posible comunicarse 2 dispositivos mediante
infrarrojos (IrDAClient, IrDAEndPoint...) incluso viene un
ejemplo "Tres en rraya".
He copiado un trozo de codigo, pero no consigo conectar
con la impresora, vamos, no se como, esto es lo que he
copiado:
Dim ServiceName as String = "PRINTER"
Dim client As IrDAClient = Nothing
Dim CurrentTries As Integer = 0

Do
Try
client = New IrDAClient(ServiceName)
Catch se As SocketException
If (CurrentTries >= NumRetries) Then
Throw se
End If
End Try
CurrentTries = CurrentTries + 1

Loop While client Is Nothing And CurrentTries <
NumRetries


pero el resultado es un error:
"System.Net.Sockets.SocketException:No se estableció
ninguna conexión porque el equipo de destino la rechazó"

.. veo que actua porque se enciende el Led de la impresora
paro al rato me da el error, supongo que el nombre del
servicio (ServiceName) no es el correcto, pero no se cual
es, ni como averiguarlo.

No se si estoy encaminado o hay otra forma mas facil para
poder imprimir algo, aunque se una simple frase.

Agradecería ayuda por vuestra parte, ya que estoy mareado,
buscando en todas las partes información para poder
imprimir mediante VB net 2003 desde un Pocket a una
impresora portatil. Tabien cabe la posibilidad de imprimir
mediante bluetooth

Gracias:
Antonio
kqanto@teleline.es
 

Leer las respuestas

#1 Darwin Alvarado
02/12/2003 - 19:48 | Informe spam
El conector infrarojo tiene un archivo incorporado
(ActiveX) sólo tienes que añadirlo a tu aplicación
en Visual Basic y revisar las propiedades que tiene.
Luego direccionar todo lo que deseas imprimir
a este objeto, el mismo que debe estar en el formulario
principal de la aplicación.

Atentamente
Darwin Alvarado

Ecuador.


Hola Grupo!
He hecho un proyecto en VB .net 2003 para Pocket PC,


tengo
que imprimir un ticket desde mi aplicacíon (Pocket) a una
impresora portatil (HP 450) mediate infrarrojos he mirado
en la ayuda me he encontrado un una serie de objetos que
hace posible comunicarse 2 dispositivos mediante
infrarrojos (IrDAClient, IrDAEndPoint...) incluso viene


un
ejemplo "Tres en rraya".
He copiado un trozo de codigo, pero no consigo conectar
con la impresora, vamos, no se como, esto es lo que he
copiado:
Dim ServiceName as String = "PRINTER"
Dim client As IrDAClient = Nothing
Dim CurrentTries As Integer = 0

Do
Try
client = New IrDAClient(ServiceName)
Catch se As SocketException
If (CurrentTries >= NumRetries) Then
Throw se
End If
End Try
CurrentTries = CurrentTries + 1

Loop While client Is Nothing And CurrentTries <
NumRetries


pero el resultado es un error:
"System.Net.Sockets.SocketException:No se estableció
ninguna conexión porque el equipo de destino la rechazó"

... veo que actua porque se enciende el Led de la


impresora
paro al rato me da el error, supongo que el nombre del
servicio (ServiceName) no es el correcto, pero no se cual
es, ni como averiguarlo.

No se si estoy encaminado o hay otra forma mas facil para
poder imprimir algo, aunque se una simple frase.

Agradecería ayuda por vuestra parte, ya que estoy


mareado,
buscando en todas las partes información para poder
imprimir mediante VB net 2003 desde un Pocket a una
impresora portatil. Tabien cabe la posibilidad de


imprimir
mediante bluetooth

Gracias:
Antonio

.

Preguntas similares