jeanpaulillois
Messages postés20Date d'inscriptionmercredi 17 mars 2004StatutMembreDernière intervention10 août 2004
-
31 mai 2004 à 13:28
jeanpaulillois
Messages postés20Date d'inscriptionmercredi 17 mars 2004StatutMembreDernière intervention10 août 2004
-
31 mai 2004 à 16:45
salut,
g un petit problème.....
je fé un prog en visual basic puis bon ca marché
après j'ai été infecter par un petit virus et g restauré ma base de registre
maintenant ba c simple j'arrive plus à créer de clé avec mon prog dans la base de registre il met "erreur module intriouvable" si qq pouvait me dire c que c ! ca srerai sympa
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200620 31 mai 2004 à 16:26
Alors là, ton tit virus a du faire des dégats ailleurs que ds la registry.
Ton prob me fait penser à une dll manquante, va voir ds projet/références s'il n'y a pas un truc marqué manquant.
Pour utiliser "CreateObject("Wscript.Shell")" je crois qu'il faut que "Windows Script Host Object Model" soit coché dans ton projet/références c à d qu'il faut avoir Wshom.ocx ds winsows\system. Si ce fichier est corrompu ou qu'il n'existe plus, ça risque de poser des prob.
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200620 31 mai 2004 à 16:01
Salut,
De quelle manière écris-tu ds la registry ?
Si c avec des API, il te manque peut-être "advapi32.dll" (moi, c ce que j'utilise pour lire et écrire ds la registry).
Sinon, une tite précision sur ton code..........
jeanpaulillois
Messages postés20Date d'inscriptionmercredi 17 mars 2004StatutMembreDernière intervention10 août 2004 31 mai 2004 à 16:04
OUPS javé pas vu le mssg dsl.......
euh....
le code :
Private Sub cmddesact_Click()
Dim Retour As Long
Dim a As Boolean
Retour = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, a, 0)
Set WshShell = CreateObject("Wscript.Shell")
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", "1"
End Sub
mais même quand je le met en exe ba ca marche pas
là il dit qu'il y a un bug sur "CreateObject("Wscript.Shell")"
et comme g restoré ma bbase de registre le prob doit venir de là ....................................
Vous n’avez pas trouvé la réponse que vous recherchez ?
jeanpaulillois
Messages postés20Date d'inscriptionmercredi 17 mars 2004StatutMembreDernière intervention10 août 2004 31 mai 2004 à 16:37
ah oui merci mé c ca mais ya un prob
car ca yé je commence à faire le rapprochement
Wshom.ocx ----> activex
et mon virus était un activex !
il avé tout désactivé je voyé plus les activex sur les page web maintenant c bon
mais là ca marche pas pour ca....
bon je vé essayé de le trouver sur le net ce fichier si c possible car il doit être corrompu !