Ecriture registre avec vb
Fermé
lawre
Messages postés
36
Date d'inscription
vendredi 24 juin 2005
Statut
Membre
Dernière intervention
19 novembre 2010
-
29 juin 2005 à 21:41
Utilisateur anonyme - 30 août 2006 à 19:11
Utilisateur anonyme - 30 août 2006 à 19:11
A voir également:
- Ecriture registre avec vb
- Écriture facebook - Guide
- Registre windows - Guide
- Écriture miroir - Guide
- Ecriture italique - Guide
- Vb cable - Télécharger - Audio & Musique
3 réponses
Mister_S
Messages postés
3
Date d'inscription
jeudi 17 août 2006
Statut
Membre
Dernière intervention
18 août 2006
1
17 août 2006 à 23:16
17 août 2006 à 23:16
as tu bien ecris le chemin complet de la clé?
WshShell.RegWrite "HKEY_CURRENT_USER\Software\NOM DE LA CLE DWORD\", value, "REG_DWORD"
Utilisateur anonyme
30 août 2006 à 19:11
30 août 2006 à 19:11
Bonjour,
voici un exemple :
La variable Cle de type string doit se terminer par une barre oblique arriere s'il s'agit d'une clé et sans barre oblique s'il s'agit d'un paramètre.
ex.:
[HKEY_CLASSES_ROOT\.doc]
@="Word.Document.8"
"Content Type"="application/msword"
Ici, nous avons le paramètre par défaut qui a la valeur "Word.Do..."
et le paramètre Content Type qui a la valeur "application..."
attention, je n'ai rien testé, j'ai écris cela à la volé... c'est ainsi que
je procède dans une application VBA sous Excel.
@+
Lupin
voici un exemple :
Sub Inscrire_Registre()
Dim oWsh As Variant
Dim Cle As String
On Error GoTo Err_InscrireClrPag
Set oWsh = CreateObject("WScript.Shell")
Cle = "HKCR\.doc\Content Type"
oWsh.RegWrite Cle, "application/msword", "REG_SZ"
End Sub
La variable Cle de type string doit se terminer par une barre oblique arriere s'il s'agit d'une clé et sans barre oblique s'il s'agit d'un paramètre.
ex.:
[HKEY_CLASSES_ROOT\.doc]
@="Word.Document.8"
"Content Type"="application/msword"
Ici, nous avons le paramètre par défaut qui a la valeur "Word.Do..."
et le paramètre Content Type qui a la valeur "application..."
attention, je n'ai rien testé, j'ai écris cela à la volé... c'est ainsi que
je procède dans une application VBA sous Excel.
@+
Lupin
