🚀 go-pugleaf

1.
AnsiString cDefaultDb = "c:\database.mdb";

should be

AnsiString cDefaultDb = "c:\\database.mdb";

2. You can check if cDb exists

if (!FileExists(cDb))
{
    throw ...
}

3. Remove ADOConnection->Provider = "Microsoft.Jet.OLEDB.4.0"; you have it
in connection string.

4. Do you have database password? If so, add

Jet OLEDB:Database Password="DbPassword";

to connection string.

5. Have you connection string to this file that works (try build it with
Connection string wizard - press "..." button in "Connection string"
property of TADOConnection)? Try to connect from this dialog and then build
connection string in run-time basing on existing and valid one.

----------------------------------------------------------------
Regards,
Viatcheslav V. Vassiliev
http://www.oledbdirect.com
The fastest way to access MS SQL Server, MS Jet (MS Access)
and Interbase (LCPI provider, http://ibp.lcpi.lipetsk.ru) databases.

"Ricardo Rodrigues" <madinfo@cadaval.net> �������/�������� � ��������
���������: news:3dff1cca@newsgroups.borland.com...
> this is my final code:
>
> void __fastcall TFormMain::GetConnectionString()
> {
>   AnsiString cIniFileName = ".//ge.ini"; // yo get on exe path

>
>   AnsiString cDb = "";
>
>   TIniFile *ini = new TIniFile(cIniFileName);
>   try
>   {
>      AnsiString cDb =  ini->ReadString( "mdb", "path", cDefaultDb);
>   }
>   __finally
>   {
>     delete ini;
>   }
>
>   AnsiString cConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Password="";User
> ID=Admin;Data Source=" + cDb;
>
>   if(ADOConnection->Connected)
> //    ADOConnection->Close();
>     ADOConnection->Connected = false;
>     ADOConnection->ConnectionString = cConnStr;
>     ADOConnection->Provider = "Microsoft.Jet.OLEDB.4.0";
>     ADOConnection->Connected = true;
>     ADOTableMain->Active = true;
>     ADOQueryCount->Active = true;
>     ADOTableLocContact->Active = true;
> }
>
>
> i am calling it fro FormCreate.. void __fastcall
> TFormMain::FormCreate(TObject *Sender)
>
> and i get an error saying that Fails in autentication :(
>
>
> i�ve tryed all connection string that is:
> Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Documents
and
> Settings\MaDiNfO_\Ambiente de trabalho\mdb\telefones.mdb;Mode=Share Deny
> None;Extended Properties="";Jet OLEDB:System database="";Jet
OLEDB:Registry
> Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet
> OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet
> OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet
> OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet
> OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica
> Repair=False;Jet OLEDB:SFP=False
>
>
> still nothing... can you see if you can help me?
>
> tanks one more time...
>
> and sorry my inglish but i am portuguese...
>