Haberler:

Forum kuralları güncellendi LÜTFEN  okuyunuz:  https://bit.ly/2IjR3ME

Ana Menü

seri portu açma

Başlatan MICROCEBEL, 14 Mayıs 2006, 22:40:00

MICROCEBEL

selamün aleyküm arkadaşlar;
seri port uygulaması yaparken şöyle bir uyarıyla karşılaştım(Sadece portun, açık olduğu zaman geçerli çalışma) bi butona bastığım zaman 1 in ascıı karşılığını gönderen bi örnek yaptım ama çalışmadı ve o hatayı verdi.aslında kapalı olmaması gerekir geçen gün arkadaşım bitane uygulama yaptı benim pc den.Acaba paralel portta olduğu gibi bununda dll dosyası falan varmı yada modül koyulması gerekirmi?Çalışlmalarınızda başarılar...........

forsa1975

If MSComm1.PortOpen = True Then
hata veren işlemler....
end if

böyle bişey yazdığında aynı hatayı verirmi?

MICROCEBEL

MSComm1.CommPort = 1
   MSComm1.Settings = "19200,N,8,1"
   MSComm1.Handshaking = 0
   MSComm1.DTREnable = False
   MSComm1.RThreshold = 1
   On Error Resume Next
   MSComm1.PortOpen = True
   MSComm1.InBufferCount = 0
   If Err Then MsgBox "Cannot open comm port " & MSComm1.CommPort
(terminal için bu kodları yazdım)
------------------------------------------------------------------------------------
buton içinde aşağıdaki kodu yazdım.
Dim örnek
örnek="A"
MsComm1.output=örnek