1、本章介绍了如何在Visual Basic 2005环境下使用ADO.NET和SQL Server 2000设计一个工资管理系统。重点介绍了如何使用函数建立Visual Basic 2005应用程序与SQL Server 2000数据库的连接。,第13章 工资管理系统（SQL版）,本章学习目标,（1）熟练掌握使用SQL Server 2000创建数据库和数据表的方法和步骤。 （2）学会模块的添加和使用。 （3）熟练掌握使用代码编写SQL数据库连接函数、数据读取函数、数据更新函数的方法。 （4）掌握使用Visual Basic 2005和SQL Server 2000开发数据库应用程序的方法。,数
2、据库设计,如果仅将“员工编号”设为“工资表”的主键，则每个员工只有一条工资记录能存放在工资表中。为了保存员工工资的历史记录，应该将“工资表”的主键为“员工编号”“年份”“月份”。方法为：按住【Ctrl】键不放，使用鼠标单击选中“员工编号”、“年份”、和“月份”三个字段，在被选择的最左边的边框部分单击鼠标右键，在弹出菜单中选择【主键】命令，然后松开【Ctrl】键即可。,系统界面设计,编写代码,第13章介绍了使用OleDbConnection、OleDbDataAdapter控件来建立与Access数据库的连接、生成数据集。本章将不采用数据控件实现，而是使用代码编写数据库连接函数、数据读取函数和数
3、据更新函数，使用它们来实现对SQL数据库的操作。读者将能从中体会到两种方法从本质来说是一样的，只是具体的操作方法不同。在实际的编程过程中，应当选用合适的方法来实现。,dataBase模块代码,在dataBase模块的最上面引入访问SQL Server 2000数据库的命名空间，代码如下： Imports System.Data Imports System.Data.SqlClient 在模块中添加一些用于传递数据的公共变量，这些变量具有较长的生命周期和较大的使用范围，代码如下： Public dataConnection As SqlConnection Public dataAdapter
4、 As SqlDataAdapter Public dataSet As dataSet 定义数据库连接字符串,需要根据数据库服务器的具体参数设定 Public connstr As String = “workstation id=LIKER;packet size=4096;integrated security =SSPI;data source=LIKER;persist security info=False;initial catalog=工资管理系统“,公共查询函数,Public Function getDataFromDB(ByVal sqlstr As String) As
5、dataSetTrydataConnection = New SqlConnection 对象实例化dataConnection.ConnectionString = connstr 设置连接字符串 实例化数据适配器，并设置查询字符串dataAdapter = New SqlDataAdapter(sqlstr, dataConnection)dataSet = New dataSetdataSet.Clear()dataAdapter.Fill(dataSet) 填充数据集dataConnection.Close() 关闭连接Catch ex As ExceptionMsgBox(ex.Me
6、ssage)dataConnection.Close()End TryIf dataSet.Tables(0).Rows.Count 0 ThenReturn dataSet 若找到相应的数据，则返回数据集ElseReturn Nothing 若没有找到相应的数据，返回空值End If End Function,执行数据操作的函数,Public Function updateDB(ByVal sqlstr As String) As BooleanDim sqlConn As New SqlConnection(connstr)TryDim cmdTable As SqlCommand = N
7、ew SqlCommand(sqlstr, sqlConn)cmdTable.CommandType = CommandType.Text 设置Command对象的CommandType属性sqlConn.Open()cmdTable.ExecuteNonQuery() 执行SQL语句sqlConn.Close()Catch ex As ExceptionMsgBox(ex.Message)sqlConn.Close()Return FalseEnd TryReturn True End Function,frmPay代码,具体源代码见：P197,小结,本章设计了一个工资管理系统，从中可以学到如何编写Visual Basic 2005应用程序与SQL Server 2000数据库的连接函数，如何使用公共函数操纵数据库等知识。 重点及难点： （1）使用SQL Server 2000创建数据库和数据表； （2）模块的添加和使用； （3）使用代码编写SQL数据库连接函数、数据读取函数、数据更新函数； （4）使用Visual Basic 2005和SQL Server 2000开发数据库应用程序。,
