Koneessani on infrapuna- (eli IrDA-) portti, ja haluaisin lukea sitä Visual Basicilla. Haluaisin lukea dataa niin, että ohjelma havaitsisi yhteyden kännykästä tai, että vaikka kaukosäädin lähettää tietoa! Itse selasin Googlella ja hain täältä, mutta toimimaan en saa! Apua!?
Moikka gamehouse!
Se mitä et löydä Google'sta löytyy putkasta...
Moikka taas gamehouse!
kokeile jotain tän tyylistä viritelmää, josko saisit edes jostain portista jotain ulos...
Private Sub Command1_Click()
Dim laskuri As Integer: laskuri = 1
alku:
If MSComm1.PortOpen = True Then MSComm1.PortOpen = False
Text1.Text = ""
On Error Resume Next '* Goto Label...
MSComm1.CommPort = laskuri 'arvo voi olla väliltä 1 - 16
MSComm1.Settings = "9600, N, 8, 1"
MSComm1.InputLen = 0 'kun arvo on 0 koko puskurin sisältö luetaan...
MSComm1.InputMode = comInputModeText
MSComm1.PortOpen = True '** ei toimi tässä...
If Err <> 0 Then GoTo nollaaVirhe '*** vaan tässä
Text1.Text = MSComm1.Input
lopetus:
MSComm1.PortOpen = False
Exit Sub
nollaaVirhe:
Err.Clear: laskuri = laskuri + 1
If laskuri <= 16 Then
GoTo alku
Else
GoTo lopetus
End If
End SubMoikka Taas!
...let's do associate things...
'Try On Error Resume Next 'plaa 'plaa 'plaa 'Catch ex As Exception If Err <> 0 Then Goto ohjelmointiputka 'End Try
...eli mukavaa kun ongelmat ratkeavat itsestään...
Aihe on jo aika vanha, joten et voi enää vastata siihen.