Utilizar modems desde VBScripts

El problema es simple, necesito desde VBScripts utilizar comandos
AT, o si no es posible con VBScripts desde VBasic o C++


Desde ya muchas Gracias</TR>

RE: Utilizar modems desde VBScripts

Estimado ALE_LBA

Desde VbScript así directamente no puede ser, salvo que este embebido en Visual Basic y le pases un objeto instanciado del control MSCOMM.OCX.


Desde Vbasic 6.0, sin ningún problema puedes establecer comunicaciones con un módem y naturalmente desde VC++ ya que puede utilizar el mismo Activex o generártelo tú mismo. Si tienes alguna pregunta más trataremos de responderte lo antes posible o si lo deseas puedes consultar el índice de trucos y aportes en el que se encuentra de casi todo, pero recuerda que este foro se basa en Visual Basic y derivados del mismo.


Un saludo
-Acalanto-</TR>

__________________
Un cordial saludo
-Acalanto-

Madrid - España

Visual Basic
Videos Programacion
Foro Programacion
Tutoriales Programacion

RE: Utilizar modems desde VBScripts

En VB sólo tienes que añadir en el formulario un componente MSComm al que implementarás las siguientes propiedades:

With MSCommDia1

.CommPort = 1 (ó 2 ó 3... el puerto del modem)
.Setting = 9600, N, 8, 1 (que son la Velocidad en Baudios, Paridad, Bits de datos y Bit de Parada)

Ahora abres el puerto y esperas las respuesta:

On Error Resume Next
.PortOpen = True
If Err Then
Mensaje de "Puerto NO Disponible"...
Exit Sub
End If

Vuelca el búfer de entrada.
.InBufferCount = 0

Marca el número.
.Output = DialString$ Esta variable tiene que contener "ATDT" + NumerodeTelefono + ";" + vbCr

Y ahora a esperar que el .Input contenga "OK"...
End With

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion