Modem Status

• Question

• 

  

  0

  Sign in to vote

  I am doing a program to dial a modem by using MSComm ...
  My code ... by vfp code
  
  code :
  

  If !Empty(This.tXTPhoneNumber.Value)

  If This.OleCOMM.CommID # -1

  wait window 'Port already open...'

  Else

  wait window 'Opening port...'

  This.OleCOMM.SThreshold = 1

  This.OleCOMM.RThresHold = 1

  This.OleCOMM.PortOpen = .T.

  This.OleCOMM.Output = 'ATDT' + Alltrim(This.txtPhoneNumberalue) + Chr(13)

  This.OleCOMM.PortOpen = .F.

  Endif

  Endif

  
  then the modem will dial the given number.
  
  

  now i have some quition

  1. how i can determine no modem are connected or installed the system

  2. how i can determine no phone are connected

  3. how i can determine the phone line is busy

  4. how i can determine the phone line dead

  
  

  Any one can help me ? Thanks....

  Sunday, July 26, 2009 4:12 AM