论文网
关于数据库类论文范文集,与学士学位毕业设计相关论文查重免费
本论文是一篇关于数据库类论文查重免费,关于学士学位毕业设计相关学士学位论文范文。免费优秀的关于数据库及信息管理及管理系统方面论文范文资料,适合数据库论文写作的大学硕士及本科毕业论文开题报告范文和学术职称论文参考文献下载。
才能进行系统的登录.3.1.1服务器登录模块的设计
本模块主要是通过Server类来实现的.系统进入服务器登录界面后,首先输入服务器名称,再输入服务器分配的用户名和密码.成功登录服务器之后才能进行登录系统的操作.它主要设计思想是,当系统启动时,首先从启动文件里找设置服务器信息的文件Server.ini,如果该文件存在调用ReadServerIni(FileNameStr,ServerName,UserName,PassWord)从该文件里读出信息,利用该信息调用ConnectServer(ServerName,UserName,PassWord)函数进行与服务器的连接,如果连接成功,则进入启动系统界面.如果从Server.ini读出的信息不能成功连接服务器或者Server.ini根本就不存在,则调用SetServerIni(FileNameStr)重新设置登录服务器的信息,进行与服务器的连接,连接成功之后再设置Server.ini中的SQLServer登录服务器信息ServerName,UserName,PassWord.Server类的成员函数如表3.1所示.
| 有关论文范文主题研究: | 关于数据库的论文范文 | 大学生适用: | 学年论文、学院学士论文 |
|---|---|---|---|
| 相关参考文献下载数量: | 74 | 写作解决问题: | 毕业论文怎么写 |
| 毕业论文开题报告: | 标准论文格式、论文结论 | 职称论文适用: | 技师论文、职称评中级 |
| 所属大学生专业类别: | 毕业论文怎么写 | 论文题目推荐度: | 优质选题 |
表4Server类的成员函数
函数名参数具体说明ReadServerIniFileNameStr
ServerName
UserName,
PassWord从文件(FileNameStr)中读取SQLSERVER服务器信息包括服务器(ServerName),用户名(UserName),密码(Password)SetServerIniFileNameStr设置文件(FileName)中SQLSERVER服务器信息ConnectServerServerName,
UserName,
PassWord连接服务器,通过引用参数(ServerName,UserName,PassWord)返回连接对象,返回值表示是否成功连接'从server.ini文件中读取SQLSERVER服务器信息
PrivateFunctionReadServerIni(ByValFileNameStrAsString,_
ByRefServerNameAsString,_
ByRefUserNameAsString,ByRefPassWordAsString)AsBoolean
DimsrAsStreamReader
Try
sr等于NewStreamReader(FileNameStr)
CatchexAsException
ReturnFalse
EndTry
DimlineAsString
Try
ServerName等于sr.ReadLine
UserName等于sr.ReadLine
PassWord等于sr.ReadLine
sr.Close()
ReturnTrue
CatchEAsException
ReturnFalse
EndTry
EndFunction
'设置server.ini文件中SQLSERVER服务器信息
PrivateFunctionSetServerIni(ByValFileNameStrAsString)AsBoolean
'frmSetserverIni是设置登录服务器信息的窗口
DimfrmAsNewfrmSetServerIni
DimServerName,UserName,PassWordAsString
WhileTrue
frm.ShowDialog()
Iffrm.DialogResult等于DialogResult.CancelThen
frm.Close()
ReturnFalse
EndIf
ServerName等于frm.cboServerName.Text
UserName等于frm.txtUserName.Text
PassWord等于frm.txtPassword.Text
'下面连接SQLSERVER判断输入是否正确
IfConnectServer(ServerName,UserName,PassWord)Then
ExitWhile
Else
MessageBox.Show("输入信息不正确,无法连接SQLSERVER服务器！！！","警")
EndIf
EndWhile'将服务器信息写入server.ini
DimswAsStreamWriter等于NewStreamWriter(FileNameStr)
sw.WriteLine(ServerName)
sw.WriteLine(UserName)
sw.WriteLine(PassWord)
sw.Close()
ReturnTrue
EndFunction
'连接服务器,通过引用参数返回连接对象,返回值表示是否成功连接
PrivateFunctionConnectServer(ByValServerNameAsString,_
ByValUserNameAsString,ByValPassWordAsString)AsBoolean
DimStrConnAsString
StrConn等于"datasource等于"&,_
ServerName&,",initialcatalog等于Hrsys,userid等于"&,_
UserName&,",password等于"&,PassWord
Try
myconnection等于NewSqlClient.SqlConnection(StrConn)
myconnection.Open()
CatchexAsException
ReturnFalse
EndTry
myconnection.Close()
ReturnTrue
EndFunction
3.1.2系统登录窗体的设计
登录服务器之后调用该窗体登录主系统,其主要思想是通过用户输入的用户名以及密码和数据库里的对应记录进行比较,如果条件符合则登录系统主界面,用户登录成功后,根据用户的类型对用户开放相应的权限,进行不同的管理操作.另外,还可以根据显示器的分辨率来选择主界面.主要是通过登录函数Login(UserNmae,Password)来实现的,函数参数分别表示用户名和密码.
3.2系统主界面模块的实现
本系统主要部分有8个模块组成,分别是部门管理,员工基本信息管理,员工考勤管理,员工考评管理,员工工资管理,系统用户信息管理,综合数据管理,系统数据维护.系统主界面如图7所示.
图7企业人力资源管理系统主界面
3.2.1部门管理模块的实现
本模块采用树状结构来管理部门数据,也就是在部门之间建立从属关系.主要使用树形控件TreeView的属性和方法来实现部门的管理.利用TreeView控件节点的Text和Tag属性来实现部门名称和部门编号的记录.Tag的值是相关部门进行管理的依据,比较方便的对部门进行检索,近而作处理.部门管理只有具有部门主管级别以上的用户才能进行管理,否则只能浏览部门信息.只有人力资源主管超级用户能对所有的部门进行管理,其他的部门主管只能管理自己的部门.所做的一切都是通过Department类来实现的,Department类的成员函数如表5所示.
表5Department类的成员函数
函数名参数具体说明DeleteTmpId删除指定的部门记录.参数表示要删除的部门编号GetInfoTmpId读取指定部门的记录.参数表示要读取的部门编号GetNewIdtree生成新记录的部门编号.主要是通过TreeView控件的节点的属性Tag和Text来控制和记录部门编号和部门名称.本系统采用程序控制自动生成部门编号HaveEmpTmpDepid判断指定部门是否存在员工.参数表示指定的部门的编号.如果返回True则表示该部门存在员工,否则表示部门不存在员工.此函数在删除部门之前调用,如果返回True,则不能删除指定的部门HaveSonTmpUpperId判断指定部门是否存在下级部门.参数表示指定的部门的编号.如果返回True则表示该部门存在下级部门,否则表示部门不存在下级部门.此函数在删除部门之前调用,如果返回True,则不能删除指定的部门In_DBDepName判断指定的部门名称是否已经在数据库中.参数表示指定部门的名称Inserttree插入新的部门记录.插入数据之前首先调用GetNewId函数来生成新记录的部门编号UpdateTmpId修改指定的部门记录.参数表示修改的部门的编号GetNameTmpId读取指定的部门名称.参数表示指定部门的编号GetIdTmpName读取指定的部门编号.参数表示指定部门的名称'部分代码如下:
PublicFunctionGetNewId(ByValtreeAsTreeView)AsString
DimnAsInteger等于1
DimsAsInteger
DimcurnodeAsTreeNode等于NewTreeNode
curnode等于tree.SelectedNode.FirstNode
Forn等于1Totree.SelectedNode.Nodes.Count
IfCInt(curnode.Tag)>
关于数据库类论文范文集,与学士学位毕业设计相关论文查重免费参考文献资料：