1. <?xmlversion="1.0"encoding="utf-8"?>

2. <configuration>

3. <!--数据库连接信息-->

4. <appSettings>

5. <addkey="strCon"value="server=127.0.0.1;database=mmas98;uid=sa;pwd=123456;" />

6. </appSettings>

7. </configuration>

上面是App.config文件的内容，如何读取数据库配置信息呢？下面的代码定义了一个过程打开数据库，返回True表示打开成功，返回False表示打开失败：

1. PublicFunctionDBopen()AsBoolean'打开数据库

2. DimconAsString,cnnAssqlClient.sqlConnection

3. con = System.Configuration.ConfigurationManager.AppSettings("strCon")

4. Try

5. cnn =NewsqlClient.sqlConnection(con)

6. cnn.Open()

7. ReturnTrue

8. CatchexAsException

9. MsgBox(ex.Message,MsgBoxStyle.Exclamation,"警告 ")

10. ReturnFalse

11. EndTry

12. EndFunction

注意，需要添加对“System.Configuration”的引用，菜单点击“项目”-->“添加引用”，如图：

• 上一篇：VB.net数据库编程（09）：ADO.net数下一篇：【摘抄】VB.NET中Checked与Uncheck