VB.NET读取（数据库）配置文件

之前用三层试着做了做登录的小Demo，出的问题还是不少的，不过也还说的过去。在之后，就想把连接数据库的字符串进行一下修正，将它添加到配置文件中，而在代码中直接引用配置文件，进行读取数据，从而连接数据库，进行后续的工作。然而就在这简单的配置文件中，遇到了一个小麻烦。

在没有用配置文件之前，是这样定义的：

Public Class dalLogin
...
Dim Connstr As String = "Data Source=192.168.24.126;Initial Catalog=Student;User ID=sa;Pwd=123456"
...
End Class

这样固然可以实现数据库的连接，但存在一个很严重的问题：如果想要变更数据库，由SQL Server变成Access、Oracle等，或者反之变换，就需要更改代码，这就无疑造成了巨大的麻烦，如果改的不好又会出现其他的Bug。那么怎么才能避免呢？当然，利用配置文件可以有效的避免这些，不过这只是其中的一种方法，还有其他的方法呢，大家可以去试试。下面阐述一下关于配置文件的操作。

首先，在项目中添加一个“应用程序配置文件”，更名为“app.config”（大小写均可），需要注意的是：该配置文件需要创建在UI层的目录中，因为软件只能在UI层读取，如果创建在其他层，软件会找不到该配置文件，很容易出错！之后，在创建好的配置文件中，写入连接数据库的字符串，演示如下：

<?xml version="1.0" encoding="utf-8" ?>
<configuration>
	<appSettings>
		<add key ="Connstr" value ="Data Source=192.168.24.126;Initial Catalog=Student;User ID=sa;Pwd=123456"></add>
		</appSettings>
    <system.diagnostics>
        <sources>
            <!-- 本节定义 My.Application.Log 的登录配置-->
        ...
        </sources>
        ...
    </system.diagnostics>
</configuration>

DAL层中，读取配置文件的代码可以这样写：

Public Class dalLogin
...
Dim Connstr As String = System.Configuration.ConfigurationSettings.AppSettings("Connstr")
Dim conn As SqlConnection = New SqlConnection(Connstr)
...
End Class

到此就可以说，应用配置文件连接数据库就完成了，这样，如果后续工作中，需要更换数据库，那么只需要用记事本打开config文件，进行连接字符串的更改就可以了，而无需在重新部署等，避免了一系列的麻烦。