L lee inmo New Member Licensed User Longtime User Jul 1, 2007 #1 :sign0085: Hi I am developing an application Someone can help me? thank you Code: Sub Globals End Sub Sub App_Start Form1.show ' com3 irda port send : ipaq 4700, receive : ipaq 5450 serial.new2(3,19200,"N",8,1) serial.portopen=true End Sub Sub Button1_Click if serial.PortOpen = true then serial.Output("1") End Sub received pda screen Attachments Screen001.jpg 37.3 KB · Views: 259
:sign0085: Hi I am developing an application Someone can help me? thank you Code: Sub Globals End Sub Sub App_Start Form1.show ' com3 irda port send : ipaq 4700, receive : ipaq 5450 serial.new2(3,19200,"N",8,1) serial.portopen=true End Sub Sub Button1_Click if serial.PortOpen = true then serial.Output("1") End Sub received pda screen
Erel B4X founder Staff member Licensed User Longtime User Jul 1, 2007 #2 You should use the Serial IR instead of the Raw IR. It is comm port 3 on most devices. You could test it with the SerialTerminal example from here: www.b4x.com/Downloads.html
You should use the Serial IR instead of the Raw IR. It is comm port 3 on most devices. You could test it with the SerialTerminal example from here: www.b4x.com/Downloads.html