Base de registres simplifiee

Description

Je vous propose de faciliter la base de registres, ecriture et lecture, grace a l'emploi d'une dll. Elle est faite POUR vb donc plus de Byval sur params. Pour l'instant elle ne comporte qu'une fonction de lecture de valeurs String en HKEY_CURRENT_USER pour la demo mais j'etendrai selon les demandes. Me les adresser par un message sur le site.
Je signale que ceci est beaucoup plus rapide que de charger l'interpreteur de script par GetObject comme je l'ai vu.
Refus pour ce qui serait viral ou autre, sinon n'hesitez pas.

Source / Exemple :


Declare Function bnLireStringCU Lib "D:\bnRegs.dll" (sKey As String, sValue As String, sDest As String) As Long
' valeurs de retour
' 0 - OK, sDest sera String valide, vide possible
' 1 - cle ou valeur inexistante ou impossible d'ouvrir ou autre
' 2 - type non string
' 3 - defaut de memoire

Sub litSringcu()
  Dim lret As Long, sdst As String
  lret = bnLireStringCU("Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders", "Cookies", sdst)
  If lret = 0 Then
    Debug.Print sdst
    Debug.Print Len(sdst)
   Else: Debug.Print lret
  End If
End Sub

Codes Sources

A voir également

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.