Discussion :

[liazidf]

[DELPHI7-ACCESS2003]
Bonsoir,
J'ai une application delphi, qui utilise une base access, je voudrais partager cette base de données en réseau local, la construction de la chaine de connexion doit être réalisée lors de l'exécution de l'application, et selon le choix de l'utilisateur au lancement du programme, j'ai mis dans le onshow de la form principale une procédure pour récupérer le nom et le chemin de la base, mais apparemment ça ne fonctionne pas, car il m'affiche un message d'erreur pour le DataModule "fichier introuvable ".
Merci.

[BuzzLeclaire]

[DELPHI7-ACCESS2003]
Bonsoir,
J'ai une application delphi, qui utilise une base access, je voudrais partager cette base de données en réseau local, la construction de la chaine de connexion doit être réalisée lors de l'exécution de l'application, et selon le choix de l'utilisateur au lancement du programme, j'ai mis dans le onshow de la form principale une procédure pour récupérer le nom et le chemin de la base, mais apparemment ça ne fonctionne pas, car il m'affiche un message d'erreur pour le DataModule "fichier introuvable ".
Merci.

Salut,

Je suppose que le chemin ainsi que la base ne change pas tout le temps...

Le mieux pour conserver ton chemin et ta base est d'utiliser un fichier INI et de le lire à l'ouverture de ton appli dans ton datamodule.

Maintenant si tu pouvais être plus précis dans le message d'erreur et même mieux donner la procédure qui ouvre ton fichier se serais un plus pour pouvoir t'aider.

Bye.

[liazidf]

Merci d'avoir répondu
En fait, je ne sais pas quoi mettre dans la propriété ADOConnection.ConnectionString dans le cas d'un réseau.

Message erreur.

Nom de fichier incorrect

[BuzzLeclaire]

Merci d'avoir répondu
En fait, je ne sais pas quoi mettre dans la propriété ADOConnection.ConnectionString dans le cas d'un réseau.

Message erreur.

Nom de fichier incorrect

Apparement tu sais le faire en monoposte...
en réseau cela donnerais cela
1) tu lit le fichier ini sur le poste client pour récupérer le chemin et le nom de la base (la je te laisse chercher)
Admettons que le chemin+labase tu le mets dans une variable CheminetBase de type string

Dans ton DataModule pose un composant AdoConnection, ensuite double clique sur le datamodule (pas le composant !!!)

tu peux écrire alors

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
20
21
22
23
procedure TFData.DataModuleCreate(Sender: TObject);
begin
  CheminetBase := ''; // <== Ce que tu as récupéré de ton fichie Ini
 
  With AdoConnection1 do
  begin
    Provider := 'Microsoft.Jet.OLEDB.4.0'; // Si Base access entre 97 et 2003
    ConnectionString := 'Data Source=' + CheminetBase + ';Persist Security Info=False';
    LoginPrompt := False; // il n'y a pas de mot de pass qui protege la base
    Mode  := cmReadWrite; // on pourra lire et recrire dessus
    try
      Connected := True; // on ouvre la connection
    except
      Begin
        ShowMessage(
        'Impossible de se connecter à la base de donnée : '+#13+
        CheminetBase +#13+
        'Veuillez rétablir votre accès, votre chemin ou vos connections réseaux.'
        );
        HALT; // autant tout couper (attention la c'est fermeture à l'arrache du programme)
      End;
    end;
  end;

[redoran]

Slt , avec sa donne ca :
Cours et tutoriels pour apprendre Access : http://access.developpez.com/cours/

[liazidf]

Bonjour
Merci de vos réponses, problème résolu pour ce qui est du partage, maintenant un autre problème se pose, au niveau des mises à jour, car j'utilise des dbgrid ou contrôles de données avec Table.Post pour valider, à ce qui parait ça ne marche pas en réseau sur une base access il m'affiche un message me demandant d'utiliser des requêtes SQL du genre (Select, Update) est-ce réellement ça le problème?
Merci.

[redoran]

http://access.developpez.com/faq/
http://deptinfo.unice.fr/~grin/messupports/sql.pdf

[BuzzLeclaire]

Bonjour
Merci de vos réponses, problème résolu pour ce qui est du partage, maintenant un autre problème se pose, au niveau des mises à jour, car j'utilise des dbgrid ou contrôles de données avec Table.Post pour valider, à ce qui parait ça ne marche pas en réseau sur une base access il m'affiche un message me demandant d'utiliser des requêtes SQL du genre (Select, Update) est-ce réellement ça le problème?
Merci.

Ouvre un autre topic pour ce problème, ne m"langeont pas les choses.

Mais celui-ci en résolu pour les autres lecteur.

Je participerais à ton futur poste, j'utilise déjà beaucoup ce genre de procéder.