| Pregunta: | 45598 - PUERTO USB EN VB6 |
| Autor: | Oscar L. |
| Hola: Me gustaria que e ayudaran con un proyecto que estoy desarrollando en estos momentos, solo necesito el codigo fuente de algun ejemplo de como recibir y enviar datos a travez del puerto USB. Y otra consulta, si la conexion es de USB a un puerto Serial, no hay problema alguno en programar solo el puerto USB ya que el cable sera el que transformara la informacion (o voltage) de serial a USB (o vice-versa). PD: si pueden enviarme ejemplos, se los agradecere muchisimo. De antemano muchas gracias. | |
| Respuesta: | luis . |
| Buenas. tengo un proyecto en esa misma area si tiene informacion se la recomiendo gracias.. yo he encontrado esto.. Private Sub Form_Load() rcx2.InitComm 'abre el puerto USB If rcx2.PBAliveOrNot Then lblRCXVive.Caption = "Si" Else lblRCXVive.Caption = "No" End If If rcx2.TowerAlive Then lblTorreActiva.Caption = "Si" Else lblTorreActiva.Caption = "No" End If If lblTorreActiva.Caption = "Si" And lblRCXVive.Caption = "Si" Then lblBateria.Caption = Str(rcx2.PBBattery / 1000) + " voltios " Rcx2.PBTxPower "1" lblRango.Caption = "Rcx2 configurado para largo alcance" lblStatus.Caption = "Sistema en Linea" Else lblStatus.Caption = " Falla de Comunicación" | |