1. Accueil
  2. Forum Codes-Sources
  3. Delphi / Pascal

Connection bases de données [Résolu]

Signaler
Messages postés
23
Date d'inscription
dimanche 13 janvier 2008
Statut
Membre
Dernière intervention
9 janvier 2009
 -
Messages postés
37
Date d'inscription
mardi 7 octobre 2008
Statut
Membre
Dernière intervention
29 décembre 2008
 -
Salut tous le monde !
Bon voila, mes amis j'ai un gros problème avec mon application, je m'explique :
Je travaille sur une application de gestion avec Delphi 6 et j'utilise une base de donnée Accès dont je me connecte avec un composant T Table à l'aide bien sur de l'ODBC. Mais le problème est la, or quand j'exécute le programme, il m'affiche toujours la boite de dialogue "Mot de passe" de l'ODBC. Est ce qu'il y a une solution pour la faire disparaitre s'il vous plais...
Merci.

3 réponses

Réponse 1 / 3
Messages postés
37
Date d'inscription
mardi 7 octobre 2008
Statut
Membre
Dernière intervention
29 décembre 2008
Salut,
moi j'ai un autre soucis, mais en fouillant un peut, j'ai vu ça:
selectionne le composant sur ta fiche => AdoConnection1
regarde a gauche l'inspecteur d'objet et recherche la ligne => LoginPrompt
normalement elle doit etre a True actuellement (ce qui veut dire qu'elle demande le mot de passe), donc met la a false ! sinon c'est peut etre directement dans ton programme ou tu peux indiquer les parametres (voir ci dessous ce que j'ai trouvé sur le net et qui me sert)*

je t'ai mis deux petits pour indiquer ou son les infos sur le password !
bonne chance et j'espere t'avoir aidé aussi debutant que je soit !

--------------------------------------------------
procedure Tlistingpersonnel.FormCreate(Sender: TObject);
var
  cheminBD, chaineCnx : string;
begin
cheminBD := 'C:\Personnelisting.mdb';
chaineCnx:= 'Provider=Microsoft.Jet.OLEDB.4.0;' +
            'User ID=Admin;' +
            'Data Source=' + cheminBD + ';' +
            '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';
ADOConnection1.ConnectionString := chaineCnx ;
ADOtable1.Active:= True;
end;
---------------------------------------------------------------------------
Réponse 2 / 3
Messages postés
23
Date d'inscription
dimanche 13 janvier 2008
Statut
Membre
Dernière intervention
9 janvier 2009
Merci pour votre réponse, mais j'utilise des T Table pour ma connexion et non pas des composants TADO !
Réponse 3 / 3
Messages postés
37
Date d'inscription
mardi 7 octobre 2008
Statut
Membre
Dernière intervention
29 décembre 2008
OUps, desolé, comme je l'ai dit, je suis debutant................. milles excuses !
Répondre Posez votre question