RS232 PORTUNDAN GELEN DATA

Katılım
8 Temmuz 2004
Mesajlar
254
Excel Vers. ve Dili
office 2007-mssql 2008 R2
SELAM,

BİR BARKOD OKUYUCU CİHAZIM VAR, BİLGİSAYARIN COM(RS232) PORTUNA BAÐLI. BURADAN GELEN DATAYI OKUYUP EXCEL'DE BARKODLA İLGİLİ BİR ÇALIÞMA YAPACAÐIM.

TEÞEKKÜRLER...
 
Katılım
7 Temmuz 2004
Mesajlar
1,141
Private Sub dinle ()
MSComm1.CommPort = 1
' 9600 baud, no parity, 8 data, 1 stop bit.
MSComm1.Settings = "9600,N,8,1"
MSComm1.PortOpen = True
Do
DoEvents
textbox1 = textbox1 & MSComm1.Input
Loop Until commandbutton1.caption = "dinle"
MSComm1.PortOpen = False

End Sub


1 mscomm nesnesi
1 text box
1. command button

command buttona her basıldığında caption özelliğini "dinle" , "bitir" olacak şekilde ayarlaman gerekiyor.

son olarak

' 9600 baud, no parity, 8 data, 1 stop bit.
MSComm1.Settings = "9600,N,8,1"

satırlarındaki parametreler rs232 portuna seri bağladığın cihaza göre değişir. bunu cihazın manualinden öğrenebilirsin.
 
Üst