PDA

View Full Version : Elenco Porte Seriali

damar3
09-06-2003, 23:53
Come è possibile ottenere in VB6 l'elenco delle porte seriali presenti nel PC?
maxithron
10-06-2003, 09:34
prendile da qui...

http://www.visual-basic.it/scarica.asp?ID=769
cionci
10-06-2003, 09:58
Bello !!! Fa uso delle API non documentate di NT ;)

Il problema è che su Windows 9x/Me non può funzionare...
maxithron
10-06-2003, 10:00
Arghh....!!
cionci
10-06-2003, 10:03
Almeno credo... Sfrutta delle API prese da NTDLL.DLL...
damar3
10-06-2003, 10:14
Veramente carino il programma ma per windows 98 come posso fare?
cionci
10-06-2003, 10:26
Guardate cosa ho trovato sul sito M$: http://www.microsoft.com/hwdev/download/tech/stream/DVD/DVDregion.txt

Comunque la API da usare credo sia SetupDiEnumDeviceInterfaces...anche se è una delle API più difficili da usare che abbia mai visto...
Qui sotto la usano per enumerare le porte USB...di conseguenza credo che vada bene anche per le COM...
http://www.usb.org/forums/developers/messages/30631.html
maxithron
10-06-2003, 10:27
Private Declare Function ConfigurePort Lib "winspool.drv" _
Alias "ConfigurePortA" (ByVal Name As String, ByVal hWnd As Long, _
ByVal PortName As String) As Long
(in un modulo)

poi crei un cmd button:

Private Sub Command1_Click()

'** (1) * porta seriale COM1 ***********
Call ConfigurePort("", Me.hwnd, "COM1")
'** (2) * porta parallela LPT1 *********
' Call ConfigurePort("", Me.hwnd, "LPT1")

End Sub

Dovrebbe funzionare (io ora nn posso provare)
cionci
10-06-2003, 10:28
Qualche info in più: http://msdn.microsoft.com/library/en-us/install/hh/install/setup-cls_2h9j.asp?frame=true
maxithron
10-06-2003, 10:31
Puoi provare se funge?

Ho provato a scriverlo da Gambas (un ambiente Basic per Linux) ma per ovvie ragioni nn posso compilare :cool:
cionci
10-06-2003, 10:33
Ma guarda che sono andato a cercare...invece la soluzione l'avevo sotto agli occhi !!!
EnumPorts...fra pcoo posto il codice...
cionci
10-06-2003, 10:37
http://www.mentalis.org/apilist/EnumPorts.shtml
maxithron
10-06-2003, 10:38
Qui ho trovato ancora altro:

http://www.mvps.org/vbnet/index.html?code/enums/enumports.htm
damar3
10-06-2003, 11:40
Grazie a tutti per l'aiuto. Siete stati veramente molto gentili. Però avrei un altro piccolo dubbio, usando il codice postato da cianci mi rileva fino alla COM4 porta che io non ho. Come fare per "correggere" questo problema?
maxithron
10-06-2003, 11:42
Gentili??? guarda che sarai invaso da PVT in cui si allega regolare fattura e pretesa di pagamento!!! :D :D
damar3
10-06-2003, 11:52
Originally posted by "maxithron"

Gentili??? guarda che sarai invaso da PVT in cui si allega regolare fattura e pretesa di pagamento!!! :D :D

:cry: :cry: :cry: :D :D :D
cionci
10-06-2003, 12:32
Originally posted by "damar3"

Grazie a tutti per l'aiuto. Siete stati veramente molto gentili. Però avrei un altro piccolo dubbio, usando il codice postato da cianci mi rileva fino alla COM4 porta che io non ho. Come fare per "correggere" questo problema?
cionci please ;)

Guarda in Gestioen periferiche se le hai.. Molte volte sono installate anche se non esistono... Poi se hai un modem interno anche lì puoi avere una COM...
cionci
10-06-2003, 12:33
In effetti anche a me le riporta...strano... Prova con il codice di Maxithron...
maxithron
10-06-2003, 12:45
Originally posted by "cionci"

In effetti anche a me le riporta...strano... Prova con il codice di Maxithron...

Io come dicevo non ho potuto compilarlo fina ad ora perchè sono sotto linux e quindi non so se funziona anche perchè sono andato un pò a memoria.

Prova quel codice oppure ricopia il codice presente nei link.