Transmitir archivos en MSComm

[asbraha]

Hola a todos:

Pues con una duda bien grande, no se si alguien de ustedes me pueda ayudar, necesito transmitir datos por el puerto serial, pero necesito enviar archivos digamos un *.rar o algo asi, para esto he probado el MSComm y solo he podido enviar texto. ¿Podrian orientarme en este problema? Gracias por su tiempo

[David]

¿No funciona abriendo el *.rar y enviando todo su contenido?

[asbraha]

Pues si, lo estuve intentando la pasada tarde y ahora el problema esta ahi, al momento de querer abrir y enviar el archivo completo, busco acceder a el con un CommonDialog

Código:

cmnOpen.ShowOpen
txtEnviar = cmnOpen.FileName

lo que no se es como enviarlo o como hacer uso de el, asi que utilizo una variable tipo Variant que es Dato Enviar

Código:

DatoEnviar = cmnOpen.Object
MSCommSerial.Output = DatoEnviar

Pero me da "runtime error 394" y "property is write only" he intentado otras propiedades del common pero nada y la referencia que he encontrado solo dice como acceder a los diferentes dialogos, tambien se que es muy probable que ande bastante perdido y espero puedan ayudarme gracias

[David]

Bueno, primero debes descargar el contenido del archivo en una variable:

Código PHP:

  Dim FileData As String
Close
Open cmnDialog.FileName For Binary As #1
FileData = Input(LOF(1), 1)
Close  
   

Luego, envías el contenido de la variable FileData y listo.

[asbraha]

Muchisimas gracias David ya pude enviarlo :), pero ahora tengo otra duda, como hago para transformarlo en el proceso inverso, es decir, recibo una cadena de texto y quiero el binario, espero puedas ayudarme, de todos modos seguire investigando y si lo encuentro antes te aviso, y de verdad mil gracias

[David]

No entendí, ¿qué quieres decir con quiero el binario?.

Si recibes el archivo tal cual era, puedes escribirlo en un archivo.

Código PHP:

  Close
Open "C:\archivo.txt" For Output As #1
Print #1, Datos_del_Archivo;
Close  
   

[asbraha]

jeje, si perdon se me fueron las cabras, lo que pasa es que pense en el archivo como un *.exe y mirandolo como un programa compilado o algo asi, pero bueno me referia a lo que me respondiste muchas gracias.

Ahora supongo que si es un archivo que ya tenia nombre y extencion digamos gato.rar y lo mando en un lado para escribirlo en otro, el archivo mismo debe contener informacion de su nombre y extencion o no? supongo que de cierta manera se reescribe esa informacion, pero bueno, gracias a ti creo que solo sera cuestion de hacer unas cuantas pruebas y de verdad gracias por tus respuestas me fueron altamente utiles

[David]

Sí, lo del nombre ya no es muy difícil, la mandas al comienzo y le agregas un * ya que los nombres de archivo no pueden contener ese caracter, así cuando llegue con un InStr (buscar cadenas) separas el nombre del archivo en sí.

[asbraha]

Que tal David y Que tal a Todos:

Parecia que todo estaba bien, probe el cargar el archivo a una variable el FileData que recomendaste y luego escribirlo en una ubicacion diferente del disco duro y todo salio sin problemas

Hoy pude probarlo con el paso por el serial y no sobrevive a la transferencia.

Probe recibiendolo por una caja de texto y tambien directamente en una variable y nada.

Un insignificante detalle que olvide mensionar es que es para transmitir archivos con maquinaria de tejido, algo vieja, aun asi el recibir los datos no es tanto problema los recibo, aunque tengo que hacerlo por partes y despues unirlo, al enviar si hay problema no me recibe el archivo ¿Sabras de alguna otra manera de manejar el serial?

No creo que mande verificaciones o algo por el estilo porque ya existe un pequeño programa que hace lo que necesito, es demo y solo envia archivos muy pequeños, por eso no es util y fue hecho por una persona que nada sabia de la maquinaria, empiezo a dudar de si me servira el MScomm, tal vez deberia probar en C++, ¿Que opinan?

[David]

Bueno, yo nunca usé el MSComm para transferencia de datos. Pero no creo que cambiándose de lenguaje cambie el mal funcionamiento ya que el problema está en el dispositivo y no en el lenguaje .

¿Necesariamente tienes que usar MSComm?. Otra opción sería usar una red LAN.

[asbraha]

Por desgracia si, la maquina solo tiene una entrada de cable de 25 pines (que funciona como el serial) y a la computadora da como serial, es la unica forma de enviarle informacion, bueno esta esa y tarjetas perforadas, asi que creo que me quedo con el serial jeje, y pues lo de C++ lo decia por que me parece que necesito interactuar mas directamente con el puerto y el mscomm pues ya esta programado y no me lo permite, pero bueno, le buscare y si se te ocurre algo te agradeceria algun comentario, saludos