je voudrais connecter a access 2007 avec mot de passe
et j'ai pas reussie;
message d'erreur voire image
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 procedure TForm1.sSpeedButton2Click(Sender: TObject); var cheminBD, chaineCnx : string; begin cheminBD:=ExtractFilePath(Application.ExeName)+'LES_DEMANDES.accdb'; if FileExists(cheminBD) then begin DataModule3.ADOConnection1.Close; chaineCnx:= 'Provider=Microsoft.ACE.OLEDB.12.0;' + 'Data Source=' + cheminBD + ';' + 'Persist Security Info=false;'+ 'Jet OLEDBatabase Password=ya9ine;'+ 'Mode=Share Deny None;Extended Properties="";'; DataModule3.ADOConnection1.LoginPrompt:=false; DataModule3.ADOConnection1.ConnectionString := chaineCnx ; DataModule3.ADOConnection1.Open; Form2.Frame61.Timer1.Enabled:=true; end;
http://www.monsterup.com/image.php?u...4810210930.jpg
http://www.monsterup.com][IMG]http://www.monsterup.com/upload/1324810210930.jpg
Partager