Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VB6: MSComm/tiedon vastaanotto

kojamo [20.07.2006 13:46:32]

#

Onkos kellään kokemusta tuosta MSComm-objektin käytöstä ja tiedon vastaanotosta?

MSComm toimii, mutta pientä säätöä vaatii tuo tiedon vastaanotto kun syystä tai toisesta heittää osan koodista kahteen tietueeseen? Alla esimerkki..joka tosin näkyy huonosti..

Koodi Aika
1234 10:15

4 10:16
123 10:16

4 10:17
123 10:17

1234 10:18

datapaketti tulee Wlanin kautta com-portille...tuleeko siirtotiellä sitten sen verran viivettä joka hajottaa numerot. Aikaleima on kuitenkin sama tuossa taulukossa? Alla on koodi mikä pyörähtää kun portille tulee tapahtuma.

Private Sub MSComm2_OnComm()

Dim buffer As String
Dim T1 As Single

   buffer = MSComm2.CommEvent
   T1 = Timer

Do Until buffer = 2
If Timer - T1 > 3 Then Exit Sub
Loop
Call AddScanRecords

End Sub

Sub AddScanRecords()

Dim db As Database, rs As DAO.Recordset
Dim StartTime As Date

    StartTime = Now()

Set db = CurrentDb
Set rs = db.OpenRecordset("kone1")

    rs.AddNew
    rs![BarCode] = MSComm2.Input
    rs![ScanDate] = Now()
    rs.Update

    rs.Close
    db.Close
End Sub

Tuota tapaa oon koittanut selventää mutta ei aukea... http://msdn.microsoft.com/library/default.asp?url=/library/en-us/comm98/html/vbobjcommx.asp

Eli miten saan tehtyä puskurin joka tallettaa datapaketin kun tuo alla olevassa jutussa oleva <CRLF> on tullut viimeisenä puskuriin..

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta