General information
Category:
Third party products
>>>Hi All.
>>>I want use modem in my application.
>>>I am write follow code:
>>>
>>> ***** Top Code*****
>>> ComForm = CREATEOBJECT('Form') ComForm.AddObject("Testcom","Olecontrol","MSCOMMLib.MSComm")
>>>
>>>ThisForm.Testcom.CommPort = 2
>>>ThisForm.Testcom.Settings = "28800,N,8,1"
>>>
>>>ThisForm.Testcom.PortOpen = .T.
>>>ThisForm.Testcom.InputLen=0
>>>ThisForm.Testcom.Output = "ATDP2559902" + chr(13)
>>>
>>> ThisForm.Testcom.PortOpen = .F.
>>> ***** End Code *****
>>>
>>>But my modem do't deal... :(((.
>>>Other property mscomm32 default.
>>>Thanks.
>>>Denis.
>>
>>Hi Denis,
>>
>>Add:
>>ThisForm.Testcom.Rthreshold=1
>>ThisForm.Testcom.Sthreshold=1
>>
>>Place before port close:
>>Wait window 'dialing'
>>
>>Rthreshold sets the threshold for the number of characters in queue before action is taken. Sthreshold sets the threshold for number of characters in queue *before any are sent*. Default is 0, which means *never transmit*
>>
>>HTH
>
>Oops. Left out of sentence: Rthreshold=receive Sthreshold=Send
Hi Glenn,
Hmmm... On you computer this code working ??? On my computer - modem do't deal.... :(
Help me please...
Denis.
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only