home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 June / Chip_2001-06_cd1.bin / zkuste / vbasic / Data / Zdroj / modem.bas < prev    next >
BASIC Source File  |  1999-06-19  |  19KB  |  471 lines
  1. Attribute VB_Name = "Module1"
  2. '  Serial provider type.
  3. Public Const SP_SERIALCOMM = &H1&
  4.  
  5. '  Provider SubTypes
  6. Public Const PST_UNSPECIFIED = &H0&
  7. Public Const PST_RS232 = &H1&
  8. Public Const PST_PARALLELPORT = &H2&
  9. Public Const PST_RS422 = &H3&
  10. Public Const PST_RS423 = &H4&
  11. Public Const PST_RS449 = &H5&
  12. Public Const PST_FAX = &H21&
  13. Public Const PST_SCANNER = &H22&
  14. Public Const PST_NETWORK_BRIDGE = &H100&
  15. Public Const PST_LAT = &H101&
  16. Public Const PST_TCPIP_TELNET = &H102&
  17. Public Const PST_X25 = &H103&
  18.  
  19. '  Provider capabilities flags.
  20. Public Const PCF_DTRDSR = &H1&
  21. Public Const PCF_RTSCTS = &H2&
  22. Public Const PCF_RLSD = &H4&
  23. Public Const PCF_PARITY_CHECK = &H8&
  24. Public Const PCF_XONXOFF = &H10&
  25. Public Const PCF_SETXCHAR = &H20&
  26. Public Const PCF_TOTALTIMEOUTS = &H40&
  27. Public Const PCF_INTTIMEOUTS = &H80&
  28. Public Const PCF_SPECIALCHARS = &H100&
  29. Public Const PCF_16BITMODE = &H200&
  30.  
  31. '  Comm provider settable parameters.
  32. Public Const SP_PARITY = &H1&
  33. Public Const SP_BAUD = &H2&
  34. Public Const SP_DATABITS = &H4&
  35. Public Const SP_STOPBITS = &H8&
  36. Public Const SP_HANDSHAKING = &H10&
  37. Public Const SP_PARITY_CHECK = &H20&
  38. Public Const SP_RLSD = &H40&
  39.  
  40. '  Settable baud rates in the provider.
  41. Public Const BAUD_075 = &H1&
  42. Public Const BAUD_110 = &H2&
  43. Public Const BAUD_134_5 = &H4&
  44. Public Const BAUD_150 = &H8&
  45. Public Const BAUD_300 = &H10&
  46. Public Const BAUD_600 = &H20&
  47. Public Const BAUD_1200 = &H40&
  48. Public Const BAUD_1800 = &H80&
  49. Public Const BAUD_2400 = &H100&
  50. Public Const BAUD_4800 = &H200&
  51. Public Const BAUD_7200 = &H400&
  52. Public Const BAUD_9600 = &H800&
  53. Public Const BAUD_14400 = &H1000&
  54. Public Const BAUD_19200 = &H2000&
  55. Public Const BAUD_38400 = &H4000&
  56. Public Const BAUD_56K = &H8000&
  57. Public Const BAUD_128K = &H10000
  58. Public Const BAUD_115200 = &H20000
  59. Public Const BAUD_57600 = &H40000
  60. Public Const BAUD_USER = &H10000000
  61.  
  62. '  Settable Data Bits
  63. Public Const DATABITS_5 = &H1&
  64. Public Const DATABITS_6 = &H2&
  65. Public Const DATABITS_7 = &H4&
  66. Public Const DATABITS_8 = &H8&
  67. Public Const DATABITS_16 = &H10&
  68. Public Const DATABITS_16X = &H20&
  69.  
  70. '  Settable Stop and Parity bits.
  71. Public Const STOPBITS_10 = &H1&
  72. Public Const STOPBITS_15 = &H2&
  73. Public Const STOPBITS_20 = &H4&
  74. Public Const PARITY_NONE = &H100&
  75. Public Const PARITY_ODD = &H200&
  76. Public Const PARITY_EVEN = &H400&
  77. Public Const PARITY_MARK = &H800&
  78. Public Const PARITY_SPACE = &H1000&
  79.  
  80. Type COMMPROP
  81.     wPacketLength As Integer
  82.     wPacketVersion As Integer
  83.     dwServiceMask As Long
  84.     dwReserved1 As Long
  85.     dwMaxTxQueue As Long
  86.     dwMaxRxQueue As Long
  87.     dwMaxBaud As Long
  88.     dwProvSubType As Long
  89.     dwProvCapabilities As Long
  90.     dwSettableParams As Long
  91.     dwSettableBaud As Long
  92.     wSettableData As Integer
  93.     wSettableStopParity As Integer
  94.     dwCurrentTxQueue As Long
  95.     dwCurrentRxQueue As Long
  96.     dwProvSpec1 As Long
  97.     dwProvSpec2 As Long
  98.     wcProvChar(1) As Integer
  99. End Type
  100.  
  101. 'Type COMSTAT
  102. '        fCtsHold As Long
  103. '        fDsrHold As Long
  104. '        fRlsdHold As Long
  105. '        fXoffHold As Long
  106. '        fXoffSent As Long
  107. '        fEof As Long
  108. '        fTxim As Long
  109. '        fReserved As Long
  110. '        cbInQue As Long
  111. '        cbOutQue As Long
  112. 'End Type
  113.  
  114. Type COMSTAT
  115.     fBitFields As Long 'See Comment in Win32API.Txt
  116.     cbInQue As Long
  117.     cbOutQue As Long
  118. End Type
  119. ' The eight actual COMSTAT bit-sized data fields within the four bytes of fBitFields can be manipulated by bitwise logical And/Or operations.
  120. ' FieldName     Bit #     Description
  121. ' ---------     -----     ---------------------------
  122. ' fCtsHold        1       Tx waiting for CTS signal
  123. ' fDsrHold        2       Tx waiting for DSR signal
  124. ' fRlsdHold       3       Tx waiting for RLSD signal
  125. ' fXoffHold       4       Tx waiting, XOFF char rec'd
  126. ' fXoffSent       5       Tx waiting, XOFF char sent
  127. ' fEof            6       EOF character sent
  128. ' fTxim           7       character waiting for Tx
  129. ' fReserved       8       reserved (25 bits)
  130.  
  131. '  DTR Control Flow Values.
  132. Public Const DTR_CONTROL_DISABLE = &H0
  133. Public Const DTR_CONTROL_ENABLE = &H1
  134. Public Const DTR_CONTROL_HANDSHAKE = &H2
  135.  
  136. '  RTS Control Flow Values
  137. Public Const RTS_CONTROL_DISABLE = &H0
  138. Public Const RTS_CONTROL_ENABLE = &H1
  139. Public Const RTS_CONTROL_HANDSHAKE = &H2
  140. Public Const RTS_CONTROL_TOGGLE = &H3
  141.  
  142. 'Type DCB
  143. '        DCBlength As Long
  144. '        BaudRate As Long
  145. '        fBinary As Long
  146. '        fParity As Long
  147. '        fOutxCtsFlow As Long
  148. '        fOutxDsrFlow As Long
  149. '        fDtrControl As Long
  150. '        fDsrSensitivity As Long
  151. '        fTXContinueOnXoff As Long
  152. '        fOutX As Long
  153. '        fInX As Long
  154. '        fErrorChar As Long
  155. '        fNull As Long
  156. '        fRtsControl As Long
  157. '        fAbortOnError As Long
  158. '        fDummy2 As Long
  159. '        wReserved As Integer
  160. '        XonLim As Integer
  161. '        XoffLim As Integer
  162. '        ByteSize As Byte
  163. '        Parity As Byte
  164. '        StopBits As Byte
  165. '        XonChar As Byte
  166. '        XoffChar As Byte
  167. '        ErrorChar As Byte
  168. '        EofChar As Byte
  169. '        EvtChar As Byte
  170. 'End Type
  171.  
  172. Type DCB
  173.     DCBlength As Long
  174.     BaudRate As Long
  175.     fBitFields As Long 'See Comments in Win32API.Txt
  176.     wReserved As Integer
  177.     XonLim As Integer
  178.     XoffLim As Integer
  179.     ByteSize As Byte
  180.     Parity As Byte
  181.     StopBits As Byte
  182.     XonChar As Byte
  183.     XoffChar As Byte
  184.     ErrorChar As Byte
  185.     EofChar As Byte
  186.     EvtChar As Byte
  187.     wReserved1 As Integer 'Reserved; Do Not Use
  188. End Type
  189. ' The fourteen actual DCB bit-sized data fields within the four bytes of fBitFields can be manipulated by bitwise logical And/Or operations.
  190. ' FieldName             Bit #     Description
  191. ' -----------------     -----     ------------------------------
  192. ' fBinary                 1       binary mode, no EOF check
  193. ' fParity                 2       enable parity checking
  194. ' fOutxCtsFlow            3       CTS output flow control
  195. ' fOutxDsrFlow            4       DSR output flow control
  196. ' fDtrControl             5       DTR flow control type (2 bits)
  197. ' fDsrSensitivity         7       DSR sensitivity
  198. ' fTXContinueOnXoff       8       XOFF continues Tx
  199. ' fOutX                   9       XON/XOFF out flow control
  200. ' fInX                   10       XON/XOFF in flow control
  201. ' fErrorChar             11       enable error replacement
  202. ' fNull                  12       enable null stripping
  203. ' fRtsControl            13       RTS flow control (2 bits)
  204. ' fAbortOnError          15       abort reads/writes on error
  205. ' fDummy2                16       reserved
  206.  
  207. Type COMMTIMEOUTS
  208.     ReadIntervalTimeout As Long
  209.     ReadTotalTimeoutMultiplier As Long
  210.     ReadTotalTimeoutConstant As Long
  211.     WriteTotalTimeoutMultiplier As Long
  212.     WriteTotalTimeoutConstant As Long
  213. End Type
  214.  
  215. ' Comm Baud Rate indices
  216. Public Const CBR_110 = 110
  217. Public Const CBR_300 = 300
  218. Public Const CBR_600 = 600
  219. Public Const CBR_1200 = 1200
  220. Public Const CBR_2400 = 2400
  221. Public Const CBR_4800 = 4800
  222. Public Const CBR_9600 = 9600
  223. Public Const CBR_14400 = 14400
  224. Public Const CBR_19200 = 19200
  225. Public Const CBR_38400 = 38400
  226. Public Const CBR_56000 = 56000
  227. Public Const CBR_57600 = 57600
  228. Public Const CBR_115200 = 115200
  229. Public Const CBR_128000 = 128000
  230. Public Const CBR_256000 = 256000
  231.  
  232. ' Error Flags
  233. Public Const CE_RXOVER = &H1                '  Receive Queue overflow
  234. Public Const CE_OVERRUN = &H2               '  Receive Overrun Error
  235. Public Const CE_RXPARITY = &H4              '  Receive Parity Error
  236. Public Const CE_FRAME = &H8                 '  Receive Framing error
  237. Public Const CE_BREAK = &H10                '  Break Detected
  238. Public Const CE_TXFULL = &H100              '  TX Queue is full
  239. Public Const CE_PTO = &H200                 '  LPTx Timeout
  240. Public Const CE_IOE = &H400                 '  LPTx I/O Error
  241. Public Const CE_DNS = &H800                 '  LPTx Device not selected
  242. Public Const CE_OOP = &H1000                '  LPTx Out-Of-Paper
  243. Public Const CE_MODE = &H8000               '  Requested mode unsupported
  244.  
  245. Public Const IE_BADID = (-1)                '  Invalid or unsupported id
  246. Public Const IE_OPEN = (-2)                 '  Device Already Open
  247. Public Const IE_NOPEN = (-3)                '  Device Not Open
  248. Public Const IE_MEMORY = (-4)               '  Unable to allocate queues
  249. Public Const IE_DEFAULT = (-5)              '  Error in default parameters
  250. Public Const IE_HARDWARE = (-10)            '  Hardware Not Present
  251. Public Const IE_BYTESIZE = (-11)            '  Illegal Byte Size
  252. Public Const IE_BAUDRATE = (-12)            '  Unsupported BaudRate
  253.  
  254. ' Events
  255. Public Const EV_RXCHAR = &H1                '  Any Character received
  256. Public Const EV_RXFLAG = &H2                '  Received certain character
  257. Public Const EV_TXEMPTY = &H4               '  Transmitt Queue Empty
  258. Public Const EV_CTS = &H8                   '  CTS changed state
  259. Public Const EV_DSR = &H10                  '  DSR changed state
  260. Public Const EV_RLSD = &H20                 '  RLSD changed state
  261. Public Const EV_BREAK = &H40                '  BREAK received
  262. Public Const EV_ERR = &H80                  '  Line status error occurred
  263. Public Const EV_RING = &H100                '  Ring signal detected
  264. Public Const EV_PERR = &H200                '  Printer error occured
  265. Public Const EV_RX80FULL = &H400            '  Receive buffer is 80 percent full
  266. Public Const EV_EVENT1 = &H800              '  Provider specific event 1
  267. Public Const EV_EVENT2 = &H1000             '  Provider specific event 2
  268.  
  269. ' Escape Functions
  270. Public Const SETXOFF = 1  '  Simulate XOFF received
  271. Public Const SETXON = 2 '  Simulate XON received
  272. Public Const SETRTS = 3 '  Set RTS high
  273. Public Const CLRRTS = 4 '  Set RTS low
  274. Public Const SETDTR = 5 '  Set DTR high
  275. Public Const CLRDTR = 6 '  Set DTR low
  276. Public Const RESETDEV = 7       '  Reset device if possible
  277. Public Const SETBREAK = 8  'Set the device break line
  278. Public Const CLRBREAK = 9 ' Clear the device break line
  279.  
  280. '  PURGE function flags.
  281. Public Const PURGE_TXABORT = &H1     '  Kill the pending/current writes to the comm port.
  282. Public Const PURGE_RXABORT = &H2     '  Kill the pending/current reads to the comm port.
  283. Public Const PURGE_TXCLEAR = &H4     '  Kill the transmit queue if there.
  284. Public Const PURGE_RXCLEAR = &H8     '  Kill the typeahead buffer if there.
  285.  
  286. Public Const LPTx = &H80        '  Set if ID is for LPT device
  287.  
  288. '  Modem Status Flags
  289. Public Const MS_CTS_ON = &H10&
  290. Public Const MS_DSR_ON = &H20&
  291. Public Const MS_RING_ON = &H40&
  292. Public Const MS_RLSD_ON = &H80&
  293.  
  294.  
  295. ' COMM declarations
  296. Declare Function SetCommState Lib "kernel32" (ByVal hCommDev As Long, lpDCB As DCB) As Long
  297. Declare Function SetCommTimeouts Lib "kernel32" (ByVal hFile As Long, lpCommTimeouts As COMMTIMEOUTS) As Long
  298. Declare Function GetCommState Lib "kernel32" (ByVal nCid As Long, lpDCB As DCB) As Long
  299. Declare Function GetCommTimeouts Lib "kernel32" (ByVal hFile As Long, lpCommTimeouts As COMMTIMEOUTS) As Long
  300. Declare Function PurgeComm Lib "kernel32" (ByVal hFile As Long, ByVal dwFlags As Long) As Long
  301. Declare Function BuildCommDCB Lib "kernel32" Alias "BuildCommDCBA" (ByVal lpDef As String, lpDCB As DCB) As Long
  302. Declare Function BuildCommDCBAndTimeouts Lib "kernel32" Alias "BuildCommDCBAndTimeoutsA" (ByVal lpDef As String, lpDCB As DCB, lpCommTimeouts As COMMTIMEOUTS) As Long
  303. Declare Function TransmitCommChar Lib "kernel32" (ByVal nCid As Long, ByVal cChar As Byte) As Long
  304. Declare Function SetCommBreak Lib "kernel32" (ByVal nCid As Long) As Long
  305. Declare Function SetCommMask Lib "kernel32" (ByVal hFile As Long, ByVal dwEvtMask As Long) As Long
  306. Declare Function ClearCommBreak Lib "kernel32" (ByVal nCid As Long) As Long
  307. Declare Function ClearCommError Lib "kernel32" (ByVal hFile As Long, lpErrors As Long, lpStat As COMSTAT) As Long
  308. Declare Function SetupComm Lib "kernel32" (ByVal hFile As Long, ByVal dwInQueue As Long, ByVal dwOutQueue As Long) As Long
  309. Declare Function EscapeCommFunction Lib "kernel32" (ByVal nCid As Long, ByVal nFunc As Long) As Long
  310. Declare Function GetCommMask Lib "kernel32" (ByVal hFile As Long, lpEvtMask As Long) As Long
  311. Declare Function GetCommProperties Lib "kernel32" (ByVal hFile As Long, lpCommProp As COMMPROP) As Long
  312. Declare Function GetCommModemStatus Lib "kernel32" (ByVal hFile As Long, lpModemStat As Long) As Long
  313.  
  314.  
  315. '   A dynamic link library (DLL) initialization routine failed.
  316. Public Const ERROR_DLL_INIT_FAILED = 1114&
  317.  
  318. '   A system shutdown is in progress.
  319. Public Const ERROR_SHUTDOWN_IN_PROGRESS = 1115&
  320.  
  321. '   Unable to abort the system shutdown because no shutdown was in progress.
  322. Public Const ERROR_NO_SHUTDOWN_IN_PROGRESS = 1116&
  323.  
  324. '   The request could not be performed because of an I/O device error.
  325. Public Const ERROR_IO_DEVICE = 1117&
  326.  
  327. '   No serial device was successfully initialized.  The serial driver will unload.
  328. Public Const ERROR_SERIAL_NO_DEVICE = 1118&
  329.  
  330. '   Unable to open a device that was sharing an interrupt request (IRQ)
  331. '   with other devices. At least one other device that uses that IRQ
  332. '   was already opened.
  333. Public Const ERROR_IRQ_BUSY = 1119&
  334.  
  335. '   A serial I/O operation was completed by another write to the serial port.
  336. '   (The IOCTL_SERIAL_XOFF_COUNTER reached zero.)
  337. Public Const ERROR_MORE_WRITES = 1120&
  338.  
  339. '   A serial I/O operation completed because the time-out period expired.
  340. '   (The IOCTL_SERIAL_XOFF_COUNTER did not reach zero.)
  341. Public Const ERROR_COUNTER_TIMEOUT = 1121&
  342.  
  343. Type COMMCONFIG
  344.     dwSize As Long
  345.     wVersion As Integer
  346.     wReserved As Integer
  347.     dcbx As DCB
  348.     dwProviderSubType As Long
  349.     dwProviderOffset As Long
  350.     dwProviderSize As Long
  351.     wcProviderData As Byte
  352. End Type
  353.  
  354. Declare Function CommConfigDialog Lib "kernel32" Alias "CommConfigDialogA" (ByVal lpszName As String, ByVal hWnd As Long, lpCC As COMMCONFIG) As Long
  355. Declare Function CreateIoCompletionPort Lib "kernel32" (ByVal FileHandle As Long, ByVal ExistingCompletionPort As Long, ByVal CompletionKey As Long, ByVal NumberOfConcurrentThreads As Long) As Long
  356. Declare Function GetCommConfig Lib "kernel32" (ByVal hCommDev As Long, lpCC As COMMCONFIG, lpdwSize As Long) As Long
  357. Declare Function GetCompressedFileSize Lib "kernel32" Alias "GetCompressedFileSizeA" (ByVal lpFileName As String, lpFileSizeHigh As Long) As Long
  358. Declare Function GetDefaultCommConfig Lib "kernel32" Alias "GetDefaultCommConfigA" (ByVal lpszName As String, lpCC As COMMCONFIG, lpdwSize As Long) As Long
  359. Declare Function GetHandleInformation Lib "kernel32" (ByVal hObject As Long, lpdwFlags As Long) As Long
  360. Declare Function GetProcessHeaps Lib "kernel32" (ByVal NumberOfHeaps As Long, ProcessHeaps As Long) As Long
  361. Declare Function GetProcessWorkingSetSize Lib "kernel32" (ByVal hProcess As Long, lpMinimumWorkingSetSize As Long, lpMaximumWorkingSetSize As Long) As Long
  362. Declare Function GetQueuedCompletionStatus Lib "kernel32" (ByVal CompletionPort As Long, lpNumberOfBytesTransferred As Long, lpCompletionKey As Long, lpOverlapped As Long, ByVal dwMilliseconds As Long) As Long
  363. Declare Function SetCommConfig Lib "kernel32" (ByVal hCommDev As Long, lpCC As COMMCONFIG, ByVal dwSize As Long) As Long
  364. Declare Function SetDefaultCommConfig Lib "kernel32" Alias "SetDefaultCommConfigA" (ByVal lpszName As String, lpCC As COMMCONFIG, ByVal dwSize As Long) As Long
  365.  
  366.  
  367. Type PORT_INFO_2
  368.     pPortName As String
  369.     pMonitorName As String
  370.     pDescription As String
  371.     fPortType As Long
  372.     Reserved As Long
  373. End Type
  374.  
  375. Public Const PORT_TYPE_WRITE = &H1
  376. Public Const PORT_TYPE_READ = &H2
  377. Public Const PORT_TYPE_REDIRECTED = &H4
  378. Public Const PORT_TYPE_NET_ATTACHED = &H8
  379. Type MODEMDEVCAPS
  380.     dwActualSize As Long
  381.     dwRequiredSize As Long
  382.     dwDevSpecificOffset As Long
  383.     dwDevSpecificSize As Long
  384.  
  385.     '  product and version identification
  386.     dwModemProviderVersion As Long
  387.     dwModemManufacturerOffset As Long
  388.     dwModemManufacturerSize As Long
  389.     dwModemModelOffset As Long
  390.     dwModemModelSize As Long
  391.     dwModemVersionOffset As Long
  392.     dwModemVersionSize As Long
  393.  
  394.     '  local option capabilities
  395.     dwDialOptions As Long          '  bitmap of supported values
  396.     dwCallSetupFailTimer As Long   '  maximum in seconds
  397.     dwInactivityTimeout As Long    '  maximum in seconds
  398.     dwSpeakerVolume As Long        '  bitmap of supported values
  399.     dwSpeakerMode As Long          '  bitmap of supported values
  400.     dwModemOptions As Long         '  bitmap of supported values
  401.     dwMaxDTERate As Long           '  maximum value in bit/s
  402.     dwMaxDCERate As Long           '  maximum value in bit/s
  403.  
  404.     '  Variable portion for proprietary expansion
  405.     abVariablePortion(1) As Byte
  406. End Type
  407.  
  408. Type MODEMSETTINGS
  409.     dwActualSize As Long
  410.     dwRequiredSize As Long
  411.     dwDevSpecificOffset As Long
  412.     dwDevSpecificSize As Long
  413.  
  414.     '  static local options (read/write)
  415.     dwCallSetupFailTimer As Long       '  seconds
  416.     dwInactivityTimeout As Long        '  seconds
  417.     dwSpeakerVolume As Long            '  level
  418.     dwSpeakerMode As Long              '  mode
  419.     dwPreferredModemOptions As Long    '  bitmap
  420.     
  421.     '  negotiated options (read only) for current or last call
  422.     dwNegotiatedModemOptions As Long   '  bitmap
  423.     dwNegotiatedDCERate As Long        '  bit/s
  424.  
  425.     '  Variable portion for proprietary expansion
  426.     abVariablePortion(1) As Byte
  427. End Type
  428.  
  429. '  Dial Options
  430. Public Const DIALOPTION_BILLING = &H40          '  Supports wait for bong "$"
  431. Public Const DIALOPTION_QUIET = &H80            '  Supports wait for quiet "@"
  432. Public Const DIALOPTION_DIALTONE = &H100        '  Supports wait for dial tone "W"
  433.  
  434. '  SpeakerVolume for MODEMDEVCAPS
  435. Public Const MDMVOLFLAG_LOW = &H1
  436. Public Const MDMVOLFLAG_MEDIUM = &H2
  437. Public Const MDMVOLFLAG_HIGH = &H4
  438.  
  439. '  SpeakerVolume for MODEMSETTINGS
  440. Public Const MDMVOL_LOW = &H0
  441. Public Const MDMVOL_MEDIUM = &H1
  442. Public Const MDMVOL_HIGH = &H2
  443.  
  444. '  SpeakerMode for MODEMDEVCAPS
  445. Public Const MDMSPKRFLAG_OFF = &H1
  446. Public Const MDMSPKRFLAG_DIAL = &H2
  447. Public Const MDMSPKRFLAG_ON = &H4
  448. Public Const MDMSPKRFLAG_CALLSETUP = &H8
  449.  
  450. '  SpeakerMode for MODEMSETTINGS
  451. Public Const MDMSPKR_OFF = &H0
  452. Public Const MDMSPKR_DIAL = &H1
  453. Public Const MDMSPKR_ON = &H2
  454. Public Const MDMSPKR_CALLSETUP = &H3
  455.  
  456. '  Modem Options
  457. Public Const MDM_COMPRESSION = &H1
  458. Public Const MDM_ERROR_CONTROL = &H2
  459. Public Const MDM_FORCED_EC = &H4
  460. Public Const MDM_CELLULAR = &H8
  461. Public Const MDM_FLOWCONTROL_HARD = &H10
  462. Public Const MDM_FLOWCONTROL_SOFT = &H20
  463. Public Const MDM_CCITT_OVERRIDE = &H40
  464. Public Const MDM_SPEED_ADJUST = &H80
  465. Public Const MDM_TONE_DIAL = &H100
  466. Public Const MDM_BLIND_DIAL = &H200
  467. Public Const MDM_V23_OVERRIDE = &H400
  468.  
  469.  
  470.  
  471.