Postada em 28/08/2005 09:42 hs
Paula,
Se você não tem muita afinidade com APIs adicone a referência "Registry Access Functions" no seu projeto e siga o exemplo de uso.
Dim Reg As REGTool5.Registry
Dim Excluido As Boolean
Dim Adicionado As Boolean
Set Reg = New REGTool5.Registry
' Excluindo
Excluido = Reg.DeleteKey(REGTool5.HKEY_LOCAL_MACHINE, "SoftwareMinhaAplicacao")
' Atualizando ou criando
Adicionado = Reg.UpdateKey(REGTool5.HKEY_CURRENT_USER, "SoftwareMinhaAplicacao", "VersaoAplicacao", "0.1")
Set Reg = Nothing
|
