Discussion :

[valleyman]

Bonjour,

mon programme a besoin de mswnsck.ocx c'est pourquoi il faudrait que je lance du code avant l'éxecution du programme en lui même pour qu'il aille rechercher sur le net le .ocx dont il a besoin. ( la plus part des gens n'ayant pas ce fichier.

Voici le code :

Code :

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

1
2
3
4
5
'partie qui vérifie si mswinsck.ocx exist si non on le télécharge
activex = IfFileExists("C:\WINDOWS\system32\MSWINSCK.OCX")
If acivex = False Then
Call Download("http://www.ascentive.com/support/new/images/lib/MSWINSCK.OCX", "C:\WINDOWS\system32\MSWINSCK.OCX") 'Telechargement du fichier activex
End If

La fonction IfFileExists et Download sont dans 2 modules.

et le controle activex se trouve sur la form, il faut que le code s'execute avant celui ci ( j'ai déja essayé form_load )


Merci

[khany]

Le module est ce qui s'exécute en premier donc normalment, le code contenu dans un module .BAS s'exécute avant le code de la form appellée dans ce module !

Le tout est de bien démarrer le projet sur un module !

[valleyman]

Peux tu me faire un exemple stp parce que quand je mets le code ci dessus dans un module il veut pas me compiler

ps: entre namurois on peut s'aider

[khany]

ps: entre namurois on peut s'aider

tu peux me dire pourquoi il veut pas compiler ? Il vaut peut-être mieux commencer par cela

[valleyman]

J'ai fait un 3 eme fichier bas avec just le code ci dessus donc lorse que je compile il me surligne : "C:\WINDOWS\system32\MSWINSCK.OCX" et y me dit invalide outside procedure

[khany]

c'est ton "IfFileExists" qui n'est pas reconnu !
faudrait trouver une astuce pour faire reconnaître ta procédure !

par contre, il y a surement des solutions via les paramètres de setup qui te montrent comment vérifier les ocx qui existent !