电信人事管理系统实例的开发于应用,是一个数据库应用系统完整的制作过程。主要内容有:系统开发背景、系统概述、需求分析、系统设计、功能、感受与体会等。电信人数管理系统结合电信部门中实际的人事、财务制度,经过实际的需求进行分析,采用功能强大的Visual Basic 6.0做为开发工具,并运用Access 2000作为后台数据库,而开发出来的单机人事管理信息系统。 源代码 登陆界面 form12 Private Sub Form_Load() Dim mname As String ‘ 定义变量 用于存放姓名变量 Dim pass As String ‘ 定义变量 用于存放存放变量 End Sub Private Sub Command1_Click() mname = Text1.Text ‘将界面的文本框的值赋给给姓名和密码变量 pass = Text2.Text Dim mycn As New ADODB.Connection 定义ADO连接 Dim myrs As New ADODB.Recordset 定义ADO记录集 Set myrs = New ADODB.Recordset mycn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=mang.mdb;" 打开当前目录下的mang.mdb数据库 myrs.Open "SELECT * FROM [user] where (user.user)='" + mname + "';", mycn, adOpenKeyset, adLockOptimistic
- 1
- 粉丝: 0
- 资源: 4
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助