TESTEUR POUR PORT PARALLÈLE

amezghal Messages postés 385 Date d'inscription lundi 27 février 2006 Statut Membre Dernière intervention 21 août 2015 - 16 mars 2006 à 13:56
descartessnell Messages postés 3 Date d'inscription dimanche 19 juin 2011 Statut Membre Dernière intervention 14 août 2015 - 26 août 2013 à 21:10
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/36552-testeur-pour-port-parallele

descartessnell Messages postés 3 Date d'inscription dimanche 19 juin 2011 Statut Membre Dernière intervention 14 août 2015
26 août 2013 à 21:10
c'est meilleur code sur vb6 pour port lpt que j'ai rencontré bravo man
vbkarraywalid Messages postés 13 Date d'inscription mercredi 15 mars 2006 Statut Membre Dernière intervention 10 juillet 2006
17 nov. 2009 à 17:58
dsl akisvb car g pa d'autres trucs de ce genre, en faite g réalisé ce programme juste pour pour la curiositée et le plaisir lorsk g t au secondaire en plus la programmation hardware n'est pa mon domaine, aprés tt je ne developpe plus utilisant les outils Windows, en faite j'ai migré à Linux il ya ~2 ans...... dieu merci !!!
Ahujourd'hui mon centre d'interet et pour la conception des applications web et services web sous PHP5, Symfony, JAVA Glassfish ESB, BPEL..(monde SOA) si vous êtes interssé par c trucs n'hesiter pa à me contacter.

voici mon e-mail: walid.karray@gmail.com
akisvb Messages postés 20 Date d'inscription mardi 24 février 2009 Statut Membre Dernière intervention 8 novembre 2011
17 nov. 2009 à 16:57
t as pas d autres trucs ...? en com1 par exemple...si oui envoie ..exe... pas sources a games@olybos.com ...il payent assez bien ces progs....mon contact NTEL2@hotmail.com..encore bravo...
vbkarraywalid Messages postés 13 Date d'inscription mercredi 15 mars 2006 Statut Membre Dernière intervention 10 juillet 2006
17 nov. 2009 à 15:29
merci akisvb !!!
akisvb Messages postés 20 Date d'inscription mardi 24 février 2009 Statut Membre Dernière intervention 8 novembre 2011
17 nov. 2009 à 14:02
Un seul mot...BRAVO...11/10!!!! travail pro!
vbkarraywalid Messages postés 13 Date d'inscription mercredi 15 mars 2006 Statut Membre Dernière intervention 10 juillet 2006
26 août 2009 à 13:19
merci ;-)
Utilisateur anonyme
26 août 2009 à 11:21
Cette source m'as ouvert les yeux sur un nouveau monde xD .. 10/10 ...
cs_aminexy Messages postés 6 Date d'inscription samedi 6 août 2005 Statut Membre Dernière intervention 19 octobre 2006
19 oct. 2006 à 21:11
salut
oui j'ai déjà copié le input32.dll dans le system32, et j'utilise le LPT pour commander des relais, mais pour ce prog le probleème persiste encore ça plante à tous les coups
ya t'il une autre possibiliter de le faire marcher bien que lorsque ça plante le debuggeur de Visual Studio se lance, et j'arrive pas à gérer
merciiii pour votre aide
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
19 oct. 2006 à 18:34
es-ce que tu a copier le fichier input32.dll dansle repertoire \windows\system et \windows\system32? parce que si cest pas le cas ca va planter a tout les coups...

pour le commentaire qui dit que tu deteste le win9x bien moi je replique que win9x permet d'avoir un windows leger qui entre dans un disque dur de 500meg, de rouler un reseau sans fil donc de pouvoir fabriquer un robot qui contient un ordi sans devoir metre un 40gig pis qu'il finisse par casser(la je parle du disque dur bien sur) a cose des vibrations coser par le deplacement(si un disque dur des 500meg brise on s'en fou mais si un disque dur de 40gig ou plus casse ca commence a etre dramatique)...

bref pour fais de l'ordi un win9x cest pas fameux mais pour faire de la robotique cest parfais..
cs_aminexy Messages postés 6 Date d'inscription samedi 6 août 2005 Statut Membre Dernière intervention 19 octobre 2006
19 oct. 2006 à 18:25
salut merci pour le prog
j'ai un souci avec quand je le lance VB6 plante et j'arrive plus à utiliser le prog
vbkarraywalid Messages postés 13 Date d'inscription mercredi 15 mars 2006 Statut Membre Dernière intervention 10 juillet 2006
17 juil. 2006 à 17:59
je deteste win9x
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
11 juil. 2006 à 03:19
sauf si l'utilisateur use de windows 98 ou windows 95. dans cest cas la il faux copier le fichier input32.dll dans le repertoire system et non system32.

cest pour ca que le batch files que je sugere copy le fichier au 2 endroit(failsafe)...
vbkarraywalid Messages postés 13 Date d'inscription mercredi 15 mars 2006 Statut Membre Dernière intervention 10 juillet 2006
10 juil. 2006 à 16:20
il vous suffit donc de copier input32.dll dans system32
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
8 juil. 2006 à 05:05
Sur le bureau fais toi un nouveaux fichier text.

y inscrire les lignes suivantes(entre les ligne):
_____________________________________________________________

copy lepathdufichier\inpout32.dll windrive:\winpath\system
copy lepathdufichier\inpout32.dll windrive:\winpath\system32
_____________________________________________________________

"lepathdufichier" est le répertoire ou le fichier "inpout32.dll" est contenue...

le "windrive" est le lecteur qui contient windows

le "winpath" le repertoire qui contien le windows...

finalement sauver/quitter

renomer le fichier en temp que "nomdetonchoix.bat"

et execute.

ca devrai allez
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
8 juil. 2006 à 04:50
---------------------------->Correctif<--------------------------
t'a probablement je pas copier le fichier "inpout32.dll" dans ton windrive:\windowspath\system & windrive:\windowspath\system32
essaye et donne des nouvelles...

good day
-----------------------------------------------------------------
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
8 juil. 2006 à 04:49
t\a probablement je pas copier le fichier "inpout32.dll" dans ton windrive:\windowspath\system & windrive:\windowspath\system
essaye et donne des nouvelles...

good day
guardian01 Messages postés 9 Date d'inscription dimanche 27 juillet 2003 Statut Membre Dernière intervention 10 juin 2006
10 juin 2006 à 16:06
Bonjour à tous

J'ai un petit souci, quand je'execute le prog,
j'ai l'erreur Erreur d'execution 'S3' fichier introuvable : inpout32.dll

Alors que tout parrait etre correct

merci à tous de vos réponses par avance

Guardian
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
29 mai 2006 à 16:47
pas Bx(i) = 1 - Bx(i) jste
Bx(i) = - Bx(i)
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
29 mai 2006 à 16:45
pas besoin de mettre le 1 - tu peux juste fais -
Nicopika Messages postés 10 Date d'inscription samedi 5 février 2005 Statut Membre Dernière intervention 1 mai 2006
29 mai 2006 à 13:52
et encore plus simple :

Bx(i) = 1 - Bx(i)

++
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
24 mai 2006 à 20:04
'-------->Correctif<--------
'ou plus simple encore

'-text1.text
'-command1

Private Sub Command1_Click()
Text1.Text = Str(-(Int(Not _
(CBool(Val(Text1.Text))))))
End Sub


Private Sub Form_Load()

Text1.Text = "0"

End Sub

'|Frédéric Plante |Québec |
'|f_j_plante@hotmail.com |
'|24/mai/2006
'-------->Correctif<---------
frederios Messages postés 125 Date d'inscription mardi 21 septembre 2004 Statut Membre Dernière intervention 9 décembre 2006
24 mai 2006 à 19:53
'ou plus simple encore

'place un text1.text & un command1

Private Sub Form_Load()

Text1.Text = "0"

End Sub

Private Sub Command1_Click()

Text1.Text = Str(Int(Not (CBool(Val(Text1.Text)))))

End Sub

'|Par Frédéric Plante |Québec Canada |2006 |f_j_plante@hotmail.com |
zangara Messages postés 3 Date d'inscription mardi 8 mars 2005 Statut Membre Dernière intervention 10 avril 2006
10 avril 2006 à 13:50
pour inverser un "1" en "0" ou inversement.. un p'tit truc
(je reprends ta variable)

bx(i)=(bx(i)-1)^2

à la place de..

If Bx(i) = 1 Then
Bx(i) = 0
GoTo 20
End If
If Bx(i) = 0 Then
Bx(i) = 1
GoTo 20
End If
20 Rem

ça évite les IF.....
Egyde Messages postés 158 Date d'inscription lundi 17 mai 2004 Statut Membre Dernière intervention 16 juillet 2007
16 mars 2006 à 18:36
Tiens? Encore un "programme très important". Ça me rappelle la description d'un prog d'amezghal...
amezghal Messages postés 385 Date d'inscription lundi 27 février 2006 Statut Membre Dernière intervention 21 août 2015 5
16 mars 2006 à 13:56
Joli travail je vais l'analiser
Rejoignez-nous