数据库连接语句

access:

web.config

<configuration>
    <appSettings>
<add key="strConnection" value="DB.mdb" /> 
</appSettings>
</configuration>

方法1.后台直接调用：
Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & System.Web.HttpContext.Current.Server.MapPath(ConfigurationSettings.AppSettings("strConnection"))

 

方法2.
VB类中：
Public Class Class1
    Public Shared Function stringconnection()

        Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & System.Web.HttpContext.Current.Server.MapPath(ConfigurationSettings.AppSettings("strConnection"))
        Return strConn
    End Function
End Class

调用：
myConn = New OleDb.OleDbConnection(Class1.stringconnection) 

 

SQL SERVER

web.config

</system.web>
<appSettings>
<add key="strConnection" value="server=(local);database=DB;uid=;pwd=;" />
</appSettings>
</configuration>

class.vb
Public Shared Function stringconnection()
       Dim strConn As String = ConfigurationSettings.AppSettings("strConnection")
       Return strConn
End Function

调用：
Dim myconn  As SqlClient.SqlConnection = New SqlClient.SqlConnection
myconn.ConnectionString = (class.stringconnection)

PS：还可以对web.config中的value进行加密