Discussion :

[Jamming Ed]

Bonjour à tous,
Pour un projet en vba sous Access 2003, j'ai besoin de la dll Zlib (que j'utilise avec les classes très utiles d'Andrew McMillan) pour décompresser des fichiers. Le problème que je rencontre est qu'à l'execution de ce code...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
If zip.OpenZip(ZipPath) Then
      If Not zip.Extract("c:\Doctemp\", True, True) Then
        MsgBox "Extraction des fichiers Impossible", vbCritical
   End If
   zip.CloseZip
Else
        MsgBox "Impossible d'ouvrir" + ZipPath, vbCritical
End If

... impossible de décompresser, et m'affiche tout le temps cette Msgbox désespérante "Extraction des fichiers impossible".

Comme je n'arrivais pas à résoudre le problème, j'ai téléchargé un projet de démo écrit par Andrew MacMillan pour illustrer le fonctionnement de ses classes (sous VB6.0) et là, ôh stupeur, le problème est le même. Après avoir creusé la question à coup de debugger, le problème se situe ici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Public Property Get ZLibVersion() As String
 
   On Error GoTo eh
 
   ZLibVersion = PointerToString(ZLibVer)
 
Exit Property
eh:
 
   RaiseEvent ZipError(zeZLibNotInstalled, "Zlib is not installed")
 
End Property

... il se produit toujours, une erreur déclenchant l'évenement ZipError "Zlib is not installed".

J'ai pourtant vérifié : la lib se trouve bien dans le même répertoire. Par sécurité je l'ai quand même copiée dans c:\windows\system32 mais rien n'a changé.

Est-ce que quelqu'un a déjà rencontré ce type de problème ?

Merci beaucoup pour votre aide

[ouskel'n'or]

As-tu vérifié qu'elle était validée dans l'éditeur VB, Outils, Références... ?

[Jamming Ed]

Bien justement... je viens de vérifier et quand je clique sur parcourir et que j'essaie d'ajouter cette dll j'ai un message qui me dit : "Impossible d'ajouter une référence au fichier spécifié"

Cependant, j'ai déjà utilisé des dll avec VB (ecrite en C par mes soins cette fois-ci) , et il ne me semble pas avoir eu à faire cette manip... et pourtant ça marchait bien : Est-elle vraiment nécessaire ?

[Jamming Ed]

Hum Hum...
Je viens de trouver le problème. C'est un peu **** me direz-vous (et vous aurez sûrement raison)

Voilà : Mon poste est utilisé par plusieurs personnes. Or quelqu'un a réinstallé Windows sur une deuxième partition (sans le dire) : Du coup quand j'ai installé la Lib dans \windows\system32 c'était dans la mauvaise partition.

Par contre, je ne comprend toujours pas pourquoi la copie de la lib se trouvant dans le répertoire du projet ne fonctionne pas... Mais bon, ça marche, on va pas se plaindre
Merci pour l'aide !

[shainna]

Ah lalalalala cette dll m'en aura fait voir

En faite pour la rajouter tu vas dans option je crois complement ressource tu rajoute ta dll

et vala elle est consideré comme resource de l'exe.

Sinon moi j'avais changé le code au lieu de if ...... then

j'ai mit test= "code"

msgbox""

Vala