3

我在 app.config 中有如下连接字符串

<add name="CONN" connectionString="SERVER=SERVER\SQLEXPRESS;DATABASE=TRIAL_LINK;uid=sa;pwd=trial"
        providerName="System.Data.SqlClient" />

我有一个名为 DBLinker 的表单，我在其中为用户提供了一个选择其他服务器和数据库的选项。例如，我将服务器名称选择为“MAILSERVER”，将数据库选择为“Actual”。我正在使用以下代码覆盖 app.config 文件。

Dim config As System.Configuration.Configuration = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None)

Dim mySection As ConnectionStringsSection = DirectCast(config.GetSection("CONN"),ConnectionStringsSection)
Dim conStr As String = "SERVER=MAILSERVER;DATABASE=Actual;uid=sa;pwd=trial"

config.ConnectionStrings.ConnectionStrings("CONN").ConnectionString = conStr
config.Save(ConfigurationSaveMode.Full)


ConfigurationManager.RefreshSection(config.AppSettings.SectionInformation.Name)

在此代码之后，我试图打开应用程序的登录表单。但是当我试图在这里访问连接字符串时，它正在获取以前的字符串而不是更新的字符串。

4

2 回答 2

2

如何以编程方式覆盖 web.config 设置

看起来您无法在运行时更改 web.config 并使其在应用程序运行时生效。您可以通过将设置作为字符串的基本部分来解决此问题，然后使用用户选择来构建其余部分。您可以随时将新字符串保存在 Session、cookie 或 Db 中，以便在需要时方便使用，具体取决于您的需要。

希望这可以帮助。

于 2012-10-17T07:14:57.870 回答
1 
 Public Sub updateConfigFile(ByVal con As String)
        'updating config file
        Dim XmlDoc As New XmlDocument()
        'Loading the Config file
        XmlDoc.Load(AppDomain.CurrentDomain.SetupInformation.ConfigurationFile)
        For Each xElement As XmlElement In XmlDoc.DocumentElement
            If xElement.Name = "connectionStrings" Then
                'setting the coonection string
                xElement.FirstChild.Attributes(2).Value = con
            End If
        Next
        'writing the connection string in config file
        XmlDoc.Save(AppDomain.CurrentDomain.SetupInformation.ConfigurationFile)
    End Sub

我用这段代码来解决这个问题。

于 2012-10-19T10:56:15.040 回答