28345 j'ai ça Pense à tester seulement après compilation, le résultat n'est pas forcément correct sinon. L'electronique, c'est fantastique. 22/04/2013, 21h04 #17 [HS ON] Ça fait plaisir de ne voir que je ne suis pas le seul à continuer à développer en VB6 [/HS OFF] 22/04/2013, 21h19 #18 Envoyé par malo777 [HS ON] Ça fait plaisir de ne voir que je ne suis pas le seul à continuer à développer en VB6 [/HS OFF] Moi, ça fait 20 ans que j'utilise VB6 et ça me suffit largement. Alors, pourquoi changer de maitresse à mon age! Par contre, il n'évoluera plus. Donc, pour un jeune, il vaut mieux choisir autre chose. PS: Bien qu'avec des milliers de milliards de ligne de code en VB6 dans le monde...... Acquisition données rs232 excel form. il n'est pas prêt de disparaitre des offres d'emploi! Aujourd'hui 23/04/2013, 09h24 #19 sous pic C: printf(" La temperature est:%f", temp); if(kbhit()) { getc();} bien sur apres la formule de calcul de temp, et la declaration des bibliotheques 23/04/2013, 11h24 #20 Bonjour zouzoumou ce qui m'étonne un peu c'est la présence d'une séquence aussi vieille que le minitel dans la ligne d'affichage ( esc [2J) à la fin de chaque relevé.
#1 Le 17/12/2005, à 19:16 récuperation données rs232 via openoffice salut à tous, voilà j'ai un boitier de prises de mesures qui peut se connecter via le port série pour envoyer ses données... à la base j'ai un cd fourni pour windows (evidemment!! ) avec un logiciel qui lance automatiquement excel pour récuperer les données du ulement il est très buggé, très lent mais surtout je suis allergique à windows alors j'ai voulu faire un petit script (très rudimentaire) que je vous copie ici: #! /bin/sh #--script d'acquisition de données du port RS232--# #-- + envoi dans un tableau openoffice --# echo "Appuyer sur Ctrl-C une fois toutes les mesures envoyées... " trap "cut -c4- data >; sed 's/[. Reception de données via rs232 (visual.Basic 6.0). ]/, /gw '; rm -f data; oocalc " SIGINT cat /dev/ttyS0 > data le script fonctionne très bien mais j'aimerais savoir si il est possible de l'integrer à openoffice, sous forme de macros ou je ne sais ne sais pas du tout comment quelqu'un peut m'aiguiller merci d'avance!! ludo. #2 Le 21/04/2006, à 23:48 aznur Re: récuperation données rs232 via openoffice ba je c pas comment sa fonctionne open office je l'utilise que basiquement mais en surfant g trouver sa … eu c du vba comme pour MS office donc sa doi etre assez puissant #3 Le 09/10/2006, à 11:23 Bonjour, je remonte ce topic car j'ai un besoin similaire: je souhaite récupérer des données d'une liaison RS232 d'une balance industrielle vers un tableur Calc que j'ai réalisé.
Sinon, sous console DOS, il est très facile de "détourner" la sortie écran vers un fichier de type texte. Ensuite la récupération du fichier sous Excel est très simple: il suffit d'ouvrir depuis Excel le fichier texte ( il faut un peu le forcer) et de suivre les propositions pour retrouver les données sous forme de colonnes et lignes.. Les manips successives doivent pouvoir être "automatisées" dans un deuxième temps. Il faut d'abord les tester dans le principe.. Acquisition de données sur un port série (RS232). En cas de soucis, il y a ici sur CCM d'excellents spécialistes de VBA. Faute de pratique durant ces dernières années, ce sujet dépasse actuellement mes compétences. =>> Voici la page d'où tu pourras copier le code du programme, il y a également les commentaires des utilisateurs: Bonne chance.. A+ Nyctaclope PS: comment ta balance est-elle reconnue par ton PC ( nature du périphérique? ) Et que se passe-t-il à l'écran quand tu le visualises et que tu appuyes sur "print"?
Il faut par la suite connaitre le procotole de transfert de ton appareil et faire le polotage, c'est le plus complexe. Parfois, le fabricant propose (sur le net) des modules de pilotage avec l'appareil pour programmation en C, Pascal ou VB. En VB, c'est presque comme VBA, c'est mieux. Par expériences, évite de faire des calculs à Excel pendant uen acquisition en rafale, il perd beaucoup de temps à rafraichir une feuille par exemple. Il y a d'autres demandes dans le forum. Bonne recherche. ESVBA 14/08/2010, 13h40 #3 D'accord, je vais chercher de ce côté-là! Recupérer valeur des ports COM (rs232) dans excel - Macros et VBA Excel. Merci pour les renseignements 20/08/2010, 00h02 #4 bonsoir Dam1988 et le forum, j'ai beaucoup trainé mais voici au plus simple ce que j'ai utilisé. Il y a des liens dans le lisemoi, la DLL et le code au plus simple (très très simple). Discussions similaires Réponses: 10 Dernier message: 02/07/2006, 14h26 Réponses: 5 Dernier message: 01/06/2006, 16h41 Réponses: 4 Dernier message: 07/04/2006, 18h08 Réponses: 2 Dernier message: 23/12/2005, 15h11 Réponses: 3 Dernier message: 10/11/2005, 16h09 × Vous avez un bloqueur de publicités installé.
L'application fonctionne sous Windows NT4 et Windows XP (non testée sous Windows Vista, merci de me dire ce qu'il en est... ). N. B. Acquisition données rs232 excel tool. La gestion de la liaison RS232 nécessite l'installation du composant TComPort (la version 2. 64 est suffisante): Téléchargement: Procédure d'installation: Tutorial: Description Une acquisition de température est réalisée toutes les 30 millisecondes. La température retenue est la moyenne des 30 dernières mesures: on réalise ainsi un filtrage numérique qui atténue l'influence du bruit.
'Ces valeurs peuvent être entrées ici (pas très "propre"! ) 'ou dans une procédure d'initialisation (c'est mieux) 'ou dans la propriété "Setting" du contrôle 'L'idéal étant d'offrir à l'utilisateur la possibilité de changer ces valeurs à partir d'un menu "Réglage" 'La balance utilisée dans cet exemple requiert les valeurs suivantes: 1200 bauds, bit de parité, 7 bits de données, bit d'arrêt ttings = "1200, o, 7, 2" ' indique au contrôle qu'il doit lire 1 seul caractère 'ce caractère servira à repérer la stabilisation de la balance putLen = 1 'ouvre le port MSComm1. Acquisition données rs232 excel sheet. PortOpen = True 'Boucle dans le vide tant que le caractère lu n'est pas un signe plus (+) Do While <> "+" Loop 'lecture sur le port des 5 1ers caractères et stockage dans la boite de dialogue et dans la feuille active putLen = 5 ption = = CSng(ption) (1, 0) 'ferme le port MSComm1. PortOpen = False End Sub Dans cet exemple, la balance émet les données en permanence. Le programme lit ces valeurs en recherchant le signe + qui dans ce cas sépare les envois successifs de données.
Sitemap | wwropasx.ru, 2024