Liste serveurs et bases de données SQL Server sous VB .NET

Signaler
Messages postés
21
Date d'inscription
mercredi 21 mai 2003
Statut
Membre
Dernière intervention
26 juillet 2007
-
zeunz
Messages postés
201
Date d'inscription
jeudi 26 février 2004
Statut
Membre
Dernière intervention
30 juin 2008
-
Salut à tous,

J'aimerais savoir comment lister les serveurs SQL Server de mon réseau local ainsi que les bases de données d'un serveur.

Merci de vos réponses.

Chup

1 réponse

Messages postés
201
Date d'inscription
jeudi 26 février 2004
Statut
Membre
Dernière intervention
30 juin 2008

lister les bases de données d'un serveur:

 'Déclaration des variables
        Dim objSQLServer As Object
        Dim objDataBases
        Dim objDatabase

        'Création de l'objet
        objSQLServer = CreateObject("SQLDMO.SQLServer")

        'Paramétrage de la connexion
        objSQLServer.LoginSecure = True
        objSQLServer.Connect("Nom_du_Serveur")

        'Récupération des noms de toutes les bases de données
        objDataBases = objSQLServer.Databases

        'Chargement des données
        For Each objDatabase In objDataBases
            'Chargement des noms des différentes base de données
            ListBox1.Items.Add(CStr(objDatabase.Name))
        Next