Discussion :

[caviar]

Bonjour,

Avec delphi 7, j'appelle une procédure stockée provenant d'une base SQL 2000.

J'utilise pour cela la connexion ADO

Ma procédure permet de copier des données d'une base à une autre.

voici le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
begin
ADOCon_Slx_Dia_Prod.Connected:=true;
ADOStoredProc1.Active:=false;
ADOStoredProc1.Parameters.ParamByName('@NameBD').value :='Dia_Prod';
ADOStoredProc1.Parameters.ParamByName('@NameBDMess').value :='infocentre';
ADOStoredProc1.Parameters.ParamByName('@cgNumClient').value :='411100';
ADOStoredProc1.Parameters.ParamByName('@cgNumFourn').value :='401100';
try
    ADOStoredProc1.Active:=true;
except
    ShowMessage('Erreur lors de la copie des données ');
end;
end;

Comment puis savoir si la procédure est terminée ??

et si elle est achevée correctement ?

Merci d'avance pour votre aide

caviar

[Rayek]

Des que tu fais Active:=True normalement tant que ta procédure stockée n'est pas terminée, le programme reste bloqué sur cette fonction. (sauf si tu as mis les composants Ado en mode Asynchrone).

Quand le procédure stockée se termine, elle renvoi normalement une valeur que tu peux décider (faut que cela soit programmé directement dans la procedure stockée).
Selon la valeur de retour récupérée, tu peux décider si ca c'est bien passé ou non.