Re: récupérer base de donnée ??

Posté par john le 10/8/2007 9:00:33
Ca me parait dur de tout faire en même temps, si les bases sont configurées en ODBC, tu peux faire :

SQLListeSource("BASE", "ODBC")


Mais après s'il n'y a pas de connexion ODBC de définit, il va valoir faire une recherche spécifique pour chaque type de base de données, voici un exemple pour sql server :

SQLConnecte(s_Serveur_in,s_ut_in,s_pwd_in,s_base_in,"OLEDB",hOledbSQLServer,"Application Name="+ExeInfo(exeDescription))
SINON


s_req="select name from master.dbo.sysdatabases where (DATABASEPROPERTY(name, N'IsSingleUser')=1 or has_dbaccess(name)=1)"

Exec(s_nomReq,s_req)

TANTQUE SQLAvance(s_nomReq)=0
	s_listeBase+=SQLLitCol(s_nomReq,1)+RC	
FIN
SQLFerme(s_nomReq)


Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5328&post_id=22012