(elkportnt)communiquer avec le port parallèle v3.1

Soyez le premier à donner votre avis sur cette source.

Vue 20 204 fois - Téléchargée 3 952 fois

Description

Communiquer facilement avec le port parallèle(Windows98/ NT /2000/XP/2003/Vista).
ElkPortNT est une librairie dynamique qui permet de communiquer directement avec les ports de votre PC,et particulièrement le port parallèle, et de piloter les broches de ce dernier pin par pin à partir de votre logiciel de programmation.
ElkPortNT communique avec les ports grâce à un driver(Pilote) conçus spécialement pour elle.

Source / Exemple :


Public Declare Function InitializeElkPort Lib "ElkPortNT.dll" () As Boolean
Public Declare Sub CloseElkPort Lib "ElkPortNT.dll" ()
Public Declare Sub RemoveElkPortDriver Lib "ElkPortNT.dll" ()

'Install le driver pour un Compte administrateur ou limité
Public Declare Sub InstalElkPortDriver Lib "ElkPortNT.dll" ()

Public Declare Function ReadByte Lib "ElkPortNT.dll" (ByVal Port As Integer) As Byte
Public Declare Function WriteByte Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Value As Integer) As Boolean

Public Declare Function ReadWord Lib "ElkPortNT.dll" _
(ByVal Port As Integer) As Integer
Public Declare Function WriteWord Lib "ElkPortNT.dll" _
 (ByVal Port As Integer, ByVal Value As Integer) As Boolean

Public Declare Function ReadLong Lib "ElkPortNT.dll" _
(ByVal Port As Integer) As Long
Public Declare Function WriteLong Lib "ElkPortNT.dll" _
 (ByVal Port As Integer, ByVal Value As Integer) As Boolean
 
'**************************************************
'Cas particulier du port parallèle:

Public Enum DataPin
D0 = 0
D1 = 1
D2 = 2
D3 = 3
D4 = 4
D5 = 5
D6 = 6
D7 = 7
End Enum

Public Enum ControlPin
Strobe = 0
Autofeed = 1
Init = 2
Select_In = 3
End Enum

Public Enum StatusPin
Error_ = 3
Select_ = 4
Paper = 5
Ack = 6
Busy = 7
End Enum

Public Declare Function PinData_On Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Pin As DataPin) As Boolean
Public Declare Function PinData_Off Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Pin As DataPin) As Boolean
Public Declare Function Lire_PinData Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Pin As DataPin) As Byte

Public Declare Function PinControl_On Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Pin As ControlPin) As Boolean
Public Declare Function PinControl_Off Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Pin As ControlPin) As Boolean
Public Declare Function Lire_PinControl Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Pin As ControlPin) As Byte

Public Declare Function Lire_PinStatus Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal Pin As StatusPin) As Byte

Public Declare Function Enable_bi_directional_ParaPort Lib "ElkPortNT.dll" (ByVal Port As Integer, ByVal bidirectional As Boolean) As Boolean

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
5
Date d'inscription
vendredi 29 août 2008
Statut
Membre
Dernière intervention
8 mai 2009

projet de communication entre 2 poste sur le port parallele
par powerpoint
Messages postés
1
Date d'inscription
mardi 27 novembre 2007
Statut
Membre
Dernière intervention
28 novembre 2007

La dll est trés pratique. Merci
Messages postés
35
Date d'inscription
mercredi 7 mai 2003
Statut
Membre
Dernière intervention
24 septembre 2012

VbTatish, au lieu de faire ton mariole, quand on veut "tatouiller" du code et qu'on est même pas foutu de bloquer trois povre popup et sourcer un povre script html afin de pêcher le povre lien de download de cette povre dll, il n'est pas nécessaire de mettre un povre commentaire à deux balles!
Si t'es pas content d'avoir du gratuit à peine voilé par deux ou trois javascripts qui t'afffichent des ridicules popups, retournes sur µcro$oft familly busine$$ et ne viens pas nous faire C*I*R ici et E*M*R*ER un bon gars qui nous pose un source bien sympa que tu serai même pas fichu de pondre!
Vous nous empoisonnez plus que les pub-popup, vous les l00serz à deux balles!
Messages postés
1
Date d'inscription
mardi 11 avril 2006
Statut
Membre
Dernière intervention
3 mai 2006

Bravo mon ami! La Pub, c'est l'overdose!
N'est-ce pas le prix du gratuit? A vrai dire, ton fichier.ZIP n'est qu'un lien vers une bousculade de pub qui se veut agressive. C'est en obeissant docilement aux liens pour aller chercher ton.DLL et ton.SYS (Non compris dans ton.ZIP) que je fus agressé par une série de pub qui a complètement bloqué mes utilitaires de téléchargement.
C'est Malin, mais merci tout de même!!
Messages postés
4
Date d'inscription
dimanche 23 février 2003
Statut
Membre
Dernière intervention
4 septembre 2005

Lien pour télecharger la dll:

http://elkhiyar.ifrance.com
Afficher les 13 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.