LECTURE / ÉCRITURE SUR LE PORT PARALLÈLE FACILEMENT AVEC INPOUT32.DLL

cs_johndave Messages postés 35 Date d'inscription jeudi 4 octobre 2007 Statut Membre Dernière intervention 2 juin 2015 - 15 déc. 2008 à 19:54
mod77 Messages postés 1273 Date d'inscription vendredi 10 juillet 2009 Statut Membre Dernière intervention 14 janvier 2024 - 10 déc. 2012 à 18:15
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/48716-lecture-ecriture-sur-le-port-parallele-facilement-avec-inpout32-dll

mod77 Messages postés 1273 Date d'inscription vendredi 10 juillet 2009 Statut Membre Dernière intervention 14 janvier 2024
10 déc. 2012 à 18:15
Bonjour,
Je viens de récupérer le zip mais je ne vois rien qui me permet d'exécuter le programme. Que faut-il que je fasse SVP?
VBsearch Messages postés 50 Date d'inscription jeudi 21 juillet 2005 Statut Membre Dernière intervention 22 août 2009
11 juil. 2009 à 02:28
Bonjour
La fonction de conversion "bin_dec" retourne des valeurs in correctes.
Voici le code correct:

Public Function bin_dec(binStr As String) As Integer
Dim I As Integer, sInt%, Result%
Result = 0
sInt = Len(binStr)
For I = 0 To sInt
If Mid(binStr, I + 1, 1) = "1" Then
Result = Result + 2 ^ (sInt - I - 1)
Else
End If
Next I
bin_dec = Result
End Function
Essaie ce code et fais-moi signe .........
Moritus Messages postés 130 Date d'inscription jeudi 22 décembre 2005 Statut Membre Dernière intervention 23 novembre 2011
15 déc. 2008 à 22:13
j'avais pas jugé bon de mettre un exe c'est pour ca
cs_johndave Messages postés 35 Date d'inscription jeudi 4 octobre 2007 Statut Membre Dernière intervention 2 juin 2015
15 déc. 2008 à 19:54
Quand tu envoies un exe, change toujours l'extension afin que cet exe ne soit pas supprimé automatiquement. Ex: "mon_pplication.exe" en "mon_application.ex_"
Rejoignez-nous