VB+access公司管理系统设计-基本数据模块(8)
时间:2016-12-01 22:09 来源:毕业论文 作者:毕业论文 点击:次
6.2 数据库的连接 6.2.1 引用ADO 在Visual Basic环境下，选择“工程”→“引用”命令，在随后出现的对话框中选择“Driver do Microsoft ActiveX Data Objects 2.0 Library”，然后单击“确定”按钮， 6.2.2 公共模块的建立 建立公共模块可以提高代码的效率，同时使得修改和文护代码都很方便。 创建公共模块的步骤如下： (1) 在菜单中选择“工程”→“添加模块”命令，则出现模块对话框； (2) 在对话框中，选择模块，单击“打开”按钮，则模块已经添加到项目中了。 (3) 在模块中定义整个项目的公共变量。 在程序设计的公共模块中，定义ADO连接对象，建立和数据库的连接，语句如下： Option Explicit Public dbConn As New ADODB.Connection Public loginUser As String Public loginOK As Boolean Public cmdType As String Public tUser_id As String Public tDept_id As Integer Public tEmp_id As Integer Public tCheck_ym As String Public tQx As String Sub Main() If ConnectToDatabase = False Then MsgBox "连接数据库出错！" End End If loginOK = False cmdType = "" frmLogin.Show vbModal Unload frmLogin If loginOK Then MDIForm1.Show End If End Sub '连接到数据库 Function ConnectToDatabase() As Boolean On Error GoTo ERR_CONN '设置服务器名称，数据库名称，登录名（此时假设密码为空） dbConn.ConnectionString = "dsn=man;Database=man;uid=sa;pwd=" 'dbConn.ConnectionString = "Provider=msdasql;Database=man;server=computer;uid=sa;pwd=" dbConn.Open ConnectToDatabase = True Exit Function ERR_CONN: ConnectToDatabase = False End Function 6.2.3 设置ODBC VB的ADO对象是通过ODBC来访问数据库，所以还要建立ODBC数据引擎接口。 (1)打开控制面板中的“管理工具”→“数据源(ODBC)”框。 (2)单击“添加”按钮，出现“创建数据源对话框” (3)选择Microsoft Access Driver(*.mdb),单击“完成”按钮 (4)选择好数据库，在数据源名文本中添加一个名字，单击“确定”按钮完成系统默认连接设置。然后在ODBC对话框中单击“确定”按钮完成ODBC设置。 7 系统测试和文护 7.1 系统测试 系统测试是管理信息系统开发周期中一个十分重要而漫长的阶段。其重要性体现在它上保证系统质量与可靠性的最后关口，是对整个系统开发过程（包括系统分析、系统设计和系统实现）的最终审查。之所以说系统测试是一个漫长的过程，是因为测试阶段占用的时间、花费的人力和成本占软件开发的很大比例。 7.1.1 系统测试的方法 系统测试的方法一般要先经过人工测试，然后再进行机器测试。人工测试是采用人工方式进行，目的在于检查程序的静态结构，找出编译不能发现的错误。人工测试又称代码复审，主要有三种方法：个人复查，走查和会审。机器测试是运用事先设计好的测试用例，执行被测程序，对比运行结果与预期结果的差别以发现错误。机器测试有黑盒测试和白盒测试两种方法。本系统采用采用了走查、会审和黑盒测试。 (责任编辑：qin) |