Soyez le premier à donner votre avis sur cette source.
Snippet vu 7 647 fois - Téléchargée 49 fois
Private Sub Form_Load() Dim tx As String End Sub Private Sub Command1_Click() tx = Text1.Text ' la valeur entrer dans la textbox par l'utilisateur va apparaitre dans le registre Set WshShell = CreateObject("WScript.Shell") WshShell.RegWrite "HKEY_LOCAL_MACHINE\jackky\Chiffre", tx, "REG_DWORD" End Sub Private Sub Command2_Click() End 'le bouton commande2 c'est le bouton exit End Sub
15 juil. 2004 à 11:09
Merci d'avance
6 août 2003 à 09:02
16 juil. 2003 à 14:40
14 avril 2003 à 18:09
25 févr. 2003 à 22:59
Pour info, voici ce que j'ai trouvé dans la doc msdn concernant la lecture :
Set WshShell = Wscript.CreateObject("Wscript.Shell")
WshShell.RegRead("HKCUScriptEngineVal") ' Read from value "Val"
WshShell.RegRead("HKCUScriptEngineKey") ' Read from key "Key"
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.