Visual Basic - Tec Ing. Sistemas

Necesito codigo de programacción que me permita enviar y recibir información a través del puerto serial (o usb). Además de otros que me permitan acceder a dispositivos conectados a este puerto, tales como PALM. Agradezco su ayuda.

Roque

Información de qué quieres? Puerto serial (RS-232) o USB????

Pues necesito de ambos si es posible, pero me urge lo pertinente al puerto Serial RS-232.

Gracias, y disculpen.

Roque.

no hay nada que disculpar... simplemente pedimos que sean un poco más explícictos con lo que piden... si a ustedes les da fiaca ponerse a escribir qué es lo que necesitan, a nosotros nos da fiaca ponernos a pensar "que carajo quiere este boludo"... pero bueno... más allá de la cagada a pedos...

Para manejar el puerto RS-232 Visual Basic nos provee de un control (sí, ya sé que no es looooooo mejor, pero bueh, por lo menos para empezar sirve) que se llama MSCOMM. Lo agregas desde Proyecto/Componentes.../Microsoft Comm Control 6.0.

donde las propiedades más importantes son:

CommPort -> Es el número de puerto com

Settings -> especifica la velocidad, paridad, bits de datos, bit de parada
Ejemplo: MSComm1.Settings = "9600,n,8,1"

InputLen -> que especifica cuántos caracteres vas a querer leer cuando le digas "lee el puerto", yo por lo general uso el valor 1
Ejemplo: MSCOmm1.InputLen=1

PortOpen-> es un boolean con el cual estableces si quieres abrir (true) o cerrar (false) el puerto

Para enviar un dato al puerto simplemente haces:

dim dato as string

dato = "Hola"

MSCOmm1.Output = dato

y listo... ya te lo mandó por el puerto serie

para leer un dato haces esto (siempre y cuando tengas inputlen en 1):

dim caracter as string

Do while inbuffercount >0
caracter = MSCOMM1.Input
if caracter = "lo que yo quiero" then
exit do
endif
loop


cualquier cosa avisame y te mando un ejemplo!!!

PD: si averiguás lo del USB, AVISAMEEEE (yo también lo necesito)

saludos!!!!