1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79
|
#include <vcl.h>
#pragma hdrstop
#include "Database.h"
bool __fastcall Database::openMDBConnection(String dbName)
{
String cs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + dbName;
// voir message compilo quand commentaire retiré
//cnnMDB = new TADOConnection(this);
Database::cnnMDB->CursorLocation = clUseClient;
Database::cnnMDB->ConnectionString = cs;
Database::cnnMDB->LoginPrompt = false;
try { Database::cnnMDB->Connected = true; }
catch (EADOError *e) { return false; }
return true;
}
bool __fastcall Database::openSQLConnection(bool bForBif, String userName, String pw, String serverNamedPipe, String serverAddress, String serverCustom, String dbName)
{
String cs = "Provider=SQLOLEDB.1;Password=" + pw + ";Persist Security Info=True;" + "User ID=" + userName + ";Initial Catalog=" + dbName;
if(serverNamedPipe != "")
cs += ";Data Source=" + serverNamedPipe;
else
cs += ";Network Address=" + serverAddress + ";Network Library=dbmssocn";
if(serverCustom != "")
{
cs = serverCustom;
cs = StringReplace(cs, "<PW>", pw, TReplaceFlags());
cs = StringReplace(cs, "<ID>", userName, TReplaceFlags());
cs = StringReplace(cs, "<DB>", dbName, TReplaceFlags());
}
if(bForBif)
{
// voir message compilo quand commentaire retiré
//cnnSQLBIF = new TADOConnection(this);
Database::cnnSQLBIF->CursorLocation = clUseClient;
Database::cnnSQLBIF->ConnectionString = cs;
Database::cnnSQLBIF->LoginPrompt = false;
try { Database::cnnSQLBIF->Open(userName, pw); }
catch (EADOError *e) { return false; }
return true;
}
else
{
// voir message compilo quand commentaire retiré
//cnnSQLData = new TADOConnection(this);
Database::cnnSQLData->CursorLocation = clUseClient;
Database::cnnSQLData->ConnectionString = cs;
Database::cnnSQLData->LoginPrompt = false;
try { Database::cnnSQLData->Open(userName, pw); }
catch (EADOError *e) { return false; }
return true;
}
}
bool __fastcall Database::openSQLConnections(String userName, String pw, String serverNamedPipe, String serverAddress, String serverCustom, String BIFDBName, String DataDBName)
{
bool rc;
rc = openSQLConnection(true, userName, pw, serverNamedPipe, serverAddress, serverCustom, BIFDBName);
if(rc)
{
rc = openSQLConnection(false, userName, pw, serverNamedPipe, serverAddress, serverCustom, DataDBName);
if(!rc)
Database::cnnSQLBIF->Close();
}
return rc;
}
#pragma package(smart_init) |
Partager