Erreur d'exécution '453'

Question

Salut tlm,
voila j'ai un réel probleme, quand j'essaie d'executer mon projet, j'obtiens le message d'erreur suivant : Point d'entrée RegisterServiceProcess d'une DLL introuvable dans kernel32, si ca vous aide voila un apercu du code :

Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long

Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long

Private Declare Function GetCurrentProcess Lib "kernel32" () As Long

Private Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long

Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Const KEYEVENTF_KEYUP = &H2

Private Const VK_LWIN = &H5B

Public Sub Application_Visible(visible As Boolean)
Dim lI As Long
Dim lJ As Long
lI = GetCurrentProcessId()
If Not visible Then
lJ = RegisterServiceProcess(lI, 1)
Else
lJ = RegisterServiceProcess(lI, 0)
End If
End Sub

l'erreur est dans la ligne : lJ = RegisterServiceProcess(lI, 1)

MERCI D'AVANCE

cs_ITALIA · Answer

a quelle ligne se declenche l'erreur ????

It@li@

cs_ITALIA · Answer

désolé g pas tous lu !!!!

It@li@

cs_ITALIA · Answer

Voila se qu'en dis MSDN

Causes et solutions de cette erreur : 

Vous avez spécifié un numéro incorrect dans la déclaration de la fonction.
Vérifiez le numéro ou appelez la fonction par nom.

Vous avez indiqué le bon nom de DLL, mais celle-ci ne correspond pas à la version contenant la fonction spécifiée.
Il se peut que vous ayez la bonne version sur votre machine, mais si le répertoire contenant la version incorrecte précède dans votre chemin d'accès le répertoire contenant la bonne, l'accès s'effectue à la DLL incorrecte. Vérifiez les différentes versions présentes sur votre machine. Si vous possédez une ancienne version, contactez le fournisseur pour obtenir une version plus récente.

Si vous travaillez sur une plate-forme Microsoft Windows 32 bits, le nom et l'alias de la DLL (le cas échéant) doivent être corrects.
Vérifiez que le nom et l'alias de la DLL sont corrects.

Certaines DLL 32 bits contiennent des fonctions de versions légèrement différentes autorisant l'emploi de chaînesUnicode etANSI. Un "A" à la fin de la fonction spécifie la version ANSI, un "W" la version Unicode.
Si la fonction accepte des arguments de type chaîne, essayez d'ajouter un "A" au nom de la fonction.

It@li@

cs_frop01 · Answer

Je ne trouve pas RegisterServiceProcess dans le visionneuse d'api

MSN : cyberscorp2004@msn.com
Qui s'y frotte, s'y pique .

cs_ITALIA · Answer

moi non plus

It@li@

cs_frop01 · Answer

Lisez les messages postés sur :

http://www.vbfrance.com/forum.v2.aspx?ID=273071

MSN : cyberscorp2004@msn.com
Qui s'y frotte, s'y pique .

cs_frop01 · Answer

Pardon faute de copier/coller :

l'adresse exacte :

http://www.vbfrance.com/code.aspx?ID=3595

MSN : cyberscorp2004@msn.com
Qui s'y frotte, s'y pique .

cs_ITALIA · Answer

Regardes le denier comment de VBspirit ( tout en bas )sur http://www.vbfrance.com/code.aspx?ID=3595

It@li@

cs_frop01 · Answer

Il se peut que ta solution ce touve la :

vbfrance;)

MSN : cyberscorp2004@msn.com
Qui s'y frotte, s'y pique .

cs_rene38 · Answer

Bonjour
la fonction RegisterServiceProcess n'existe pas dans Kernel32.dll version XP mais seulement dans les versions Win 9x

Erreur d'exécution '453'

10 réponses

Discussions similaires