Discussion :

[DEV-10]

Bonjour

En utilisant la boucle FOR EACH en VB 2005, j'aimerais parcourir une bases de données SQL pour retirer le nom de toutes les tables qui s'y trouve.

Est-ce que quelqu'un connait le nom des objets qu'il faut utiliser dans l'entête de la boucle for après avoir ouvert ma connection ?

Merci.

[BCmDev]

Tu peux utiliser les Server Management Objects (SMO) et plus particulièrement Database.Tables.

[DEV-10]

J'utilise ADO et SQL server avec le framework 1.1 et ça ne marche toujours pas.

Voici le bout de programme

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
20
21
22
23
24
25
26
27
28
29
 
 
Imports System.Data.SqlClient
 
       Private ObjetConnection As SqlConnection
       Private ObjetCommand As SqlCommand
       Private ObjetDataAdapter As SqlDataAdapter
       Private ObjetDataset As New DataSet
       Private ObjetDataTable As DataTable
 
 
       Private strConnexion As String = _
      "Data Source= Serveur_nathalie;" & _
      "Initial Catalog = Base_de_donnees_1;" & _
      "Integrated Security=True"
 
        ObjetConnection = New SqlConnection
        ObjetConnection.ConnectionString = strConnexion
        ObjetConnection.Open()
        ObjetCommand = New SqlCommand(strSql)
        ObjetDataAdapter = New SqlDataAdapter(ObjetCommand)
        ObjetCommand.Connection() = ObjetConnection
      c'est à partir de là que je commence à patiner.  
        Dim db As DataSet
        db = ObjetConnection.Database
        Dim tb As New DataTable
        For Each tb In db
            console.WriteLine(tb.name)
        Next

[BCmDev]

Connection.Database définit le nom de la base de données.
As-tu essayé SMO ?
Tu peux référencer l'assembly Microsoft.SqlServer.Smo puis obtenir les information en faisant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Microsoft.SqlServer.Management.Smo.Server s = new Server(serverName);
TableCollection databaseTables = s.Databases[databaseName].Tables;

[tomlev]

Sous SQL Server tu peux faire ça:

Code SQL :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT * FROM information_schema.tables

[DEV-10]

Sous SQL Server tu peux faire ça:

Code SQL :
SELECT * FROM information_schema.TABLES

C'est à partir de VB que je voulais le faire.

[tomlev]

Ou encore en utilisant DbConnection.GetSchema :
http://msdn2.microsoft.com/en-us/library/kcax58fh.aspx

C'est à partir de VB que je voulais le faire.

Qu'est-ce qui t'empêche d'exécuter cette requête à partir de VB ?

[DEV-10]

Connection.Database définit le nom de la base de données.
As-tu essayé SMO ?
Tu peux référencer l'assembly Microsoft.SqlServer.Smo puis obtenir les information en faisant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Microsoft.SqlServer.Management.Smo.Server s = new Server(serverName);
TableCollection databaseTables = s.Databases[databaseName].Tables;

Je ne peux pas réfernecer Microsoft.SqlServer.Smo car après sqlServer il n'y a pas de Smo.

Mais 'aimerais mieux utiliser le genre de connection que j'ai présenté dans le message précedent afin de respecter les règles de la compagnie.