Dear visitor, welcome to Jabaco - Community. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.
Trainee
Date of registration: Jan 5th 2009
Location: Sesto Fiorentino, Florence (ITALY)
Occupation: design & development (HW, SW & FW)
Hobbies: chess, fly fishing, good wine and beautiful women!
Hi Massimo,
no problems for your english it is great ("del resto anche il mio non eccelle!!!").
I know the java serial libraries (JavaComm). I'm interested in a hardware implementation using PIC or AVR microprocessors using JABACO and I need a RS232 starting point for interfacing Firefox directly with my microcontroller.
Thank you again.
Pier Andrea.
Trainee
Date of registration: Jan 5th 2009
Location: Sesto Fiorentino, Florence (ITALY)
Occupation: design & development (HW, SW & FW)
Hobbies: chess, fly fishing, good wine and beautiful women!
Trainee
Date of registration: Jan 5th 2009
Location: Sesto Fiorentino, Florence (ITALY)
Occupation: design & development (HW, SW & FW)
Hobbies: chess, fly fishing, good wine and beautiful women!
This post has been edited 6 times, last edit by "maXim" (Feb 6th 2009, 3:57pm)
Beginner
Date of registration: Jan 29th 2010
Location: Guayaquil, Ecuador
Occupation: Manager of a software company
Hobbies: Music player
Intermediate
Date of registration: Jan 1st 2009
Location: Hanover, Germany
Occupation: Software Engineer
Hobbies: Hilbert Curves
Beginner
Date of registration: Jan 29th 2010
Location: Guayaquil, Ecuador
Occupation: Manager of a software company
Hobbies: Music player
Intermediate
Date of registration: Jan 1st 2009
Location: Hanover, Germany
Occupation: Software Engineer
Hobbies: Hilbert Curves
Beginner
Date of registration: Jan 29th 2010
Location: Guayaquil, Ecuador
Occupation: Manager of a software company
Hobbies: Music player
Intermediate
Date of registration: Jan 1st 2009
Location: Hanover, Germany
Occupation: Software Engineer
Hobbies: Hilbert Curves
Jabaco Source |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 |
Option Explicit Import javax#comm Public Sub Command1_Click() Dim cpi As CommPortIdentifier Dim ty As Integer Dim s As String = "" Dim en As java#util#Enumeration = CommPortIdentifier.getPortIdentifiers() Do While en.hasMoreElements() cpi = Cast(en.nextElement(), CommPortIdentifier) ty = cpi.getPortType() If ty = CommPortIdentifier.PORT_PARALLEL Then s = s & "parallel port: " Elseif ty = CommPortIdentifier.PORT_SERIAL Then s = s & "serial port: " Else s = s & "??? port: " End If s = s & cpi.getName() & vbCrLf Loop If s = "" Then s = "no port found!" End If MsgBox s End Sub |
Beginner
Date of registration: Jan 29th 2010
Location: Guayaquil, Ecuador
Occupation: Manager of a software company
Hobbies: Music player
Beginner
Date of registration: Jan 29th 2010
Location: Guayaquil, Ecuador
Occupation: Manager of a software company
Hobbies: Music player
Jabaco Source |
|
1 |
Import javax#comm
|
Jabaco Source |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 |
Public Sub Command2_Click() Dim cpi As CommPortIdentifier Dim ty As Integer Dim s As String = "" Dim t As String Dim en As java#util#Enumeration = CommPortIdentifier.getPortIdentifiers() Do While en.hasMoreElements() cpi = Cast(en.nextElement(), CommPortIdentifier) ty = cpi.getPortType() If ty = CommPortIdentifier.PORT_PARALLEL Then lstCommPorts.AddItem "parallel port: " s = s & "parallel port: " ElseIf ty = CommPortIdentifier.PORT_SERIAL Then lstCommPorts.AddItem "serial port: " s = s & "serial port: " Else lstCommPorts.AddItem "??? port: " s = s & "??? port: " End If t=cpi.getName() lstCommPorts.AddItem t s = s & t & vbCrLf Loop If s = "" Then lstCommPorts.AddItem "no port found!" s = "no port found!" End If MsgBox s End Sub |
Intermediate
Date of registration: Jan 1st 2009
Location: Hanover, Germany
Occupation: Software Engineer
Hobbies: Hilbert Curves
Beginner
Date of registration: Feb 25th 2009
Location: Beverungen / Weser
Occupation: Softwareentwicklung
Jabaco Source |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 |
Option Explicit 'Import javax#comm Import gnu#io Public Sub Command1_Click() Dim cpi As gnu#io#CommPortIdentifier Dim ty As Integer Dim s As String = "" Dim en As gnu#io#CommPortEnumerator '= gnu#io#CommPortIdentifier.getPortIdentifiers() en = gnu#io#CommPortIdentifier.getPortIdentifiers() Do While en.hasMoreElements() cpi = Cast(en.nextElement(), CommPortIdentifier) ty = cpi.getPortType() If ty = CommPortIdentifier.PORT_PARALLEL Then s = s & "parallel port: " Elseif ty = CommPortIdentifier.PORT_SERIAL Then s = s & "serial port: " Else s = s & "??? port: " End If s = s & cpi.getName() & vbCrLf Loop If s = "" Then s = "no port found!" End If MsgBox s End Sub |