Bonjour à tous
Est-ce possible de gérer une barre de progression en parallèle de l'execution d'une requete ODBC
toutes mes recherches sur le sujet font reference à un traitement dans une boucle , ce n'est pas le cas ici"

Un petit code vaut mieux qu'un grand discours
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
    Dim conn As ADODB.Connection
    Dim rst As ADODB.Recordset
    Dim cmd As ADODB.Command
 
 
    Set conn = New ADODB.Connection
    conn.Open "Driver={Microsoft ODBC for Oracle};Server=My_Server;Uid=Mon_Uid;Pwd=Pon_Pwd"
    Set cmd = New ADODB.Command
    cmd.ActiveConnection = conn
 
    cmd.CommandText = "Ma_Procedure_Stocké('Qui dure 3 minutes environs')"
    cmd.CommandType = adCmdStoredProc
    Set rst = New ADODB.Recordset
 
    ' ====================================================
    ' ==  Comment lancer ici une barre de progression en parallele du code suivant
    ' ====================================================
 
    cmd.Execute

cmd.Execute dure environs 3 minutes , peut on gérer une barre de progression durant ce lapse de temps en parallele du traitement de la commande "cmd.Execute"