图书管理系统设计源代码:*:文件列表FILE图书管理系统.PRG1310657170.JPGGLY.SCXGLYXXCX.SCXJYCX.SCXJYGL.SCXSJGL.SCXTJTS.SCXTSXXCX.SCXTSXXGL.SCX登陆界面.SCX图书管理.DBCDatabaseDatabaseVersion10DatabaseTransactionLogDatabaseStoredProceduresSourceDatabaseStoredProceduresObjectDatabaseStoredProceduresDependenciesTable图书信息表Path图书信息表.dbfField书号书号C100Field书名书名C170Field作者作者C120Field出版社出版社C210IndexxhUnique0Table读者信息表Path读者信息表.dbfField学号学号C100Field姓名姓名C100Field专业专业C100Field电话电话C110Table借阅管理表Path借阅管理表.dbfField学号学号C100Field姓名姓名C100Field已借书号已借书号C100Field已借书名已借书名C100Field借阅日期借阅日期D80TableglyPathgly.dbfField管理员管理员C100Field密码密码C100Field身份证号身份证号C200Field备注备注M40NoCPTransIndex管理员Unique0*:使用VisualFoxPro格式的向导版本生成文档.05*:*******************************************************************************:图书管理系统PUBLICsun,flag,xh,sh,secondtime,printtypeprinttype=0secondtime=0sun=0DOFORM登陆界面.scxREADeventsLeft=1Top=220Width=520Height=200Name="Dataenvironment"Left=10Top=20Width=116Height=90Alias="gly"Database=图书管理.dbcCursorSource="gly"Name="Cursor1"Top=0Left=0DoCreate=.T.Caption="Form1"Name="Form1"Caption="账号"Height=24Left=24Top=12Width=84Name="Label1"Format=""Height=25Left=108Top=12Width=168Name="Text1"Caption="设置新密码"Height=24Left=24Top=84Width=72Name="Label2"Format="spring"Height=24Left=108Top=48Width=168Name="Text2"Caption="身份证号"Height=25Left=24Top=48Width=61Name="Label3"Format="spring"Height=25Left=108Top=84Width=169Name="Text3"Top=168Left=72Height=37Width=133Caption="确认"Name="Command1"+-------PROCEDUREClick|SETexacton|SETorderto管理员|SEEKthisform.Text1.value|+-------IFfound()=.f.||MESSAGEBOX('此账号不存在！',0+64+0,'提示')|+-------ELSE||LOCATEfor管理员=thisform.Text1.value||+-------IF身份证号<>thisform.Text2.value|||MESSAGEBOX('您输入的身份证号不正确！',0+64+0,'提示')||+-------ELSE|||+-------IFlen(thisform.Text3.value)<6||||MESSAGEBOX('密码不得少于6位！',0+64+0,'提示')|||+-------ELSE||||+-------IFthisform.Text3.value<>thisform.text4.value|||||MESSAGEBOX('2次输入的密码不一致，请重新输入！',0+64+0,'提示')||||+-------ELSE|||||REPLACEall密码withthisform.Text3.valuefor管理员=thisform.Text1.value|||||MESSAGEBOX('密码修改成功！',0+64+0,'提示')|||||DOform登陆界面.scx|||||thisform.release||||+-------ENDIF|||+-------ENDIF||+-------ENDIF|+-------ENDIF|+-------ENDPROCCaption="确认新密码"Height=25Left=24Top=120Width=73Name="Label4"Height=25Left=108Top=120Width=169Name="Text4"Name="Dataenvironment"Alias="gly"Database=图书管理.dbcCursorSource="gly"Name="Cursor1"DoCreate=.T.Caption="glyxxcx"Name="Form1"ColumnCount=3Height=229Left=12RecordSource="gly"Top=12Width=361Name="Grid1"Column1.ControlSource="gly.管理员"Column1.Width=75Column1.Name="Column1"Column2.ControlSource="gly.密码"Column2.Width=75Column2.Name="Column2"Column3.ControlSource="gly.身份证号"Column3.Width=75Column3.Name="Column3"Caption="管理员"Name="Header1"BorderStyle=0Margin=0ForeColor=0,0,0BackColor=255,255,255Name="Text1"Caption="密码"Name="Header1"BorderStyle=0Margin=0ForeColor=0,0,0BackColor=255,255,255Name="Text1"Caption="身份证号"Name="Header1"BorderStyle=0Margin=0ForeColor=0,0,0BackColor=255,255,255Name="Text1"Left=1Top=220Width=520Height=200Name="Dataenvironment"Left=10Top=20Width=116Height=...
