>>>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.