银行数据库表的设计_第1页
银行数据库表的设计_第2页
银行数据库表的设计_第3页
银行数据库表的设计_第4页
银行数据库表的设计_第5页
已阅读5页,还剩3页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、精选优质文档-倾情为你奉上系统需求分析:1. 在学习了数据库之后,为了更进一步巩固所学知识,将其用于实践,我们选择了银行管理系统,来完成最基本的一些操作。2. 功能 (1).客户:包括存款,取款,转账,查询余额,查看流水,密码修改这些功能 (2).管理员: 1.新增用户 2 .删除 3.查看 4.员工绩效(就是根据流水表中的员工号,select出员工一天内做的所有单,用 来考评绩效) 5.VIP判别(就是账户存储资金大于某个值的时候在账户表的一个字段上赋值为VIP) 6.资金储备金判别,当库存资金总数小于一个值的时候,系统对管理者要提出风险警告。3.功能流程图:详细设计:1.E-R图模型2.根

2、据E-R图设计关系表 (1).银行信息表(bank)字段名字段类型及长度允许空主键 说明Bid nchar(9) no PK银行号Bname nchar(20) no银行名Bmoney numeric(20,3) no银行余额 (2).客户信息表(custom)字段名字段类型及长度允许空主键 说明Cid nchar(9) no PK 客户IDCname nchar(10) no 客户姓名Cpass nchar(10) no 密码Ctime nchar(20) no 注册时间Bid nchar(9) no 所在银行行号 外码(Bank(Bid)Crmoney numeric(10,3) no 账

3、户余额Cphone nchar(11) no 客户电话 (3).员工(管理员)表(staff)字段名字段类型及长度允许空主键 说明Sid nchar(9) no PK 员工IDSname nchar(10) no 员工姓名Spass nchar(10) no 登陆密码SItime nchar(20) no 入行时间Sphone nchar(11) no 联系电话 (4).流水信息表字段名字段类型及长度允许空主键 说明Oid nchar(9) no PK 流水号Cid nchar(9) no 客户ID 外码(Custom(Cid)Bid nchar(9) no 银行ID 外码(Bank(Bid)

4、Sid nchar(9) no 员工ID 外码(Staff(Sid)Otype smallint no 操作类型Otime nchar(20) no 操作时间Omoney numeric(10,3) yes 交易金额OBmoney numeric(10,3) yes 上次余额OAmoney numeric(10,3) yes 账户余额三个实体:bank,staff,custom一个联系:operate关系图:程序代码:客户部分:a. void CClientDlg:OnButtonIn() /存款函数/ TODO: Add your control notification handler c

5、ode hereCInDlg InDlg;if (InDlg.DoModal()=IDOK)double temp,temp1;ADOConn ado;CString sql = "select * from Custom where Cname='"+Cname+"'"_RecordsetPtr ResultSet = ado.GetRecordSet(_bstr_t)sql); CString str = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Crmoney");C

6、String bid = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Bid");CString str4 = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Cid");CString str2= str; /将交易前钱数暂存temp=atof(str);temp1=(double)InDlg.m_InNum;temp+=temp1;str.Format("%f",temp);CString str3 = str; /暂存交易后金额sql = &qu

7、ot;update Custom set Crmoney='"+str+"' "+"where Cname='"+Cname+"'"ado.ExecuteSQL(_bstr_t)sql);sql = "select count(*) num from Operate"ResultSet = ado.GetRecordSet(_bstr_t)sql);int num = atoi(LPCTSTR)(_bstr_t)ResultSet->GetCollect("

8、num");str = ""CString Oid,Cid,Sid,Bid,Otime,Omoney,OAmoney,OBmoney;Oid.Format("%d",+num); Oid=str+Oid; Sid=""Bid = bid; double temp2;sql = "select * from Bank where Bid='"+Bid+"'"ResultSet = ado.GetRecordSet(_bstr_t)sql);CString bmoney =

9、 (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Bmoney");temp2 = atof(bmoney); temp2+=temp1; bmoney.Format("%f",temp2);sql = "update Bank set Bmoney='"+bmoney+"' where Bid='"+Bid+"'"ado.ExecuteSQL(_bstr_t)sql);CString Otype = "存款&qu

10、ot;CString m_time; CTime time;time = CTime:GetCurrentTime();m_time = time.Format("%Y年%m月%d日 %X");Otime = m_time; int flag = 0;Omoney.Format("%f",temp1); OAmoney = str2;OBmoney = str3;sql.Format("insert into Operate values('%s','%s','%s','%s',&

11、#39;%s','%s',%d,%s,%s,%s)",Oid,str4,Bid,Sid,Otype,m_time,flag,Omoney,OAmoney,OBmoney);ado.ExecuteSQL(_bstr_t)sql);ado.ExitConnect();b. void CClientDlg:OnButtonGet() /取款函数/ TODO: Add your control notification handler code hereCGetDlg GetDlg;if (GetDlg.DoModal()=IDOK)double temp,temp1

12、;ADOConn ado; CString sql = "select * from Custom where Cname='"+Cname+"'"_RecordsetPtr ResultSet = ado.GetRecordSet(_bstr_t)sql);CString str = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Crmoney");CString bid = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("B

13、id");CString str4 = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Cid");CString str2= str; /将交易前钱数暂存temp=atof(str);temp1=(double)GetDlg.m_GetNum;if (temp>temp1)temp-=temp1; str.Format("%f",temp); CString str3 = str; /暂存交易后金额sql = "update Custom set Crmoney='"+

14、str+"' "+"where Cname='"+Cname+"'"ado.ExecuteSQL(_bstr_t)sql);sql = "select count(*) num from Operate"ResultSet = ado.GetRecordSet(_bstr_t)sql)int num = atoi(LPCTSTR)(_bstr_t)ResultSet->GetCollect("num");str = ""CString Oid,C

15、id,Sid,Bid,Otime,Omoney,OAmoney,OBmoney;Oid.Format("%d",+num);Oid=str+Oid; Sid=""Bid = bid; double temp2;sql = "select * from Bank where Bid='"+Bid+"'"ResultSet = ado.GetRecordSet(_bstr_t)sql);CString bmoney = (LPCTSTR)(_bstr_t)ResultSet->GetCollect

16、("Bmoney");temp2 = atof(bmoney); temp2-=temp1;bmoney.Format("%f",temp2);sql = "update Bank set Bmoney='"+bmoney+"' where Bid='"+Bid+"'"ado.ExecuteSQL(_bstr_t)sql);CString Otype = "取款"CString m_time; CTime time;time = CTime:G

17、etCurrentTime();m_time = time.Format("%Y年%m月%d日 %X");Otime = m_time; int flag = 0;Omoney.Format("%f",temp1);OAmoney = str2;OBmoney = str3; sql.Format("insert into Operate values('%s','%s','%s','%s','%s','%s',%d,%s,%s,%s)",

18、Oid,str4,Bid,Sid,Otype,m_time,flag,Omoney,OAmoney,OBmoney); ado.ExecuteSQL(_bstr_t)sql);ado.ExitConnect();elseAfxMessageBox("账户余额不足!"); c. void CClientDlg:OnButtonTurn() / TODO: Add your control notification handler code hereCTurnDlg TurnDlg;if (TurnDlg.DoModal()=IDOK)ADOConn ado;CString s

19、ql = "select * from Custom"_RecordsetPtr ResultSet = ado.GetRecordSet(_bstr_t)sql);int flag = 0;while (!ResultSet->adoEOF)CString TCusId = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Cid");CString TCusMon = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Crmoney"); /收钱客户

20、在操作前的余额CString str5 = TCusMon; TCusId.Remove(' ');if (TCusId=TurnDlg.m_TurnId)double temp,temp1; sql = "select * from Custom where Cname='"+Cname+"'"ResultSet = ado.GetRecordSet(_bstr_t)sql);CString str = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Crmoney&qu

21、ot;);CString bid = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Bid");CString str4 = (LPCTSTR)(_bstr_t)ResultSet->GetCollect("Cid");CString str2= str; /将交易前钱数暂存temp=atof(str);temp1=(double)TurnDlg.m_TurnNum; if (temp>temp1)flag = 1; temp-=temp1; /住客户钱数减少str.Format("%f&q

22、uot;,temp);CString str3 = str; /暂存交易后金额sql = "update Custom set Crmoney='"+str+"' "+"where Cname='"+Cname+"'"do.ExecuteSQL(_bstr_t)sql); temp=atof(TCusMon);/收钱客户钱数增加temp+=temp1;TCusMon.Format("%f",temp); sql = "update Custom set

23、Crmoney='"+TCusMon+"' "+"where Cid='"+TCusId+"'"ado.ExecuteSQL(_bstr_t)sql); sql = "select count(*) num from Operate"ResultSet = ado.GetRecordSet(_bstr_t)sql);int num = atoi(LPCTSTR)(_bstr_t)ResultSet->GetCollect("num");str =

24、""CString Oid,Cid,Sid,Bid,Otime,Omoney,OAmoney,OBmoney;int Otype; Oid.Format("%d",+num); Oid=str+Oid; Sid=""Bid = bid; Otype = 2; CString m_time; CTime time;time = CTime:GetCurrentTime();m_time = time.Format("%Y年%m月%d日 %X");Otime = m_time; Omoney.Format("

25、%f",temp1); OAmoney = str2; OBmoney = str3;sql.Format("insert into Operate values('%s','%s','%s','%s',%d,'%s',%s,%s,%s)",Oid,str4,Bid,Sid,Otype,m_time,Omoney,OAmoney,OBmoney); ado.ExecuteSQL(_bstr_t)sql);sql.Format("insert into Operate valu

26、es('%s','%s','%s','%s',%d,'%s',%s,%s,%s)",TCusId,str4,Bid,Sid,Otype,m_time,Omoney,str5,TCusMon); ado.ExecuteSQL(_bstr_t)sql);ado.ExitConnect();break; elseAfxMessageBox("账户余额不足!"); break; ResultSet->MoveNext();if(flag=0)AfxMessageBox("该账户

27、不存在!"); d. void CClientDlg:OnButtonHistoy() /历史记录查询/ TODO: Add your control notification handler code hereCShowHistory showDlg;showDlg.Cname = Cname;showDlg.DoModal();e. void CClientDlg:OnButtonAlter() / TODO: Add your control notification handler code hereCAlterDlg alteDlg;if(alteDlg.DoModal()

28、=IDOK) if (alteDlg.m_AItem=0) if (alteDlg.m_Alter1=alteDlg.m_Alter2) ADOConn ado; CString sql = "update Custom set Cname='"+alteDlg.m_Alter1+"' where Cname='"+Cname+"'"ado.ExecuteSQL(_bstr_t)sql);AfxMessageBox("姓名修改成功!"); else AfxMessageBox(&qu

29、ot;两次姓名输入不一致,请重新输入!"); else if(alteDlg.m_AItem=1) if (alteDlg.m_Alter1=alteDlg.m_Alter2) ADOConn ado;CString sql = "update Custom set Cpass='"+alteDlg.m_Alter1+"' where Cname='"+Cname+"'"ado.ExecuteSQL(_bstr_t)sql); AfxMessageBox("密码修改成功!"

30、); elseAfxMessageBox("两次密码输入不一致,请重新输入!"); elseif (alteDlg.m_Alter1=alteDlg.m_Alter2) if (alteDlg.m_Alter1.GetAt(0)='1'&&alteDlg.m_Alter1.GetLength()=11)ADOConn ado; CString sql = "update Custom set Cphone='"+alteDlg.m_Alter1+"' where Cname='"+Cname+"'" ado.ExecuteSQL(_bstr_t)sql); AfxMessageBox("电话号码修改成功!"); else AfxMessageBox("电话号码格式不对!"); else AfxMessageBox("两次电话输入不一致,请重新输入!"); 高磊磊:心得体会:这次课程设计体会非常深刻,首先在团队合作方面,我觉得自己作为队长没有两道好我的小队,这是我的失职。因此导致我们小队没有按时完成任务,在这里我向老师道歉

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论