Discussion :

[argoet]

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"

[=JBO=]

Bonjour,

Tu utilises la bibliothèque ADO.

Il est peut être possible d'exécuter la requête (procédure stockée) de manière asynchrone, même si elle retourne des données...

Dans le super tutoriel Comprendre les recordsets ADO de Jean-Marc RABILLOUD, tu pourrais lire le paragraphe Programmation événementielle qui traite de:
■ l'exécution asynchrone des commandes,
■ l'extraction non bloquante de données.

Bonne lecture !
_

[argoet]

Merci à vous JBO : cela correspond à mon besoin
je tag