Jump to content

Test modem


anixon
 Share

Recommended Posts

Netcomm.ocx and its upgrade has been instaled. The AutoIT script is compiled using the Beta version of the software. The bluetooth modem responds to the modem query command in Windows XP. The code queries the modem (Bluetooth flashes on the handset) Blue screen of death occurs after this event with the following information:

[RQL_NOT_LESS_OR_EQUAL]

STOP 0X0000000A (0X0000FFDF, 0X00000002, 0X00000001, 0X806FFA83)

This is the code

CODE
$Time2Wait = 5000

dim $FromModem = ""

$ModemString = "ATZ" & ";" & @CR

$com = ObjCreate ("NETCommOCX.NETComm")

With $com

.CommPort = 5

.PortOpen = True

.Settings = "9600,N,8,1"

.InBufferCount = 0

.Output = $ModemString

EndWith

$StopWatch = TimerInit()

While 1

If $com.InBufferCount Then

$FromModem = $FromModem & $com.InputData

If StringInStr($FromModem, "OK") Then

ExitLoop

EndIf

EndIf

If (TimerDiff($StopWatch) > $Time2Wait) Then

ExitLoop

EndIf

WEnd

Help would be appreciated Ant :P

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...