Récupérer une connectionString d'un fichier Web.config

Version imprimable

Salutations !

Je suis actuellement à la recherche de ce que mon titre indique, à savoir :

Je dispose d'une liste, contenant divers éléments, à l'aide d'une boucle "For" je récupère des index, j'aimerais pour chacun de ces index exécuter une requête. Je vous présente mon code :
Code:

1 2 3 4 5 6 7 8 9 10 11 For index As Integer = 0 To active.Items.Count - 1 Formation_Id = active.Items.Item(index).Value requete = "UPDATE Formation SET actif_formation = 1 WHERE (id_formation = " + Formation_Id + ")" Using connection As New SqlConnection() Dim command As New SqlCommand(requete, connection) command.Connection.Open() command.ExecuteNonQuery() command.Connection.Close() End Using Next
Actuellement je n'ai aucune connexion, mais je dispose dans mon fichier Web.config :
Code:

1 2 3 4 <connectionStrings> <add name="Formation_2014ConnectionString" connectionString="Data Source=.\SQLEXPRESS;AttachDbFilename="C:\Program Files\Microsoft SQL Server\MSSQL10.SQLEXPRESS\MSSQL\DATA\Formation_2014.mdf";Integrated Security=True;Connect Timeout=30;User Instance=True" providerName="System.Data.SqlClient" /> </connectionStrings>
de cette connexion, que j'aimerais récupérer !

Une idée de comment procéder ?

-- Edit --

J'ai un exemple de connectionString sur cette page ici ! ou il est clairement dit :

' To avoid storing the connection string in your code,
' you can retrieve it from a configuration file.

Ce que je recherche ! Mais je n'ai pas d'exemple pour cette méthode :/

01/04/2014, 11h56
Krishnak

J'ai trouvé la solution à mon problème !

Code:

Dim ConnStr = ConfigurationManager.ConnectionStrings("Formation_2014ConnectionString").ConnectionString

sujet résolu ;)
01/04/2014, 13h52
rv26t

Bonjour,

Pour inofrmation :

Pour la concaténation de chaîne de caractères en VB, il faut utiliser le caractère &.

Il est préférable utiliser les requêtes paramétrées. Voir Tuto ou Faq.
Cela évite de nombreux soucis.

Ce qui me donne donc :

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
30
31
Dim requete, connStr As String
 
        connStr = ConfigurationManager.ConnectionStrings("Formation_2014ConnectionString").ConnectionString
 
        For index As Integer = 0 To active.Items.Count - 1
 
            requete = "UPDATE Formation SET actif_formation = 1 WHERE (id_formation = @id_formation)"
 
            Using connection As New SqlConnection(connStr)
 
                Dim command As New SqlCommand(requete, connection)
 
                With command.Parameters
                    .Add(New SqlParameter("@id_formation", SqlDbType.Int))
                End With
 
                With command
                    .Parameters("@id_formation").Value = active.Items.Item(index).Value
                End With
 
                Try
                    command.Connection.Open()
                    command.ExecuteNonQuery()
                    command.Connection.Close()
                Catch ex As SqlException
 
                    Response.Write(ex.Message)
                End Try
 
            End Using
        Next