appel de DLL écrite en C

Question

Bonjour,
J’ai un problème d’appel de DLL écrite en C, dans mon code en VB. pourriez vous m’aider ? ? ?
 Voici mon message d’erreur quand j’exécute mon VB :
Erreur d’exécution ‘453’ : 
Point d’entrée proc d’une DLL introuvable dans  C:\essaiDLL\GEPT.dll

Pour un peu plus de précision, voici mon code en VB :
Dim valeur As Long
' declaration de la DLL
Private Declare Function DLLessai Lib "C:\essaiDLL\GEPT.dll" Alias "proc" _
(ByVal valeur As Long) As Long

Public Sub Command1_Click()
Dim lghDC As Long
valeur = 2
' appel de la DLL
lghDC = DLLessai(valeur)
Text1.Text = lghDC

End Sub

Et le code de la DLL :
//fichier c Gept32.cpp

#define EXPORT __declspec(dllexport)

EXPORT int toto;          /* Valeur calculee par le systeme */

EXPORT int proc(int var)
{//multiplie la variable var par 2
var*=2;
return var;
}

Merci beaucoup pour votre aide :-)
Laet

Amonbofis · Answer

Moi mes deux fichiers contiennent:

MaDLL.h:
//  MaDLL.h
//

typedef unsigned char Byte;
typedef short Integer;
typedef long LONG;
typedef float Single;
typedef double Double;

Integer WINAPI CalcDOBYear (Integer, Integer);   // juste pour les tests

//void WINAPI CenterScreenObject (Integer&, Integer&, Integer, Integer);

et

MaDLL.cpp:
// MaDLL.cpp : Defines the entry point for the DLL application.
//

#include "stdafx.h"
#include "MaDLL.h"

BOOL APIENTRY DllMain( HANDLE hModule, 
                       DWORD  ul_reason_for_call, 
                       LPVOID lpReserved
 )
{
    return TRUE;
}

Integer WINAPI CalcDOBYear (Integer YearNow, Integer Age)      // juste pour les tests
    {
      Integer Retour;

      Retour = YearNow - Age;

      //MessageBox "Yo!";

      return (Retour);

    }

Amonbofis · Answer

J'ai oublié ce fichier:

MaDLL.def:
LIBRARY MADLL

EXPORTS
     CalcDOBYear

Appel de DLL écrite en C

2 réponses

Discussions similaires