毕业论文论文范文课程设计实践报告法律论文英语论文教学论文医学论文农学论文艺术论文行政论文管理论文计算机安全
您现在的位置: 毕业论文 >> 课程设计 >> 正文

VB企业人事管理系统数据库课程设计 第3页

更新时间:2010-3-7:  来源:毕业论文
VB企业人事管理系统数据库课程设计 第3页
用E-R图表示该实体如下:
 完整的E-R图如下所示:
系统主要功能模块设计
各模块的主要算法对应的原代码
1、 数据库的连接:
  ⑴ 利用控件Adodc连接:
在Adodc控件中,设置ConnectStringProvider=”SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ManageSystem”,然后再设置CommandType为8 – adCmdUnknown,数据源定为SQL查询语句,语句内容根据不同需要而更改。
  设定ConnectString属性
P.S:当然,可以手工输入,也可以利用“生成”让VB自动给出语句。
设定RecordSource属性
连接数据库核心语句:
Adodc1.ConnectStringProvider=”SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ManageSystem”
Adodc1.RecordSource = SQL查询语句
Adodc1.Recordset.Open
Adodc1.Refresh
断开数据库核心语句:
Adodc1.Recordset.Close
⑵ 利用ADODB对象作为SQL连接接口:
由于在程序中使用瞬间连接数据库比长期连接数据库高效,而且在本程序中大量使用,因而新增了模块Module1,自定义了SqlConnect函数作为连接,SqlDisConnect函数来断开连接,方便编写程序,提高代码使用率,提高开发效率和运行效率。
连接数据库核心语句:
Set Ado_Conn = New ADODB.Connection
Set Ado_RS = New ADODB.Recordset
str_CS = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ManageSystem"
str_RS = SQL查询语句
SqlConnect Ado_Conn, Ado_RS, str_CS, str_RS
其中模块中定义了SqlConnect函数:
Public Sub SqlConnect(ByVal Ado_Connection As ADODB.Connection, _
                   ByVal Ado_Recordset As ADODB.Recordset, _
                        Ado_ConnectionString As String, _
                        Ado_RecordSource As String)
    Ado_Connection.ConnectionString = Ado_ConnectionString
    Ado_Connection.ConnectionTimeout = 30
    Ado_Connection.Open
    Ado_Recordset.Open Ado_RecordSource, Ado_Connection
End Sub
断开数据库核心语句:
SqlDisConnect Ado_RS
其中模块中定义了SqlDisConnect函数:
Public Sub SqlDisConnect(ByVal AdoRecordset As ADODB.Recordset)
    If AdoRecordset.State Then AdoRecordset.Close
End Sub
2、 数据的查询:
    ⑴ 利用表格方式对SQL数据进行查询:
利用连接数据库的方法,返回一个RecordSet集合。
通过MSHFlexGrid控件、DataGrid控件等控件对集合作表格方式的输出。使用Adodc控件时,可以通过属性的设定,把MSHFlexGrid控件、DataGrid1控件捆绑在Adodc控件上。
对用Adodc控件捆绑
当使用ADODB对象时,可以通过Set语句对MSHFlexGrid.DataSourse 进行赋ADODB对象的Recordset值。但是DataGrid1则不能。
⑵ 利用字符窜方式对SQL数据进行查询
利用连接数据库的方法,返回一个RecordSet集合。
通过对RecordSet集合的提取,把元组中的属性值赋给TextBox等控件控件,让其输出。
核心代码:    Adodc1.Recordset.MoveFirst

上一页  [1] [2] [3] [4] [5] [6] 下一页

VB企业人事管理系统数据库课程设计 第3页下载如图片无法显示或论文不完整,请联系qq752018766
设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©751com.cn 辣文论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。