Discussion :

[Nono23]

Bonjour tout le monde,

Est-il possible, sous Delphi6, de savoir si une source de données ODBC est actuellement utilisée par une quelconque application sur le PC?

je m'explique :

- J'ai une application Delphi X dans laquelle je me connecte via ODBC à des bases (Access, Firebird ou SQL Server)
- J'aimerais savoir, depuis une application Delphi Y, quels sources de données ODBC sont actuellement connectées dans l'application X.

c'est en fait un mini monitoring de mes sources ODBC.

Merci d'avance

Salutations

Nono

[ShaiLeTroll]

Si ton SGBD le gère, tu peux t'y connecter et au moins savoir la liste des connexion en cours sur le serveur (en t'excluant toi même)
Comme SA_CONN_LIST (Sybase mais SQL Server ça doit pas être bien différent genre SP_WHO ou sysprocesses)
Pour FireBird voir autour de MON$ATTACHMENTS

tu auras l'IP, peut-être un login (si tu n'utilises pas tout le temps le même)

Après pour savoir quel process, faudrait tenter un truc équivalent de SysInternal Process Explorer
voir la FAQ sur Processus et Modules d'un Processus

tu listes tous les processus en cours,
tu listes les modules du en cours d'un processus, cela doit au moins charger une DLL genre ODBC32.dll

Après, tu as la liste des processus qui pourrait utiliser ODBC mais sans savoir si il l'on fait !

Faudrait si il est possible de surveiller via un Hook les appels ODBC
SysInternal Process Monitor peut-être utile pour voir ce qui passe en Base de Registre par exemple
L'accès à la Rubrique ODBC.INI et les Clés Source ODBC qui se sont dedans seront encore une piste supplémentaire

Pense que d'autres programmes, si tu veux surveiller n'importe quoi, au lieu d'utiliser de l'ODBC pourrait utiliser des couches natives via des composants spécialisés comme ceux de Devart, FireDac, DbExpress, ...
DbExpress par exemple utilise une DLL intermédiaire (Provider) qui suit les prototypes de DbExpress qui sert d'adapteur à une DLL spécifique à un SGBD (Library) comme LibMySQL, OCI.DLL, ...

[Nono23]

Salut ShailLeTroll, merci de ta réponse.

Effectivement, j'utilise déjà les propriétés des tables MON$ATTACHMENTS pour firebird et son équivalent pour SQL Server.

Etant donné que le type de BDD change en fonction de nos client, je me disais qu'il y a avait un moyen plus simple et plus global de faire ça en passant par l'ODBC, sans devoir développer une fonction par type de BDD. Je vais rester sur ce principe finalement.

Nous étudions un moyen de nous débarrasser de l'ODBC (Via anydac) mais ça demande beaucoup de test et pas mal d'étude pour migrer tous nos produits. ça viendra

Merci encore

Nono

[ShaiLeTroll]

Pense que Delphi XE4 intègre FireDAC qui est la reprise de AnyDAC par Embarcadero !

Vérifie si tu dois plutôt passer en FreeDAC : "FreeDAC is a frozen freeware AnyDAC v 1.12"

[Nono23]

Extra, merci du conseil, je vais regarder de ce côté.