bonjour,

J'ai appelé un fichier DLL écrit en C à partir d'une application VB6. la fonction que e veux l’appeler est la suivante:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
short int lire(BOOL Mode, char* tete, char* status, char* adresse, char* nombre, char* donnee);
dans mon application VB6 j'ai essayé de la déclarer et appeler comme suit:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
  Private Declare Function lire Lib "projet.dll" ( _ 
ByVal Mode As Long, _ 
ByVal tete As String, _ 
ByVal status As String, _ 
ByVal adresse As String, _ 
ByVal nombtre As String, _ 
ByVal donnee As String) As Long
 
Const DATA_ARRAY = 129
 
Private Sub Command2_Click() 
 
Dim i As Integer
Dim retour_lire As Long
Dim CData(DATA_ARRAY) As Byte 
Dim buffer(4) As Byte 
Dim a As String
 
retour_lire = lire(True, 3, buffer, "00", "16", CData)
 
For i = 1 To 10 
a = CData(i) 
Next
 
MsgBox a
End Sub

mais malheureusement ce code ne fonctionne pas.

SVP est ce qu'il y a des idées ou propositions?
SVP aidez moi à résoudre ce problème.
et merci d'avance