Choix d'un port COM à partir d'un ComboboxRésolu

Question

Bonjour à vous tous,

Au passage je remercie tous les membres de ce forum.
Ma question pour aujourd hui concerne le choix d'un port com pour communiquer avec un terminal à partir d'une liste prédéfinie avec un Combobox.
voici l'exemple:
Pour ouvrir un port com 'par exemple 1':
MSComm1.CommPort = 1 
si on dispose d'un combobox ayant comme valeur de 1 à 10 :

For i = 1 To 10
    Combo1.AddItem i
  Next

Comment affecter à MSComm1.CommPort le numéro choisi à pertir de Combo1  ???

Merci

cs_Exploreur · Answer

Salut,

Dans la propriété click du combo :

Private Sub Command1_Click()
Dim boucle As Integer
For boucle = 1 To 10
Combo1.AddItem (boucle)
Next boucle
End Sub

Private Sub Combo1_Click()
MSComm1.CommPort = CInt(Combo1.Text)
End Sub

A+
Exploreur

jmfmarques · Answer

Oui...

Je te suggère toutefois (pour travailler plus "proprement") de te servir de
la fonction EnumPorts de la librairie winspool.drv de l'Api de Windows (tu en as un magnifique exemple d'utilisation dans l'API-Guide)

Celà te permettra (sur la machine cliente) d'offrir un choix correspondant aux poorts réellement présents sur la machine concernée. Il te suffira, si tu ne veux garder que les ports COMM, de te débarrasser des autres (LPT, FILE...)

Commence avec celà...

A mon retour (je vais m'absenter pour rendre visite à la capitale de Dimanche (juste après le vote) jusqu'à Jeudi soir.
A monb retour : je te filerai ce que j'ai écrit il y a longtemps pour, en plus, donner la possibilité de modifier la configuration du port choisi)

cs_Exploreur · Answer

Salut ,

Jmfmarques >> Tu m'inpréssionera toujours....lol

A+
Exploreur

cs_casy · Answer

A noter aussi que MsComm, n'est capable de gérer que les ports de 1 à 16, alors que tu eux avoir des ports dont le n° est supérieur à 16 notamment si tu as des connections Bluetooth sur ta machine. Par conséquent si tu utilise EnumPort, il faudra filtrer les ports >16

---- Sevyc64  (alias Casy) ---- # LE PARTAGE EST NOTRE FORCE #

basamir · Answer

Merci les amis, pour le moment je me contente de mettre la solution de Exploreur que je vais tester et si ça marche je passerai à la solution de  [auteurdetail.aspx?ID=615490 jmfmarques] qui semble très interessante du fait qu'on va donner au xlient que les ports com dispo sur sa machine.

je vous tiendrai au courant du résultat.

Merci

basamir · Answer

Merci Explorer ça marche.
[auteurdetail.aspx?ID=615490 jmfmarques]
j'attends ton retour pour me filer le machin

merci à vous tous

cs_Exploreur · Answer

Salut et bonjour à tous,

Ben...Basamir, tu peux faire des recherches sur l'api que t'explique Jmfmarques(si tu as le temps bien sûr)..lol...

Bonne prog

A+
Exploreur

Choix d'un port COM à partir d'un Combobox

7 réponses

Votre réponse

Discussions similaires