Comment parcourir une bases de données SQL

Version imprimable

24/03/2008, 20h23
DEV-10

Comment parcourir une bases de données SQL

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.
25/03/2008, 09h44
BCmDev

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

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

Voici le bout de programme

Code:

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

25/03/2008, 17h55
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:

1 2 3 Microsoft.SqlServer.Management.Smo.Server s = new Server(serverName); TableCollection databaseTables = s.Databases[databaseName].Tables;
25/03/2008, 18h25
tomlev

Sous SQL Server tu peux faire ça:

Code:

SELECT * FROM information_schema.tables
25/03/2008, 18h28
DEV-10

Citation:

Envoyé par tomlev

Sous SQL Server tu peux faire ça:

Code SQL :
SELECT * FROM information_schema.TABLES

C'est à partir de VB que je voulais le faire.
25/03/2008, 18h31
tomlev

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

Citation:

Envoyé par DEV-10

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 ?
25/03/2008, 18h33
DEV-10
Citation:
Envoyé par 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:

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.

Citation:

Envoyé par tomlev

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

C'est parce que je veux parcourir la boucle for pour afficher toute les tables qui se trouvent dans cette bases de données.

J'ai déjà la connexion qui marche bien et je peux exécuter des requêtes SQl sauf que je ne trouve pas l'objet correspondant à mettre dans le FOR

Voir le code suivant :
le tb.name n'existe pas.
J'écahappe quelque chose.

Code:

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
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

Tu t'y prends de travers... ObjectConnection.Database te renvoie simplement le nom de ta base de données, donc ça n'a pas de sens d'essayer de faire un For Each dessus. Tu auras juste l'enumération des caractères du nom de la base...
INFORMATION_SCHEMA.TABLES est une vue système qui te donne la liste des tables qui existent dans la base. C'est donc exactement ce qu'il te faut...

EDIT: allez, un petit bout de code...
Code:

1 2 3 4 5 6 7 8 9 strSql = "SELECT * FROM information_schema.TABLES" ObjetCommand = New SqlCommand(strSql) ObjetCommand.Connection = ObjetConnection Dim reader As IDataReader reader = ObjetCommand.ExecuteReader() While reader.Read() Console.WriteLine(reader("table_name")) End While

Citation:
Envoyé par tomlev
Tu t'y prends de travers... ObjectConnection.Database te renvoie simplement le nom de ta base de données, donc ça n'a pas de sens d'essayer de faire un For Each dessus. Tu auras juste l'enumération des caractères du nom de la base...
INFORMATION_SCHEMA.TABLES est une vue système qui te donne la liste des tables qui existent dans la base. C'est donc exactement ce qu'il te faut...

EDIT: allez, un petit bout de code...
Code:

1 2 3 4 5 6 7 8 9 strSql = "SELECT * FROM information_schema.TABLES" ObjetCommand = New SqlCommand(strSql) ObjetCommand.Connection = ObjetConnection Dim reader As IDataReader reader = ObjetCommand.ExecuteReader() While reader.Read() Console.WriteLine(reader("table_name")) End While
Oui ça marche à merveille.
Merci bien tomlev

26/03/2008, 14h22
DEV-10

Citation:

Envoyé par DEV-10

Oui ça marche à merveille.
Merci bien tomlev

tomlev

à la ligne :

Code:

reader = ObjetCommand.ExecuteReader()

J'ai l'erreur suivante :

Citation:

ExecuteReader : Connection property has not been initialized
26/03/2008, 14h39
tomlev

Tu as bien mis cette ligne ?

Code:

ObjetCommand.Connection = ObjetConnection

(dans le code que je t'ai donné je suppose que la connexion est ouverte, si ce n'est pas la cas il faut d'abord appeler ObjetConnection.Open)
26/03/2008, 14h46
DEV-10

Citation:

Envoyé par tomlev

Tu as bien mis cette ligne ?

Code:

ObjetCommand.Connection = ObjetConnection

(dans le code que je t'ai donné je suppose que la connexion est ouverte, si ce n'est pas la cas il faut d'abord appeler ObjetConnection.Open)

oui la connexion est ouverte et la ligne est bien là.

Essaie de remplacer les 3 premières lignes du code que je t'ai donné par celles-ci :
Code:

1 2 3 ObjetCommand = ObjetConnection.CreateCommand() ObjetCommand.CommandText = "SELECT * FROM information_schema.TABLES"

26/03/2008, 15h25
DEV-10
Citation:
Envoyé par tomlev

Essaie de remplacer les 3 premières lignes du code que je t'ai donné par celles-ci :

Code:

1 2 3 ObjetCommand = ObjetConnection.CreateCommand() ObjetCommand.CommandText = "SELECT * FROM information_schema.TABLES"
Maintenant l'erreur change à la même ligne et devient

Citation:

Object Reference not set to an instance of an object
26/03/2008, 15h30
BCmDev
Ta connection ne doit pas être instanciée. Ajoute une ligne du type
Code:

1 2 SqlConnection connection = new SqlConnection(connectionString);
26/03/2008, 15h45
tomlev
Citation:
Envoyé par BCmDev

Ta connection ne doit pas être instanciée. Ajoute une ligne du type

Code:

1 2 SqlConnection connection = new SqlConnection(connectionString);
Oui, utilise la connection string qui était dans ton code initial
Je ne t'ai pas donné un code complet, seulement le morceau qui te posait problème...
26/03/2008, 18h03
DEV-10
Citation:
Envoyé par BCmDev

Ta connection ne doit pas être instanciée. Ajoute une ligne du type

Code:

1 2 SqlConnection connection = new SqlConnection(connectionString);
Le bout de programme de tomlev marche bien, sauf que j'avais un test sur l'ouverture de la connexion qui causait le problème. La connexion ne s'ouvrait pas car l'objet n'était pas à Nothing.

Merci à vous deux.