Curios a écrit:

Comment puis-je faire pour que ce soit la dll présente dans le répertoire de mon application qui soit prise en compte au lieu de la dll présente dans system32

Bonjour, une solution est de déclarer ta fonction sans le chemin et de faire un LoadLibraryA avec le chemin complet (puis un FreeLibrary)

oui déclare ces deux fonctions externes, ensuite avec un LoadLibrary tu pourras spécifier le chemin de ta DLL

// chargement de la DLL
lul_lib = LoadLibrary( "c:\le chemin de la DLL\crypt32.dll" )

// appel de la fonction CryptBinaryToStringA( )
// ...

// déchargement de la DLL
FreeLibrary( lul_lib )

Bonjour,

j'ai mis ces deux fonctions en local Extenal Functions comme ci-dessous:

FUNCTION ulong LoadLibrary(ref string lpLibFileName) LIBRARY  &
      "kernel32.dll" ALIAS FOR "LoadLibraryA"
    
FUNCTION ulong FreeLibrary(ulong hLibModule) LIBRARY "kernel32.dll"

Puis dans mon code dans une fonction nomme stringToBase64 j'ai mis le code:

// the value to be encoded, needs to be 3 char or more (but not 4?)
value = blob(as_motacrypter)  


lul_len = Len(value)
lul_buflen = lul_len * 2
ls_encoded = Space(lul_buflen)
ls_pathdll =  gs_tpu_directory + "\crypt32.dll"

// chargement de la DLL
lul_lib = LoadLibrary(ls_pathdll)

// appel de la fonction CryptBinaryToStringA( )
lb_rtn = CryptBinaryToStringA(value, &
                lul_len, CRYPT_STRING_BASE64, &
                ls_encoded, lul_buflen)
           
// déchargement de la DLL
FreeLibrary( lul_lib )

Mais j'ai une message d'erreur de compilation comme quoi ma fonction CryptBinaryToStringA n'est pas reconnue.
Moi même je ne comprends pas comment powerbuilder peut savoir que ma fonction se trouve dans la dll crypt32 si je ne lui dis pas.


Sinon pour répondre à inferni:
j'ai utilisé ta méthode aussi mais ça ne fonctionne pas et j'ai même essayer de reproduire l'erreur chez moi mais impossible.


Je suis par conséquent toujours au même point.
Je relance une compilation de toutes mes bibliothèques mais je ne penses pas que ça va résoudre quoi que ce soit.

Merci.

Dernière modification par Curios (03-10-2007 12:29:26)

Merci rincevent et les autres,


maintenant j'arrive à compiler mais j'ai toujours la même erreur lorsque je lance l'application sur le serveur.

Je vais essayer de trouver un autre moyen. Je vais voir si l'algorythme n'est pas trop compliqué ou sinon je vais passer par une fonction de la base de données oracle (j'aurais peut être plus de chance).

PS: Je saurais pour mes prochains messages, la balise que je devrais mettre.

Dernière modification par Curios (03-10-2007 13:20:24)

Merci pour ta réponse,

mais je viens de trouver une alternative.
J'ai récupéré la dll que je met dans le répertoire de l'application et que j'ai renommé crypt32AMOI.dll

ensuite je fait appel à cette dll avec la fonction externe:
FUNCTION ulong CryptBinaryToStringA(ulong hLibModule) LIBRARY "crypt32AMOI.dll"

Comme il trouve qu'une dll avec ce nom je n'ai pas de conflit.

Merci pour toutes vos réponses.