VB.NET Chaîne de connexion (Web.Config, App.Config)

Question

vraiment avoir un temps ennuyeux avec des chaînes de connexion.

J'ai deux projets ensemble dans une seule solution. Une application de formulaires Web agissant comme couche de présentation et une bibliothèque de classes la supportant qui enverra et recevra des données d'une base de données.

- La classe des employés au sein de la bibliothèque de classes de projet -

Friend Class Employee 

Public Function GetEmployees() As DataSet 

    Dim DBConnection As New SqlConnection(My_ConnectionString) 
    Dim MyAdapter As New SqlDataAdapter("exec getEmployees", DBConnection) 

    Dim EmployeeInfo As DataSet 
    MyAdapter.Fill(EmployeeInfo, "EmployeeInfo") 

    Return EmployeeInfo 

End Function 

End Class 

Actuellement, l'application me dit qu'il ne peut pas accéder « My_ConnectionString » que j'ai essayé de stocker dans un fichier de configuration pour un accès répété rapide :

<configuration> 

<system.web> 
    <compilation debug="true" strict="false" explicit="true" targetFramework="4.5" /> 
    <httpRuntime targetFramework="4.5" /> 
</system.web> 

<connectionStrings> 
    <add name="My_ConnectionString" connectionString="Data Source=.\sqlexpress;Initial Catalog=My_DB;Integrated Security=True;"/> 
</connectionStrings> 

</configuration> 

le web.config fait partie du projet de formulaire Web et non la bibliothèque de classes, sont ces projets incapables de « parler » les uns aux autres? Ai-je besoin d'ajouter un fichier de configuration web/app à la bibliothèque de classes pour stocker une chaîne de connexion dans ce projet?

Answer 1

ne sait pas où My_ConnectionString est en provenance de votre exemple, mais essayez cette

System.Configuration.ConfigurationManager.ConnectionStrings("My_ConnectionString").ConnectionString

comme celui-ci

Dim DBConnection As New SqlConnection(System.Configuration.ConfigurationManager.ConnectionStrings("My_ConnectionString").ConnectionString) 

Answer 2

Si c'est une base de données .mdf et la chaîne de connexion a été enregistrée lorsqu'elle a été créé, vous devriez être en mesure d'y accéder via:

Dim cn As SqlConnection = New SqlConnection(My.Settings.DatabaseNameConnectionString) 

espoir qui aide quelqu'un.

Answer 3

Public Function connectDB() As OleDbConnection 

     Dim Con As New OleDbConnection 
     'Con.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=" & DBNAME & ";Data Source=" & DBSERVER & ";Pwd=" & DBPWD & "" 
     Con.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=DBNAME;Data Source=DBSERVER-TOSH;User ID=Sa;Pwd= & DBPWD" 
     Try 
      Con.Open() 
     Catch ex As Exception 
      showMessage(ex) 
     End Try 
     Return Con 
    End Function 

Answer 4

Connexion à AppConfig

<connectionStrings> 
    <add name="ConnectionString" connectionString="Data Source=192.168.1.25;Initial Catalog=Login;Persist Security Info=True;User ID=sa;Password=example.com" providerName="System.Data.SqlClient" /> 
</connectionStrings> 

Dans Class.Cs

public string ConnectionString 
{ 
    get 
    { 
     return System.Configuration.ConfigurationManager.ConnectionStrings["ConnectionString"].ToString(); 
    } 
}