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 系统测试的方法
系统测试的方法一般要先经过人工测试,然后再进行机器测试。人工测试是采用人工方式进行,目的在于检查程序的静态结构,找出编译不能发现的错误。人工测试又称代码复审,主要有三种方法:个人复查,走查和会审。机器测试是运用事先设计好的测试用例,执行被测程序,对比运行结果与预期结果的差别以发现错误。机器测试有黑盒测试和白盒测试两种方法。本系统采用采用了走查、会审和黑盒测试。
- 上一篇:Android平台现状分析与未来发展趋势
- 下一篇:基于.NET的三层构架的护理文书系统的设计与实现
-
-
-
-
-
-
-
当代大学生慈善意识研究+文献综述
中考体育项目与体育教学合理结合的研究
十二层带中心支撑钢结构...
杂拟谷盗体内共生菌沃尔...
酸性水汽提装置总汽提塔设计+CAD图纸
乳业同业并购式全产业链...
java+mysql车辆管理系统的设计+源代码
电站锅炉暖风器设计任务书
大众媒体对公共政策制定的影响
河岸冲刷和泥沙淤积的监测国内外研究现状