Discussion :

[dcanl]

Bonjour !

J'ai bien regardé ceci (dll sans référencement) : http://arkham46.developpez.com/artic...usewheelnoreg/ et je l'ai appliqué à mon application Access 2000.

Ca marche nikel sur les PC équipés d'office 200, XP ou 2003, mais sur un pc où n'est installé "que" Access (sans les autres programmes office) ou "que" le runtime Access, ben la dll n'est pas trouvée par l'application.
Message "Fichier introuvable", alors que le chemin d'accès est le bon (testé par un msgbox avant le chargement de la dll). J'ai essayé aussi en mettant cette dll dans system32... mais pas mieux !

Donc ça m'embête, c'est tellement pratique la roulette pour faire défiler verticalement dans les formulaires !

Du coup je me suis penché sur cette dll (nécessite un référencement) : http://arkham46.developpez.com/artic...ss/mousewheel/

Je ne l'ai pas testé, parce qu'elle nécessite un référencement... Et vu que mon application Access sera distribuée à de multiples utilisateurs pas forcément administrateurs de leur machine, ben ça va poser problème non ?

Auriez-vous un coup de pouce à me donner ?

Merci !

@ bientôt !

[Arkham46]

bjr,

je n'ai que Access 2003 (Win XP) et ça fonctionne
pas testé avec le runtime mais je ne vois d'oû ça peut venir....

[dcanl]

bjr,

je n'ai que Access 2003 (Win XP) et ça fonctionne
pas testé avec le runtime mais je ne vois d'oû ça peut venir....

Snif, ben moi ça marche pas ! C'est bizarre quand même, parce que cette dll n'a besoin de rien d'autre que d'elle-même !

Et j'ai testé toutes les combinaisons possibles (avec office, sans office, avec access, avec runtime etc...) sous Windows 2000 SP4, Windows XP Pro, Windows XP familiale, Windows 2003 server !!!
A chaque fois, le fichier n'est pas trouvé s'il n'y a que access ou que le runtime ! Par contre avec Office, ça marche !

[Arkham46]

oui normalement il n'y a rien besoin d'autre que la dll

quel-est le code que tu utilises?

[dcanl]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Declare Sub MouseWheelHook Lib "MouseWheelDVPNoReg.dll" _
         (ByVal pHwnd As Long, ByVal pScrollForm As Boolean)
Private Declare Sub MouseWheelUnHook Lib "MouseWheelDVPNoReg.dll" _
         (ByVal pHwnd As Long)
Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" _
         (ByVal lpLibFileName As String) As Long
 
Private Sub Form_Open()
    LoadLibrary Left(CurrentDb.Name, Len(CurrentDb.Name) - Len(Dir(CurrentDb.Name))) & "\MouseWheelDVPNoReg.dll"
    MouseWheelHook Me.Hwnd, True
End Sub

J'ai repris exactement le même code !!
La dll est dans le répertoire de l'application, au bon endroit !

[Tofalu]

Remplace voir :

Left(CurrentDb.Name, Len(CurrentDb.Name) - Len(Dir(CurrentDb.Name)))

Par CurrentProject.Path

[dcanl]

Déjà essayé, ça fait pareil !

[Copernic09]

Ouep, je suis intéressé moi aussi... Bizare, sachant que la dll est totalement indépendante du reste !

[dflamme]

bonjour à tous
j'ai exactement le même pb et je dois diffuser mon appli donc pas possible d'utiliser la dll avec référencement (qui fonctionne d'ailleurs)
si vous avez du nouveau, je suis preneuse
merci

[dcanl]

bonjour à tous
j'ai exactement le même pb et je dois diffuser mon appli donc pas possible d'utiliser la dll avec référencement (qui fonctionne d'ailleurs)
si vous avez du nouveau, je suis preneuse
merci

Bonjour !

Et non, pas de nouveau... C'est bien dommage, j'ai du supprimer toutes les lignes ajoutées pour la prise en compte de la dll. Du coup, pas de roulette !

On n'a pas trouvé de solution...

@+

[Arkham46]

Bonjour,

A ceux qui ont eu des soucis avec la dll MouseWheelDVPNoReg :

Pouvez vous tester les deux versions de dll que j'ai mises dans ce message :
cf ici : http://www.developpez.net/forums/sho...d.php?t=286607

Et pour info, quel est le type de processeur (si vous le connaissez...)
J'ai testé sur intel, amd, windows 2000, XP, access 2003,97 , ...) et ça marche à chaque fois chez moi, je sèche...

[dcanl]

En attendant d'avoir le temps de re-tester tes dll, je te donne mon processeur au moment des tests (parce que depuis, j'ai changé) : P4 celeron 1,7GHz, Windows XP, testé aussi sous Windows 2003 Server et Windows 2000 SP4 avec Access XP et 2003 (et il me semble que lors d'un test avec Access 2007, il y avait le même problème mais je ne pourrais pas être catégorique).

@+

[dflamme]

bonjour,
j'ai enfin pu tester les nouvelles dll et ça ne fonctionne toujours pas
pour info, caractéristiques du PC sur lequel ça ne fonctionne pas :
XP Home Edition, Intel P4, Access 2003
as-tu du nouveau Arkham46 ????
merci
Dom

[dcanl]

Ah oui j'avais oublié ça... Bon, je viens de tester également, et pas de surprise, ça marche pas !

[Arkham46]

Bonjour,

Un grand merci à tous les deux d'avoir testé.
Vu que ça ne marche toujours pas et que je n'ai rien trouvé sur ce problème, j'ai fait une petite dll de test.
http://arkham46.developpez.com/fichi...PNoReg_ter.zip

C'est la même que la précédente mais j'ai ajouté un message à l'activation, un à la désactivation, et un message lorsque qu'on essaie de déplacer le formulaire.
Si vous pouviez essayer avec celle-ci et me dire si vous voyer ces messages ce serait sympa.
Si vous n'avez aucun message alors je sèche.
Par contre si vous voyez les messages alors c'est que au moins le code de la dll est exécuté, il faudra peut-être se tourner vers un "problème" de souris.

[dflamme]

bonjour,
je viens de tester la nouvelle dll, voila le résultat :
- sur le PC où l'ancienne dll fonctionne, je vois bien les messages (activation, déplacement, désactivation....)
- sur le PC où ça ne fonctionnait pas, je ne vois aucun message
Arkham46 tu parles d'un éventuel pb avec la souris, de quoi s'agirait-il ??????
merci

[Arkham46]

bonjour,
je viens de tester la nouvelle dll, voila le résultat :
- sur le PC où l'ancienne dll fonctionne, je vois bien les messages (activation, déplacement, désactivation....)
- sur le PC où ça ne fonctionnait pas, je ne vois aucun message

Zut ça m'arrange pas ...
Là où je suis ennuyé c'est qu'il n'y a même pas un message d'erreur lors de l'appel aux fonctions de la dll.
Et la fonction de chargement de la librairie elle renvoit quoi?

Code :

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

1
2
 
MsgBox LoadLibrary(Left(CurrentDb.Name, Len(CurrentDb.Name) - Len(Dir(CurrentDb.Name))) & "\MouseWheelDVPNoReg.dll")

Normalement ça doit renvoyer un nombre supérieur à 32.

Arkham46 tu parles d'un éventuel pb avec la souris, de quoi s'agirait-il ??????
merci

J'avais éventuellement pensé à une configuration de souris qui n'utilise pas le même message lors de l'utilisation de la molette...mais c'est donc pas ça...

[dflamme]

je viens de tester
le PC sur lequel ça marche renvoit une valeur > 157000000
l'autre me renvoit la valeur 0

[Arkham46]

je viens de tester
le PC sur lequel ça marche renvoit une valeur > 157000000
l'autre me renvoit la valeur 0

Merci,
donc la dll ne se charge pas mais le code retour 0 n'explique pas grand chose.

Reste un truc à essayer. : ouvrir la dll avec Dependency Walker
J'ai chez moi un warning sans importance sur EFSADU.dll et sur MPR.dll.
Peut-être y a-t-il une dll manquante sur les pc sur lesquels ça ne marche pas?

Mais alors là où je ne comprend vraiment pas c'est que si la dll ne se charge pas (loadlibrary renvoit 0), alors lors de l'appel aux fonctions MouseWheelHook et MouseWheelUnHook devrait renvoyer un message d'erreur.

[dflamme]

merci de ton aide
mais je ne comprends pas ce que je dois faire avec Dependency Walker....