1

Konu: Com Port'tan veri okuma

VFP ile Com Port üzerinden veri okuma ile ilgili örnek kod ve doküman arıyorum. Yardımcı olacak arkadaşlara şimdiden çok teşekkür ederim.

2

Re: Com Port'tan veri okuma

bu linki oncelikle oku
http://www.fox4um.com/viewtopic.php?id=232

3

Re: Com Port'tan veri okuma

Basit bir ornek:

Visual Fox Pro
* load mscomm

oComm = CREATEOBJ('MSCOMMLib.MSComm')
* COM port #1 hazrla ve ac
oComm.CommPort = 1
oComm.Settings = "4800,N,8,1"
oComm.InputLen = 0
oComm.Rthreshold = 1
*oComm.Output='ATDT'+chr(13)
*oComm.Output='ATDT'
oComm.inputlen = 1
oComm.PortOpen = .T.
 
? oComm.CommEvent, oComm.InBufferCount
 
lnChar='/'
FOR i = 1 to 1024
    lnChar = m.lnChar+oComm.input
ENDFOR
* Close the port
oComm.PortOpen = .F.
? m.lnChar, len(m.lnChar)