begin process at 2012 02 11 08:03:52
  Trouver un code source :
 
dans
 

8 commentaire(s) de goguys sur des sources sur tout CodeS-SourceS

Déposé sur Analyseur de plasma (utilisation de mscchart)

Je pense avoir trouvé quelquechose qui pourrai t'intéresser.
Normalement tu as du installer sur ton PC l'application "pci-1002_win2k.exe". Cette installation a placé la DLL "P100X.DLL" à l'emplacement : "C:\DAQPro\PCI-1002_WIN2K\Driver". Il y a également d'autres fichiers comme le fichier *.ocx (Contrôle ActiveX) que je ne connais pas du tout.
Il y a pas mal d'info ici -> http://www.icpdas.com/download/pci/1002/
Tu y trouveras les manuels d'utilisation hard et soft (que tu dois déjà avoir), les drivers de ta carte en fonction de ton SE mais surtout des exemples en VB6 utilisant cette DLL -> http://ftp.icpdas.com/pub/cd/iocard/pci/napdos/pci/pci-1002/dll_ocx/demo/
Si vraiment tu ne t'en sors pas, n'hésite pas à contacter le fournisseur de la carte, en général ils sont assez serviables surtout si ton projet aboutit et que ça leur permet de revendre d'autres cartes par la suite.
Posté le : 25/04/2006 14:37:44

Déposé sur Analyseur de plasma (utilisation de mscchart)

Normalement tu dois avoir une DLL fournie avec ta carte? Et des exemples utilisant cette DLL?
Dans mon cas, j'avai une DLL : "pcilabnt.dll" contenant plusieurs fonctions. Tout ça devait être déclaré en début de prog :
---------------------------------------------------------------
' ***  FONCTIONS ANALOGIQUES CARTE ACQUISITION ***
' Entrée analogique - Une valeur, une voie
Private Declare Function Ainf Lib "pcilabnt.dll" Alias "_Ainf@28" (valeur_ad As Single, ByVal voie_ad As Integer, ByVal gain As Integer, ByVal mode_ad As Integer, ByVal exts As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Sortie analogique - Une valeur, une voie
Private Declare Function Aoutf Lib "pcilabnt.dll" Alias "_Aoutf@24" (ByVal valeur_da As Single, ByVal voie_da As Integer, ByVal mode_da As Integer, ByVal exts As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Entrée analogique - Plusieurs valeurs, plusieurs voies (tampon)
Private Declare Function Ainfscan Lib "pcilabnt.dll" Alias "_Ainfscan@48" (ByVal voie_tampon As Integer, ByVal voie_ad As Integer, ByVal n_voies_tampon As Integer, ByVal n_voies_ad As Integer, gains As Integer, ByVal n_val As Long, frequence As Long, ByVal mode As Integer, adata As Single, ByVal ext As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Sortie analogique - Plusieurs valeurs, plusieurs voies (tampon)
Private Declare Function Aoutfscan Lib "pcilabnt.dll" Alias "_Aoutfscan@52" (ByVal voie_tampon As Integer, ByVal voie_da As Integer, ByVal n_voies_tampon As Integer, ByVal n_voies_da As Integer, ByVal n_val As Long, frequence As Long, ByVal tint As Integer, ByVal mode As Integer, polarite As Integer, adata As Single, ByVal ext As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Reset de la carte
Private Declare Function Reset_carte Lib "pcilabnt.dll" Alias "_Reset_carte@16" (ByVal mode As Integer, ByVal ext As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Sorties numériques
Private Declare Function WriteRegister Lib "pcilabnt.dll" Alias "_WriteRegister@8" (ByVal port_out As Integer, ByVal valeur_write As Integer) As Integer

' Entrées numériques
Private Declare Function ReadRegister Lib "pcilabnt.dll" Alias "_ReadRegister@8" (ByVal port_in As Integer, adata As Integer) As Integer
---------------------------------------------------------------

Voilà ça fait 7 fonctions de disponible mais il me semble en avoir utilisé que 2, le reset et l'acquisition d'une entrée analogique.
ça donnait quelquechose dans ce goût là :

---------------------------------------------------------------
Private Sub Command1_Click()

carte = 520 ' Numéro de la carte
adresse = 0
voie_ad = 0
gain = 0
mode_ad = H8010

x = Reset_carte(0, 0, carte, adresse)
x = Ainf(adata(0), voie_ad, gain, mode_ad, 0, carte, adresse)

Label1.Caption = adata(0)

End Sub
---------------------------------------------------------------

ça c'est bien pour un seul point de mesure mais pour faire l'acquisition de plusieurs points à une certaine fréquence, il faut utiliser l'horloge de ta carte et stocker les données dans le tampon sauf si la fréquence d'acquisition est très basse alors elle peut être cadencée par le PC.
mais bon la première question est as-tu une DLL avec ta carte?
Posté le : 24/04/2006 20:24:38

Déposé sur Analyseur de plasma (utilisation de mscchart)

Merci pourquoi? J'ai été obligé de supprimer le prog qui était dans le Zip. J'ai bricolé ce truc là il y a maintenant 2 ans et je n'ai pas retouché au VB depuis, mais si tu as des questions tu peux toujours les poser on ne sait jamais...
Posté le : 24/04/2006 14:39:36

Déposé sur Clavier virtuel style xp

      Bonjour,
      Je trouve ton clavier virtuel plutôt sympa malgré les petits trucs énoncés par azerty25, car franchement ça ne me choque pas de voir l'étoile en dessous de "entrer"! Pour moi c'est des détails, ce qui compte, c'est de comprendre le principe de fonctionnement et à ce niveau pas de problème.
      Sinon, vu que je suis débutant, je peu difficilement de donner des conseils. En tous les cas merci, ça m'a permis de résoudre mon problème (form1.keypreview=true et mes codes claviers qui étaient faux).
      Voila, je ne peux que te féliciter et te souhaiter bonne chance pour la suite. Encore MERCI!!!
Posté le : 10/05/2004 20:02:02

Déposé sur Arborescence rien de plus simple!

C'est vrai ça...
Eh au fait, j'ai fait une nouvelle source (Un peu plus évoluée que celle-ci), elle s'appelle "Analyseur de plasma". J'ai absolument besoin de votre avis, et si possible de quelques solutions à mes problèmes!
MERCI à vous
Posté le : 13/04/2004 19:44:27

Déposé sur Horloge en direct

Merci Zapad. C'est vrai que ça fait pas de mal un peu d'encouragement...

Allez voir ma nouvelle source "Analyseur de plasma" et faites des remarques, si vous avez des solutions à mes problèmes, je suis preneur!
Posté le : 13/04/2004 19:43:33

Déposé sur Arborescence rien de plus simple!

merci apxa de prendre ma défense. ça fait pas un mois que j'essai d'apprendre le vb, TOUT SEUL, et c'est pas facile quand on y connait rien. En plus, c'est pour la bonne cause, c'est pour faire un logiciel médical.
windob, tu dois certainement être un grand homme en prog alors n'hésite pas à répondre aux questions du forum. (certaines sont encore sans réponse) :))
Posté le : 05/04/2004 20:12:22

Déposé sur Horloge en direct

désolé, ça fait même pas un mois que j'apprend seul le vb, j'avai envi de me faire plaisir en mettant au moins une source sur ce site. je ferai mieux pour les prochaines, promi.
Goguys

PS:n'hésitez pas à répondre aux questions posées sur le forum, ça me permettra de progresser. merci
Posté le : 05/04/2004 19:56:40

1


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,218 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales