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.
Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
fox4um » Kodlama ve Komutlar » 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.
Basit bir ornek:
* 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)
fox4um » Kodlama ve Komutlar » Com Port'tan veri okuma