Porta Serial

Boa tarde.

  Alguém por um acaso pode me dizer como testo se uma porta serial esta aberta. Se estiver como faço para fecha-la?

 Preciso transformar este código em VB para Java.

'Abre e inicializa porta serial (Recebe)
With PortaSerialRecebe
      
    .CommPort = XNumeroPortaSerial
    .Settings = Str(XTaxaPortaSerial) + "," + XBitParidadePortaSerial + "," + Str(XBitControlePortaSerial) + "," + Str(XBitParadaPortaSerial)
    .InputLen = 0
    .OutBufferSize = 32767

‘’’ .Handshaking = comXOnXoff 'Sysmex
.Handshaking = comRTSXOnXOff 'Cobas Core II

    If .PortOpen = False Then
        .PortOpen = True
    Else
        .PortOpen = False
        .PortOpen = True
    End If
End With

*—Onde PortaSerialRecebe é um objeto COMM

Obrigado!

Não é exatamente o que você precisa, mas nestes daqui você aprende a fazer o que precisar :smiley:

http://www.google.com/search?sourceid=navclient&hl=pt-BR&ie=UTF-8&oe=UTF-8&q=java+serial+port
http://java.sun.com/products/javacomm/javadocs/API_users_guide.html
http://www.rgagnon.com/javadetails/java-0062.htmlhttp://www.javaworld.com/javaworld/jw-05-1998/jw-05-javadev-p2.html

Bons estudos :wink: