Ajout et suppression de fichier reg au registre windows (avec module lineinput amélioré)

Soyez le premier à donner votre avis sur cette source.

Vue 11 934 fois - Téléchargée 569 fois

Description

Attention, l'utilisation du registre est dangereuse pour une personne
incompétente. Une mauvaise utilistation pourrais empêcher Windows de
redémarrer correctement. Votre base de registre est sous VOTRE entière
RESPONSABILITE.

Ce code permet d'ajouter un fichier reg dans la base de registre ou encore de le retirer. Il y a aussi un petit module avec un lineinput amélioré car je n'y comprenais rien à l'original. Les 2 modules n'ont pas encore été entièrement testés.

Ce code est testé et compatible avec VB5 et peut être adapté à VB6 en enlevant les modules Split et Replace ;). Et il fonctionne correctement avec Win XP Pro SP2

Conclusion :


Ce code est autant compatible avec VB5 que VB6.
Grâce aux codes trouvés dans ce site.
Ceux-ci sont les 2 modules "Split", et "Replace"

Aucuns bugs connus.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

XelectroX
Messages postés
209
Date d'inscription
samedi 11 novembre 2000
Statut
Membre
Dernière intervention
6 novembre 2009
-
Désolé mais il y a un bug :

buff = ReplaceT(buff, "HKEY_USERS", "HKLU") ERREUR
-
buff = ReplaceT(buff, "HKEY_USERS", "HKU") CORRECTIF
mortalino
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
16 -
Salut,
*juste pour pinailler :

dans "If Find = vbNullString Then Exit Function" (ligne 58, module Replace)
pourquoi n'utilises-tu pas "If Find IsNot(ou <>) vbNullString Then"
+ "End If" avant le "End Function" ?
Exit Function fait appel à une API, tout comme Exit Sub

Sinon, le code est clair.
@++
draluorg
Messages postés
627
Date d'inscription
vendredi 23 avril 2004
Statut
Membre
Dernière intervention
25 novembre 2010
-
Salut a tous,

Eh pour la base de registre je te conseillerais plutot d'utiliser les api prevu a cet effet....

Voici un exemple: http://www.vbfrance.com/codes/GESTION-BASE-REGISTRE-PRESQUE-COMPLETE_34202.aspx

++
cs_EBArtSoft
Messages postés
4531
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
5 -
Comment ça "Exit sub" et "Exit function" font appel a une API tu a vue joué ça ou ?

Arrentons les fausses informations !

Exit sub/function/property peut etre employé n'importe ou sans contraite il crée un RET tout comme End Sub/function/property.
Si par API tu veux dire que VB va faire un test de la pile alors la je suis d'accord mais c'est valable aussi pour "End Sub" donc pas de panique c'est juste une question de lisibilité. Biensur il faut compilé en code natif (depuis VB5) ça va de soit !

@+
mortalino
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
16 -
Salut EB,

Ben en fait j'employé souvent dans mes sources des Exit Sub et d'après mes "informations", le test de "la pile", comme tu l'emploies, utiliserait apparemment des ressources supplémentaires. Certe, dans cette source, il n'y a l'appel à la fonction Exit qu'une fois mais de ce que j'ai compris, s'il y en a plusieurs...

Bref, j'ai du mal comprendre une chose que tu pourras eclairer : qu'est ce que tu appelles Test de la Pile ?

Merci EB
++

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.