Access database encryption.

[PoojaKrishna]

Hi,

How to encrypt and decrypt an Access database using Autoit?

Some VB examples are:

http://support.microsoft.com/kb/104875

http://www.developer.com/lang/other/article.php/724731

Please help

Pooja.

[PoojaKrishna]

Hi friends,

The following code encrypts an Access Db:

_EncryptDB($Source,$Dest)

If FileExists($Source) Then

$adoProvider="Microsoft.Jet.OLEDB.4.0"

If FileExists($Dest) Then FileDelete($Dest)

$obj = ObjCreate("JRO.JetEngine")

If IsObj($obj) Then

$obj.CompactDatabase("Provider = " & $adoProvider & ";"&"Data Source = " & $Source,"Provider = " & $adoProvider &";"& "Data Source = " & $Dest&";"& "Jet OLEDB:Encrypt Database=True")

EndIf

EndIf

EndFunc ;<===>_EncryptDB()

More parameters are listed here: http://msdn.microsoft.com/en-us/library/bb237197.aspx

Regards,

Pooja.

[PsaltyDS]

Hi friends,

The following code encrypts an Access Db:

_EncryptDB($Source,$Dest)

If FileExists($Source) Then

$adoProvider="Microsoft.Jet.OLEDB.4.0"

If FileExists($Dest) Then FileDelete($Dest)

$obj = ObjCreate("JRO.JetEngine")

If IsObj($obj) Then

$obj.CompactDatabase("Provider = " & $adoProvider & ";"&"Data Source = " & $Source,"Provider = " & $adoProvider &";"& "Data Source = " & $Dest&";"& "Jet OLEDB:Encrypt Database=True")

EndIf

EndIf

EndFunc ;<===>_EncryptDB()

More parameters are listed here: http://msdn.microsoft.com/en-us/library/bb237197.aspx

Regards,

Pooja.

Nice find. Thanks for posting your resolution.