On Error Goto avant un Form_Load ?

Question

Salut &#224; tous !

J'ai programm&#233; un logiciel dont l'une des form (en l'occurence la premiere form charg&#233;e) utilise un form transparent disponible avec "Microsoft Form 2.0 Object Library". Comme certains on pu le remarquer, ce composant provoque sur certains PC l'erreur suivante :

"Erreur syst&#232;me & H8007007E (-2147024770) Le module sp&#233;cifi&#233; est introuvale"

 Afin de palier &#224; ce probl&#232;me j'ai donc pens&#233; &#224; l'astuce suivante :

Private Sub Form_Load()
   On Error Goto ProchaineForm

   [code...]
   Exit Sub

ProchaineForm:
Identification.Show 'Idenfication &#233;tant la prochaine form &#224; ouvrir et n'utilisant pas Form 2.0
Unload Me
End Sub

Malheureusement, le plantage apparait quand m&#234;me et cela (je pense) d&#251; au fait que c'est d&#232;s le chargement que l'application plante. Il faudrait donc pouvoir arriver &#224; faire un On Error Goto avant le Form_Load et d&#232;s le chargement de l'application... mais comment ?

cs_DARKSIDIOUS · Answer

Depuis le temps que je le dis : le composant Microsoft Forms 2 est
livr&#233; avec Office, et vous n'avez pas le droit de le d&#233;ployer avec
votre application => si vous voulez faire des programmes portables,
il faut soit &#234;tre s&#251;r que vos utilisateurs ont office d'install&#233; (ce
qui est loin d'&#234;tre certains), soit ne pas l'utiliser !



Note : ton astuce ne peux pas marcher : le Form_Load est d&#233;clench&#233; au
chargement de la feuille, soit, mais tant que ton contr&#244;le est int&#233;gr&#233;
lors de la cr&#233;ation, tu ne pourras pas emp&#234;cher l'erreur !

DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

cs_CanisLupus · Answer

Salut

"Microsoft Forms 2.0 Object Library" repose sur la DLL "FM20.DLL" qui est install&#233;e avec EXCEL (ou l'OFFICE) dans le dossier c:\windows\system ou c:\windows\system32 donc, il est normal que ton appli ne fonctionne pas sur des postes o&#249; il n'y a pas l'office microsoft d'install&#233;.

1&#232;re solution, cr&#233;er un pack d'install incluant cette DLL et faire une install sur tes postes.
2&#232;me solution, copier manuellement la DLL puis sans doute l'enregistrer avec regsvr32.

Sinon, puisque cette DLL fait partie des d&#233;pendances de ton EXE, &#231;a plantera toujours si elle n'est pas pr&#233;sente.

Cordialement, CanisLupus

cs_CanisLupus · Answer

Trop tard

DARKSIDIOUS, j'avais oubli&#233; le c&#244;t&#233; droit d'utilisation.

Cordialement, CanisLupus

cs_Linkuff · Answer

Pourtant j'ai bien mis Register et copie du fichier FM20.dll dans mon installation... je vais rev&#233;rifier. Toujours pour la m&#234;me application, il arrive que sur les machines ayant windows 98, une erreur "erreur syst&#232;me 50003" apparaisse. J'ai trouv&#233; d'o&#249; &#231;a venait et cette erreur est provoqu&#233; par l'icone de la form. Il suffit donc de mettre la propri&#233;t&#233; Icon de la form &#224; vide pour que &#231;a marche. Malheuresuement, une icone en forme de fenetre bleu, &#231;a fait pas tr&#232;s pro pour une application :(

J'ai donc pens&#233; &#224; cela :

Private Sub Form_Load()
    On Error GoTo ERREUR50003

...

    Exit Sub
    
ERREUR50003:
Me.Icon = Empty
Me.Refresh
End Sub

Cela peut t'il fonctionner ? Il y a t'il une autre solution plutot que de proposer un patch correctif pour ceux qui aurait l'erreur ?

cs_Linkuff · Answer

Et juste pour pr&#233;cision, m&#234;me en v&#233;rifiant que le fichier FM20.DLL est bien pr&#233;sent et m&#234;me apr&#232;s un Regsrv32 c:\windows\system32\fm20.dll, l'erreur apparait toujours sur mon deuxi&#232;me ordi :(

cs_casy · Answer

CanisLupus, il faut aussi pr&#233;ciser que FM20.dll &#224; elle m&#234;me une d&#233;pendance qui n'est pas d&#233;tect&#233;e automatiquement (du moins avec l'assistant d'empaquetage de vb) il s'agit de FM20FR.dll pour un syst&#232;me fran&#231;ais. Il faut donc l'inclure manuellement dans le pack sinon &#231;a marche pas.

J'&#233;tais pas au courant pour les probl&#232;mes de droit, il me semblais l'avoir trouver sur les cd's de la version entreprise de vs6, je dois surrement confondre.

Sinon, Linkuff, si ce n'est pas un probl&#232;me d'install de la dll, as-tu essayer de d&#233;marrer sur un Sub Main au lieu de d&#233;marrer sur ta feuille et de g&#233;rer ton On Error dans le main?

cs_DARKSIDIOUS · Answer

Je pense que ca vient des droits, comme je l'ai dit : vous N'AVEZ PAS
LE DROIT de d&#233;ployer cette dll avec vos projets, donc c'est logique
qu'un simple register de la dll ne fonctionne pas !



Je le dis, et redis : N'UTILISEZ PAS ce composant si vous voulez que
votre programme marche partout, c'est pas compliqu&#233; ! J'ai eu ce
probl&#232;me avec mon viewer d'API, et je peux te dire que j'ai retenu la
le&#231;on : quand une bonne partie de ton prog se base sur quelques
contr&#244;les d'une librairie dont tu n'as pas les droits de d&#233;ploiements,
tu ne fais plus l'erreur deux fois !

DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

cs_CanisLupus · Answer

Exact casy, d'ailleurs, le mieux est, comme je l'ai d&#233;j&#224; dit dans d'autres posts, d'utiliser Depends.exe (&#224; t&#233;l&#233;charger gratos sur 
http://www.dependencywalker.com/)  pour conna&#238;tre les d&#233;pendances d'un exe et v&#233;rifier si elles sont pr&#233;sentes sur le poste ou on veut installer l'exe. Ca &#233;vite de gal&#233;rer.

Pour le probl&#232;me de droits, finalement, je ne sais pas puisqu'on peut t&#233;l&#233;charger gratuitement cette dll sur +sieurs sites connus. Si DARKSIDIOUS pouvait donner des pr&#233;cisions, &#231;a m'int&#233;resserait aussi.

Cordialement, CanisLupus

cs_CanisLupus · Answer

OK DARKSIDIOUS, d'ailleurs, je n'utilise pas ce composant mais j'aurais aim&#233; avoir une adresse de site ou un texte officiel d&#233;crivant les droits d'utilisation de cette DLL.

Cordialement, CanisLupus

cs_casy · Answer

Oui CanisLupus, Depends est un utilitaire int&#233;ressant livr&#233; d'ailleurs
de base avec VS (sur le site c'est une version + r&#233;cente) mais m&#234;me lui
ne d&#233;tecte pas la d&#233;pendence Fm20fra pour la dll fm20.dll, il ne doit
pas s'agir surement d'une dll mais plutot d'un fichier ressource pour
r&#233;gionaliser la dll je pense, mais bon &#231;a change pas grand chose.



Mais Dark a raison, il vaut mieux dans la mesure du possible se passer
de cette DLL, &#224; moins d'aimer se prendre la tete sur des bugs pas
toujours tr&#232;s compr&#233;hensible.

cs_DARKSIDIOUS · Answer

http://support.microsoft.com/kb/224305/EN-US/



C'est clair, net et sans bavure : 



"The Fm20.dll is NOT redistributable. You must have an
application such as Microsoft Office 97 on the target system that
installs Fm20.dll as part of its setup. (Fm20.dll is included with the
OSR2 and OSR2.5 releases of Windows 95.) You can also find this file on
the Visual Basic 5.0 CD under the \TOOLS\DataTool\Datatool\Msdesign
folder. This will be installed only if you run the setup for the Visual
Database Tools. In any case, you may not distribute the Fm20.dll as
part of your setup, even if you purchase the Microsoft Office Developer
Edition product.
"




En gros, cela veut dire : il faut soit Office 97 (ou sup&#233;rieur) soit VB
5 (ou sup&#233;rieur) d'installer sur la machine cliente, sinon, vous n'avez
pas le droit de distribuer Fm20.dll, &#224; part si vous acheter la version
d&#233;veloppeur de Microsoft Office !



Donc : n'utilisez pas les Microsoft Forms 2 !!! C'est un conseil que je donne &#224; tout le monde, sauf ceux qui ont le droit de la distribuer bien s&#251;r !

DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

cs_casy · Answer

Merci Dark

cs_CanisLupus · Answer

Merci DARKSIDIOUS pour cette pr&#233;cision.
Je ne manquerai pas de faire r&#233;f&#233;rence &#224; ton post chaque fois que je verrai des questions sur l'utilisation des contr&#244;les de Form 2.0 notamment les fameuses listbox &#224; +sieurs colonnes en VB alors qu'il existe les listview.

Cordialement, CanisLupus

cs_Linkuff · Answer

Merci beaucoup pour toutes les pr&#233;cisions ;) Je corrige imm&#233;diatement le pb ! Et quelqu'un a une id&#233;e pour la question post&#233; en 5&#232;me position de ce topic ?

cs_Linkuff · Answer

Toujours pour la m&#234;me application, il arrive que sur les machines ayant windows 98, une erreur "erreur syst&#232;me 50003" apparaisse. J'ai trouv&#233; d'o&#249; &#231;a venait et cette erreur est provoqu&#233; par l'icone de la form. Il suffit donc de mettre la propri&#233;t&#233; Icon de la form &#224; vide pour que &#231;a marche. Malheuresuement, une icone en forme de fenetre bleu, &#231;a fait pas tr&#232;s pro pour une application :(

J'ai donc pens&#233; &#224; cela :

Private Sub Form_Load()
    On Error GoTo ERREUR50003

...

    Exit Sub
    
ERREUR50003:
Me.Icon = Empty
Me.Refresh
End Sub

Cela peut t'il fonctionner ? Il y a t'il une autre solution plutot que de proposer un patch correctif pour ceux qui aurait l'erreur ?

cs_CanisLupus · Answer

Salut

Pour ta 1&#232;re question, tant que tu auras le composant "Microsoft Forms 2.0 Object Library" dans ton prog, pas de gestion d'erreur possible pour ceux qui n'ont pas Office ou VB d'install&#233;. Le mieux est que tu revoies ton prog et que tu utilises ListView &#224; la place des listbox &#224; +sieurs colonnes. Ca, au moins tu auras le droit de le redistribuer.

Pour l'icone, une solution possible en VB6 :

Me.Icon = LoadPicture()  ' charge une icone vide (enfin l'icone par d&#233;faut)

mais tu peux fournir l'icone dans le dossier de ton exe et faire :
Me.Icon = LoadPicture(app.path & "\mon_icon.ico")

Cordialement, CanisLupus

Sk8cravis · Answer

Bonjours, je cherchais des infos sur cette librairie et que vois-je ?
Pas le droit de distribuer 

Donc j'aimerais savoir comment on obtiens ces fameuses Listview dont vous parler ?
Quelle Librairie doit on inclure ?

Merci d'avance 

+==--
| @+
| Sk8Cravis
+======------

cs_CanisLupus · Answer

Les ListView ne font pas partie de la librairie "Microsoft Forms 2.0 Object Library" mais dans "Microsoft Windows Common Controls 6.0 (SP6)" reposant sur l'ocx "mscomctl.ocx" et &#231;a tu peux distribuer si tu as une license VB.

Cordialement, CanisLupus

On Error Goto avant un Form_Load ?

18 réponses

Discussions similaires