comunicación por infrarrojos en VB Net 2003

27/11/2003 - 20:59 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 Ronald Armas
01/12/2003 - 04:42 | Informe spam
Te recomiendo que mejor utilices el HP Printing SDK esto instalara un Add-In
al Visual Studio .Net y podras incorporar funcionalidad de impresion a tu
proyecto con la opcion de escoger al momento de imprimir el medio de
transmision de datos (IrDA, BlueTooth, Ethernet).

saludos
Ronald Armas
Microsoft .Net MVP - MCSD

"AOG" escribió en el mensaje
news:014501c3b520$ff758a60$
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