IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Envoyer commande a carte relai ETH ipx800 [Toutes versions]


Sujet :

VBA Access

  1. #1
    Futur Membre du Club
    Homme Profil pro
    Directeur des systèmes d'information
    Inscrit en
    Décembre 2012
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Lot et Garonne (Aquitaine)

    Informations professionnelles :
    Activité : Directeur des systèmes d'information
    Secteur : Transports

    Informations forums :
    Inscription : Décembre 2012
    Messages : 10
    Points : 8
    Points
    8
    Par défaut Envoyer commande a carte relai ETH ipx800
    bonjour

    J'essai d'envoyer des commandes a une carte relai. j'ai fait un petit script qui marche mais je pense qu'il y a plus simple et surtout plus rapide en execution , peut etre sans ouvrir IE. C'est une commande ouverture fermeture d'un relai pour simuler une impulsion sur un bouton.



    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
    19
    20
    21
    22
    23
    24
    25
    Function EnvoyerImpuls() As Boolean
     
        Dim strInput As String
        Dim IE As Object
        Dim delay As Double
     
        delay = 1
        Start = Timer + delay ' pour 1 seconde
     
        Set IE = CreateObject("InternetExplorer.Application")
        strInput = ("http://192.168.1.204/preset.htm?led1=1")
         IE.navigate strInput
        IE.Quit
     
        While Timer < Start
                DoEvents
        Wend
     
        Set IE = CreateObject("InternetExplorer.Application")
        strInput = ("http://192.168.1.204/preset.htm?led1=0")
        IE.navigate strInput
        IE.Quit
     
     
    End Function

  2. #2
    Membre habitué
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    Novembre 2009
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : Industrie

    Informations forums :
    Inscription : Novembre 2009
    Messages : 97
    Points : 131
    Points
    131
    Par défaut
    Salut Shodan47,

    Amateur de domotique?
    Il existe de nombreuses solutions logicielles afin de gérer efficacement une carte IPX.
    Je fais notamment parti du groupe de développement du logiciel libre et open source HomiDom en tant que designer. Le logiciel te permet de concevoir de nombreuses interfaces (Client lourd Windows, interface web, Android...) et de gérer les cartes IPX grâce aux nombreux drivers et protocoles supportés. De plus la communauté est très réactive.
    http://www.touteladomotique.com/foru...forum.php?f=44

    Access peut être utile pour analyser les données de capteurs de températures par exemple, mais il est loin d’être adapté au développement d'une interface avec ton système domotique...

    Donc pourquoi réinventer la roue avec un programme VBA?
    Labor omnia vincit improbus (Un travail opiniâtre vient à bout de tout)


    Vous vous posez une question? Quelqu'un se l'est certainement posée avant vous!
    Avant de poster, n'oubliez pas de consulter les FAQ Access et VBA ainsi que les tutoriels.
    Utilisez le champ de recherche sans modération pour fouiller les forums.

  3. #3
    Futur Membre du Club
    Homme Profil pro
    Directeur des systèmes d'information
    Inscrit en
    Décembre 2012
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Lot et Garonne (Aquitaine)

    Informations professionnelles :
    Activité : Directeur des systèmes d'information
    Secteur : Transports

    Informations forums :
    Inscription : Décembre 2012
    Messages : 10
    Points : 8
    Points
    8
    Par défaut
    Citation Envoyé par mc.schmer Voir le message
    Salut Shodan47,

    Amateur de domotique?
    Il existe de nombreuses solutions logicielles afin de gérer efficacement une carte IPX....
    Bonjour

    Oui amateur de domotique. J'ai actuellement un serveur Homesser + une appli iphone trés complète qui gère tout, lumière, volet, arrosage, moteurs piscines, télé, alarme etc ... J'utilise RFXcom, plusieurs IPX, du zwave, du X10, 1-wire, irtrans ... Tout fonctionne tres bien,
    J'ai meme devellopé tout un module sur "touteladomotique.com" basé sur une carte IPX avec un script qui permet de gérer les volets somfy, avec une carte montée en parralèle de deux circuits de telec multicanaux. Le systeme permet de contourner le problème des volets somfy avec les codes propriétaires et de gerer 10 volets pour - de 300 euros !!! 30 euros par volet, tu n'as meme pas un module X10 a ce prix la.


    Pour ce qui est d'access , j'utilise depuis des années et j'ai des applis trés lourdes en multipostes, avec des tables de plusieurs dizaine de milliers d'enregistrement ,mais pour la première fois je suis sorti du tout access (je ne suis pas programmeur d'ou l'utilisation d'access) et j'ai interfacé certaines applis avec du mysql sur mon serveur pour avoir des applis utillisablent via le web qui fonctionne tres bien.... je sais je m'égare mais c'est juste pour t'expliquer pourquoi mettre de la domotique dans access. Les scripts d'homesser sont ecrite avec VB donc pourquoi pas commander de la domotique via VBA directement ....

    Au plaisir et merci de ton intervention

  4. #4
    Membre habitué
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    Novembre 2009
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : Industrie

    Informations forums :
    Inscription : Novembre 2009
    Messages : 97
    Points : 131
    Points
    131
    Par défaut
    Je comprend ton raisonnement, et je comprend également ce que l'on ressent lorsqu'il s'agit de "made by myself"...

    Voici une piste:
    http://www.developpez.net/forums/d95...uete-http-vba/

    Amicalement
    Labor omnia vincit improbus (Un travail opiniâtre vient à bout de tout)


    Vous vous posez une question? Quelqu'un se l'est certainement posée avant vous!
    Avant de poster, n'oubliez pas de consulter les FAQ Access et VBA ainsi que les tutoriels.
    Utilisez le champ de recherche sans modération pour fouiller les forums.

  5. #5
    Futur Membre du Club
    Homme Profil pro
    Directeur des systèmes d'information
    Inscrit en
    Décembre 2012
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Lot et Garonne (Aquitaine)

    Informations professionnelles :
    Activité : Directeur des systèmes d'information
    Secteur : Transports

    Informations forums :
    Inscription : Décembre 2012
    Messages : 10
    Points : 8
    Points
    8
    Par défaut
    Citation Envoyé par mc.schmer Voir le message
    Je comprend ton raisonnement, et je comprend également ce que l'on ressent lorsqu'il s'agit de "made by myself"...

    Voici une piste:
    http://www.developpez.net/forums/d95...uete-http-vba/

    Amicalement
    Bonsoir...
    Plus qu'une piste c'est juste une solution simple en fait j'utilise ca dans homesser et d'ailleurs c'est dans le script que j'avais publié sur 'touteladomotique', mais j'avais oublié de référencer winHTTP services

    Merci pour ce petit rincage de neurones

    Dès que j'ai un peu de temps je vais regarder votre projet domotique car le made by myself c 'est bien, mais encore mieux dans une communauté. seul on fait pas grand chose.... la preuve

  6. #6
    Membre habitué
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    Novembre 2009
    Messages
    97
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : Industrie

    Informations forums :
    Inscription : Novembre 2009
    Messages : 97
    Points : 131
    Points
    131
    Par défaut
    Content d'avoir pu rendre service!

    Au fait, ça a l'air d’être une belle installation tout ça...
    Moi je débute encore en domotique, je n'utilise que du RFXTRX couplé à des modules chacon.

    Au plaisir de te relire.

    Amicalement.

    PS: Pense à marquer le sujet comme RESOLU.
    Labor omnia vincit improbus (Un travail opiniâtre vient à bout de tout)


    Vous vous posez une question? Quelqu'un se l'est certainement posée avant vous!
    Avant de poster, n'oubliez pas de consulter les FAQ Access et VBA ainsi que les tutoriels.
    Utilisez le champ de recherche sans modération pour fouiller les forums.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Commander une carte relais à partir de VB
    Par boboch dans le forum VB 6 et antérieur
    Réponses: 7
    Dernier message: 27/01/2012, 08h51
  2. Envoyer commandes AT via un port USB
    Par mlepretre dans le forum Débuter
    Réponses: 13
    Dernier message: 19/09/2008, 16h36
  3. [Win - visual] Commander une carte IEEE 488
    Par LaDy_JeDi dans le forum C++
    Réponses: 13
    Dernier message: 08/07/2008, 17h02
  4. Commander une carte d'aquistion 'port isa'
    Par samia_6 dans le forum MATLAB
    Réponses: 2
    Dernier message: 26/09/2006, 16h36
  5. commander une carte fax via access
    Par dpie dans le forum Access
    Réponses: 5
    Dernier message: 09/09/2005, 17h20

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo