topic-6476

Posts: 33

Joined: Thu Aug 10, 2006 12:23 PM

password in access files
Posted: Mon Mar 26, 2007 02:28 AM

Does somebody knows how to put a password in this file type via fivewin and xharbour?
I can open read write and close the access table but i don't know how put a password to encrypt it

Thank for any help

Héctor García

México, D.F.

Enrico Maria Giordano

Posts: 9022

Joined: Thu Oct 06, 2005 08:17 PM

Re: password in access files
Posted: Mon Mar 26, 2007 08:16 AM

Code: Select all Collapse

FUNCTION MAIN()

    LOCAL oJro := CREATEOBJECT( "JRO.JetEngine" )

    LOCAL cConStr1 := "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=mymdb.mdb"
    LOCAL cConStr2 := "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=newmdb.mdb;Jet OLEDB:Database Password=newpwd"

    oJro:CompactDatabase( cConStr1, cConStr2 )

    RETURN NIL

EMG

Enrico Maria Giordano

e.m.giordano@emagsoftware.it
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

hgarcia

Posts: 33

Joined: Thu Aug 10, 2006 12:23 PM

password in access files
Posted: Mon Mar 26, 2007 12:38 PM

sorry but I tried your solution and I have an ole error in compacdatabase instruction called by tole the name of the error is "error jro.jetengine/16389 sure I'm making something wrong

Héctor García

México, D.F.

Enrico Maria Giordano

Posts: 9022

Joined: Thu Oct 06, 2005 08:17 PM

Re: password in access files
Posted: Mon Mar 26, 2007 12:46 PM

I don't know. My sample works fine here.

EMG

Enrico Maria Giordano

e.m.giordano@emagsoftware.it
http://www.emagsoftware.it
http://www.emagsoftware.it/emgmusic
http://www.emagsoftware.it/spectrum
http://www.emagsoftware.it/tbosg

FiveTech Support Forums

Continue the discussion