在VB.net中,连接SQL Server数据库的连接字符串的问题。
在VB.net中,为了连接SQLServer数据库,我在每个窗体的最开始都要声明一个连接字符串,方便后面的调用。例如:PrivatestrConnAsString="Se...
在VB.net中,为了连接SQL Server数据库,我在每个窗体的最开始都要声明一个连接字符串,方便后面的调用。
例如:
Private strConn As String = "Server=HB-B2006AL; DataBase=SQL_HB_D001; uid=hb001;pwd=456789"
由于向某些窗体中用过数据绑定的控件,添加过数据源。
所以此工程中还存在着我定义过的,名为“SQL_HB_D001ConnectionString_hb002”的连接字符串。
内容为“Data Source=HB-b2006al;Initial Catalog=SQL_HB_D001;User ID=hb001;Password=456789”
其实效果与上面声明的是一样的。
可以在My Project的设置中修改。
熟悉VB.net的各位应该知道,我第二段话中的连接字符串是存在于app.config中的,主要内容为:
<add name="WindowsApplication1.My.MySettings.SQL_HB_D001ConnectionString_hb002"
connectionString="Data Source=HB-b2006al;Initial Catalog=SQL_HB_D001;User ID=hb001;Password=456789"
providerName="System.Data.SqlClient" />
我的问题是:
我想将第一段中的“Private strConn As String =”后面的内容默认成第二段中的内容,也就是app.config中的相关内容。
这样的话如果我要更换服务器名、数据库名、用户名、密码时,修改一次app.config就可以了。
哈哈哈……
自已做出来了,测试成功!
虽然你写了句话,弄得别人也不来答了
但分还是给你吧,要不也是浪费
本人奉行以德报怨
Imports System.Data.SqlClient
Public Class FormA
Dim strConnA As String = My.Settings.SQL_HB_D001ConnectionString_hb002 & "_+-=_+-="
Dim strConn1 As String = (strConnA.Substring(strConnA.IndexOf("Source=") + 7, (strConnA.IndexOf(";Initial")) - (strConnA.IndexOf("Source=") + 7)))
Dim strConn2 As String = (strConnA.Substring(strConnA.IndexOf("Catalog=") + 8, (strConnA.IndexOf(";User")) - (strConnA.IndexOf("Catalog=") + 8)))
Dim strConn3 As String = (strConnA.Substring(strConnA.IndexOf("ID=") + 3, (strConnA.IndexOf(";Password")) - (strConnA.IndexOf("ID=") + 3)))
Dim strConn4 As String = (strConnA.Substring(strConnA.IndexOf("Password=") + 9, (strConnA.IndexOf("_+-=_+-=")) - (strConnA.IndexOf("Password=") + 9)))
Private strConn As String = "Server=" & strConn1 & "; DataBase=" & strConn2 & "; uid=" & strConn3 & "; pwd=" & strConn4
End Clas 展开
例如:
Private strConn As String = "Server=HB-B2006AL; DataBase=SQL_HB_D001; uid=hb001;pwd=456789"
由于向某些窗体中用过数据绑定的控件,添加过数据源。
所以此工程中还存在着我定义过的,名为“SQL_HB_D001ConnectionString_hb002”的连接字符串。
内容为“Data Source=HB-b2006al;Initial Catalog=SQL_HB_D001;User ID=hb001;Password=456789”
其实效果与上面声明的是一样的。
可以在My Project的设置中修改。
熟悉VB.net的各位应该知道,我第二段话中的连接字符串是存在于app.config中的,主要内容为:
<add name="WindowsApplication1.My.MySettings.SQL_HB_D001ConnectionString_hb002"
connectionString="Data Source=HB-b2006al;Initial Catalog=SQL_HB_D001;User ID=hb001;Password=456789"
providerName="System.Data.SqlClient" />
我的问题是:
我想将第一段中的“Private strConn As String =”后面的内容默认成第二段中的内容,也就是app.config中的相关内容。
这样的话如果我要更换服务器名、数据库名、用户名、密码时,修改一次app.config就可以了。
哈哈哈……
自已做出来了,测试成功!
虽然你写了句话,弄得别人也不来答了
但分还是给你吧,要不也是浪费
本人奉行以德报怨
Imports System.Data.SqlClient
Public Class FormA
Dim strConnA As String = My.Settings.SQL_HB_D001ConnectionString_hb002 & "_+-=_+-="
Dim strConn1 As String = (strConnA.Substring(strConnA.IndexOf("Source=") + 7, (strConnA.IndexOf(";Initial")) - (strConnA.IndexOf("Source=") + 7)))
Dim strConn2 As String = (strConnA.Substring(strConnA.IndexOf("Catalog=") + 8, (strConnA.IndexOf(";User")) - (strConnA.IndexOf("Catalog=") + 8)))
Dim strConn3 As String = (strConnA.Substring(strConnA.IndexOf("ID=") + 3, (strConnA.IndexOf(";Password")) - (strConnA.IndexOf("ID=") + 3)))
Dim strConn4 As String = (strConnA.Substring(strConnA.IndexOf("Password=") + 9, (strConnA.IndexOf("_+-=_+-=")) - (strConnA.IndexOf("Password=") + 9)))
Private strConn As String = "Server=" & strConn1 & "; DataBase=" & strConn2 & "; uid=" & strConn3 & "; pwd=" & strConn4
End Clas 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询