[VB]ouverture du port infrarouge pb?

**Malek_BAKLOUTI** · 01/02/2006, 10h55

bonjour,
j'essaie de faire une application pour recevoir des données sur mon pda avec le port infrarouge...

mais voila, il y a un pb et j'arrive pas a le situer... voila le petit code que j'ai mis :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Command1_Click()
       Text1.Text = "commande saisie"
       Comm1.RTSEnable = True
       Comm1.Settings = "115200,n,8,1"
       Comm1.RThreshold = 1
       Comm1.SThreshold = 1
       Comm1.CommPort = 3
       Comm1.InputMode = 1
       Comm1.PortOpen = True
       'Comm1.Output = "AT" & vbCrLf
 
       If (Comm1.PortOpen) Then
           Text1.Text = "port ouvert"
       Else
           Text1.Text = "port non ouvert"
       End If
 
   End Sub

en l'executant, il ne m'ecrit ni port ouvert, ni port fermé?! et il ne me genere aucune erreure?

est ce que vous pouver m'aider svp?

Edit : Penser à mettre les balises pour faciliter la lecture des lecteurs, merci.
Balise code /code ajoutés par ouskel'n'or

**ThierryAIM** · 01/02/2006, 11h42

je suppose que Comm1 est un composant MSComm

Aucun problème chez moi

**Malek_BAKLOUTI** · 01/02/2006, 11h45

oui v'est un controle MSComm....

aparement il se bloque dans Comm1.PortOpen = True ... je ne sais pas qque je dois faire...

je me demande si le port infrarouge du pda est proteger??et si c le cas comment pourrais je le verifier?

**ThierryAIM** · 01/02/2006, 11h48

Verifie le numéro de ton port infrarouge dans le panneau de configuration, je vois pas autre chose

**Malek_BAKLOUTI** · 01/02/2006, 13h05

C'est un pda... j'utilise le "pocket tools" pour voir les ports de mon pda... et en principe c'ets le port com 3...

y a pas une instruction sur le VB qui permet de vori les details du port utilisé?

j'avoue que je suis unpeu perdue!

**Malek_BAKLOUTI** · 01/02/2006, 13h22

bon le port IR a reussi enfin à s'ouvrir...
j'ai du restaurer mon pda.. aparement, comment je lai bidouiller, j'ai peut etre changer sa config ou fait bloquer un de ses port...

voila, j'ai ue autre question...
je veux recevoir les codes de ma telecommande... comment est ce que je pourrais faire ca?? il suffit de lire le port IR c'est tout??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Comm1_OnComm()
    Text1.Text = "recep"
       If Comm1.CommEvent = comEvReceive Then
          nBuff = InBuff & "recep"
          InBuff = InBuff & Comm1.Input
          Text1.Text = InBuff
       End If
End Sub

j'ai fait ca, mais aparement il n'entre meme pas dans cet evenement...

Edit
S'il te plait, pour faciliter la lecture de ceux qui lisent... pense aux balises Code et /Code bouton en haut de la fenêtre sinon tu vas être mal vu...
Balises ajoutées par ouskel'n'or

**Malek_BAKLOUTI** · 01/02/2006, 15h08

j'ai une autre petite question...

l'evenement OnComm est applé lorsque le port infrarouge recoit un signal identifié? ou lorsqu'il recoit n'importe quel signal??

parceque il n'entre jamais dans cette procedure

pourtant, j'envoie bien un code lorsque j'appuye sur un bouton de ma telecommande...

merci

**Malek_BAKLOUTI** · 01/02/2006, 21h16

aparement le pb est que le code envoyé par la telecommande ne suit pas la norme RS232 ( bit de start, parité, bit de stop...) ..

je voulias savoir si avec le MCcomm, je peux recevoir des données bit par bit...

ou bien si vous avez une petite idée sur comme je peux faire pour recevoir les code infrarouga d'une telecommande..
http://scv.bu.edu/GC/shammi/ir/
voici un site ou ils donnent une petite explication sur les protocoles utilisés.

merci

**dbozec** · 01/02/2006, 21h25

Une télécommande n'utilise pas la norme RS-232 mais la norme RC5 (Google power). Ton problème viens très certainement de là.

**Malek_BAKLOUTI** · 01/02/2006, 21h50

oui oui , c'est ce que je disais!

je voulais demander si avec VB on peut recevoir/emettre des signaux IR suivant cette norme?ou bien le MSComm suit tjrs la norme RS232?

**Malek_BAKLOUTI** · 02/02/2006, 13h37

J'ai une autre question :

comment est ce qu'on peut envoyer des données (selon la norme RS232 cette fois) mais a partir du port IRcc d'un pc portable?
c'est le numéro du port que j'arrive pas a trouver...sinon je peux utilise le MSComm

**ThierryAIM** · 02/02/2006, 13h41

Envoyé par Malek_BAKLOUTI

comment est ce qu'on peut envoyer des données (selon la norme RS232 cette fois) mais a partir du port IRcc d'un pc portable?
c'est le numéro du port que j'arrive pas a trouver...sinon je peux utilise le MSComm

Panneau de config ou le Bios

**Malek_BAKLOUTI** · 02/02/2006, 13h52

je ne trouve as

si je vois le gestionnaire des periphériques, je trouve :

SMC IrCC - Fast infrared port( IR module:HP)

je trouve pas de parametre de port comme pour les ports coms...

**ThierryAIM** · 02/02/2006, 14h31

ok, j'ai la même chose, mais j'ai du rebooter le pc, sur un Dell, le port IR s'active dans le bios
Par contre pour l'activer je peus choisir de COM1 à COM4

Tu as regarder dans ton bios, comme je te l'avais dit précédement ?

Sinon, donne moi les adresses de ressources

**Malek_BAKLOUTI** · 02/02/2006, 14h54

hummm.. je ne sais pas comment je vois avec le bios...

Par contre pour l'activer je peus choisir de COM1 à COM4

comment ca?? sur mon laptop ya pas de port com.. donc si je mets COM1, ili va activer le port IR??

Sinon, donne moi les adresses de ressources

d'ou est ce que je peux avori les addresses des ressoureces?

ps :

je my connais pas trop, excuse moi

**ThierryAIM** · 02/02/2006, 14h59

Envoyé par Malek_BAKLOUTI

: d'ou est ce que je peux avori les addresses des ressoureces?

ps :

je my connais pas trop, excuse moi

oui, j'avais remarqué

Panneau de configuration >> gestionnaire de periphérique>> système >>port infrarouge >> SMC IrCC - Fast infrared port : click droit >> propriétes >> onglet Ressources : Plage d'E/S

je crois que j'ai rien oublié

**Malek_BAKLOUTI** · 02/02/2006, 15h05

ya deux plages E/S :

la premiere 03F8-03FF

la deuxieme : 0130-0137

en fait,ce que je veux faire, j'ai fait uen petit application sur mon pda pour envoyer et recevoir des données par le IRda avec le VB.. et pour le tester je voudrais envoyer ou recevoir par mon pc... c'est possible n'est ce pas?

merci encore

**ThierryAIM** · 02/02/2006, 15h50

la premiere 03F8-03FF
>>Port COM1

la deuxieme : 0130-0137
>> port repliqué

Fais tes essais avec le port com1

**Malek_BAKLOUTI** · 02/02/2006, 15h59

lorsque je mets le port 1 il me genere une erreur " numéro de port non valide"...

si je met le port 3, si j'envoie, je recois ( ca doit etre le truc répliqué dont ta parlé!

)

j'ai testé avec tous les port jusqu a 6 et il me dit tout le temps " numéro de port non valide" sauf poru le 3