SQL实训报告
《SQLServer应用技术》实训报告
实训名称：高校学生信息管理系统实训专业：计算机应用技术班级：计算机10A1
学号：104643007姓名：陈健指导教师：刘忠民
201*年12月22日
实训成绩
考核、评价项目对实训期间的出勤情实训表现况、实训态度、安全意与态度识、职业道德素质评定（20分）成绩考核内容得分职业素质、实训态度、效率观念、协作精神实训评价根据学生在实训操作过程中的知识掌握情况、程序设实训操作根据学生实训操作的过计方法和技巧、基本操作技过程程进行考核，评定成绩能、知识应用能力、分析问（40分）题和解决问题的能力，以及创新能力进行考核。根据学生实训，程序设实训考核计的结果进行考核，评（30分）定成绩根据实训项目任务要求，对程序设计的结果，分模块进行测试考核实训文档实训日记、实训报告等（10分）评定成绩表达能力、文档写作能力、文档的规范性总分
一、实训目的
1.熟练掌握SQLServer数据库的设计及其对象的基本操作。2.熟练掌握数据查询、视图、存储过程和触发器的使用方法。3.熟练掌握vb应用程序中界面设计的方法。
4.通过实训，使学生了解数据库系统在实际应用中的开发方法及设计过程，为今后从事管理信息系统的研究、开发、应用提供必要的知识，更好地完成各种计算机应用和开发任务。二、课程设计报告内容1.实训内容
学生信息管理工作是学校管理工作的重要组成部分，现在相当一部分学校的学生管理工作仍沿用手工方式。随着学校规模的扩大、学生人数的增加，效率低下、容易出错的手工方式越来越不适应实际管理工作的需要，按照软件工程原理和数据库技术开发学生信息管理系统已经成为学生管理部门的迫切需要。程设计的题目是高校学生信息管理系统，本项目实现的功能主要包括以下内容：
（1）完成数据的录入和修改，并提交数据库保存。其中的数据包括：专业信息、班级信息、学生信息、选修课程信息和成绩信息等，系统能够自动避免重复信息。
（2）实现信息查询，主要包括学生信息查询、选修课程信息查询和成绩信息查询等。
（3）实现数据的删除功能：对数据进行删除操作。系统能够通过用户给出的条件查询所要删除的数据，并提示用户确认是否删除。若确定，则把相关信息从数据库中删除。
（4）报表功能。包括指定学生的选课情况和指定课程的选修情况。高校学生信息管理系统采用C/S体系结构，按照客户端设计和数据库设计两部分进行。客户端负责提供表达逻辑、显示用户界面信息、访问数据库服务器等，采用VisualBasic6.0作为开发工具；服务器端则采用SQLServer201*作为数据库管理系统，负责后台的数据处理。2.系统功能模块设计
学生信息管理客户端主要对学生信息、课程信息、学生成绩信息进行管理，该系统分4个模功能块，如图所示。
系统主窗学生信息管课程信息管成绩信息管增加学生信息
修改学生信息删除学生信息查找学生信息学生信息报表增加课程信息修改课程信息删除课程信息查找课程信息课程信息报表增加成绩信息修改成绩信息删除成绩信息查找成绩信息3.实训设备或软、硬件
硬件：PⅣ及以上性能的PC机
软件：WindowsXP操作系统；VB6.0；SQLServer201*数据库系统
三、结论
1.数据库设计
数据库的设计主要是在服务器端建立数据库和数据表，并实现数据处理功能。根据系统需求分析和功能设计，可以将数据规划为学生实体、课程实体、选课实体三个实体。在了解了数据库结构设计概念以后，开始创建数据库和数据表。首先，用查询分析器创建student数据库，创建过程中需要注意修改操作系统文件名到新创建的文件夹。然后创建专业信息表spe_Info、班级信息表class_Info、课程信息表course_Info、学生信息表stu_Info、成绩信息表score五个表。在数据库及数据表创建完成后，对SQLSever服务器端数据进行处理。首先创建stucourse_View视图。在数据表的创建过程中应注意，因为学号、专业编号、班级编号等是一一对应的，所以学号在数据表中应设置为主键，设置主键的语句为：stu_Nochar(6)NOTNULLPRIMARYKEY。由于系统对专业信息表等五个表的操作主要有：添加、修改、删除，所以，针对stu_Info、course_Info和score_Info三个表定义相应的储存过程，以便在VisualBasic中根据需要调用对应的储存过程。由于系统对student数据库中数据进行添加、修改、删除操
作时，应保证数据的完整性，所以需对触发器进行定义以保证数据库数据的完整性。对stu_Info表定义的UPDATE触发器trg_stu_update的设计功能是：当修改stu_Info表中某个学生的学号的同时修改score_Info表中该学号对应记录相应的值。在完成了数据库及数据表的创建后，为保证系统功能的实现，需对数据库用户权限进行设置，在用户栏中设置用户及登录密码，维护数据库的安全是确保数据库正常运行的重要工作。最后完成数据库的设计后，要对数据库进行备份。数据库的备份时对SQLSever数据事务日志进行拷贝。做数据备份就是为了方便的数据库恢复用。建数据库是为了与所设计的程序相连接，连接数据库需用到ADO访问数据库。如要连接SQLSever服务器中的student数据库，用如下代码对
Connection
的DefaultDatabase
属性值进行设置：Cnn.
DefaultDatabase=”student”。
2.系统功能实现
“学生信息管理系统”系统功能的实现，主要是在VB中对系统模块进行设计，并连接数据库以达到系统功能的实现。由于程序是利用ADO完成对数据库的访问和操作的，所以在对模块的设计前需要添加ADO库。本系统还需要用到ToolBar控件和MSFlexGrid控件，前者用于连接数据库，后者用于以表格形式显示数据库表的内容。本系统主要用于学生信息管理，主要任务是用计算机对学生各种信息进行日常管理，如：查询、修改、增加、删除。首先是公共模块中定义全局变量及子程序。在模块中PublicMyConnectionAsNewADODB.Connection语句用于建立与数据库的连接。而PublicSQLUsernameAsString用于存放SQL的登录账号。对ChangeFormPos(frmMainAsMDIForm,frmAsForm)子程序定义用于确定调用窗体在主窗体中的显示位置。对登录窗口的设计要用到了ComboBox控件，使在登录时用户可以直接从列表中选择。在设计登录窗体时，需要确保数据库是否连接。在对主窗体MDIformMain的设计中需要添加MDI窗体，在设计过程中对控件的名称及属性的设置要细心，我开始就是由于将登录控件的属性值打成了cmbOK而使系统无法运行。在设计专业管理窗口时，第一次用到了MSFlexGrid控件，该控件的作用是以表格形式显示二维字符数组中每个单元的数据。常
用于处理复杂的二维数据表的问题。如校历表、学生宿舍表、学生班级成绩表等。这是实训过程中所学到的新的知识。通过txtSpeNo.Text=frmSpe.MSFlexGrid1.TextMatrix(frmSpe
.MSFlexGrid1.Row,1)txtSpeName.Text=frmSpe.MSFlexGrid1.TextMatrix(frmSpe.MSFlexGrid1.Row,2)txtSpeNo.Enabled=False语句达到单击MSFlexGrid控件中某记录行时，将该记录的字段值显示在对应的控件中。学生信息管理模块主要是实现学生信息的增加、修改、删除、查询和生成报表等功能，它的子窗体包括添加、修改学生信息窗体、学生信息查询窗体、学生选课报表。在设计学生选课报表时，用到了DataReport报表，这也是以前没有用到的知识。使用DataReport报表可以使显示的信息更加明了并可以方便打印。在报表设计完成后，将以下程序添加到frmStu窗口的工具栏“报表”按钮程序段中，DataEnvironment1.Commands(1).Parameters(1).Value=_
MSFlexGrid1.TextMatrix(MSFlexGrid1.Row,1)StuDataReport.Show，当按下“报表”按钮时，则显示当前MSFlexGrid.TextMatrix(MSFlexGrid1.Row,1)的值所指定学号的学生的所有选课信息。
四、结束语
两周的实训终于结束了，这次实训的内容是应用SQLServer数据库设计VB程序设计来设计“学生信息管理系统”。虽然时间只有短短的两周，但使我获益匪浅，感慨良多。使我感受最深的有如下几点：第一，实训是个人所学知识的应用，是综合能力的检验。要想学好数据库，除了平时的理论功底外，还需要一定的时间动手能力，操作能力，要学会灵活应用所学的知识。第二，通过这次实训，我深深地体会到积累知识的重要性，平时学习的不努力，在实训时必定会遇到很多的麻烦。此次实训让我有了扩宽知识面及提升技术能力的机会，我真正领会到实践与理论相结合的重要性。本次实训的目的是让我们掌握数据库系统的原理、及将理论与实践相结合熟练熟练掌握SQLServer数据库的设计及其对象的基本操作。虽然在实训过程中遇到了许多难点和问题，但在老师和同学们的帮助下，最终解决了这些问题并熟练的掌握了SQLServer数据库的设计及其对象的基本操作以及VB应用程序中界面设计的方法。通过实训，使我了解了据库系统在实际应用中的开发方法及设计过程，为今后从事管理信息系统的研究、开发、应用提供必要的知识，更好地完成各种计算机应用和开发任务。
扩展阅读：SQL实训报告
程设计报
课程名称SQLserver201*管理系别：工程技术系专业班级：计网0901学号：0911060131姓名：江攀课程题目：SQL数据库应用完成日期：201*年12月16日指导老师：师韵
201*年12月16日
课告
Windowsserver201*服务器实训
首先熟知SQLServer201*数据库和MicrosoftVisualBasic课程设计目的6.0企业版的注册方法与技能，了解SQLServer201*的体系结构；掌握使用SQLServer企业管理器创建数据库的技能与方法；掌握使用SQLServer企业管理器创建基本表的技能与方法；了解SQLServer201*查询分析器的应用方法；熟悉SQLServer201*和VisualBasic6.0的运行环境。前后台连接。能认真独立完成实训内容；实训前做好上机实训的准备，课程设计要求针对实训内容，认真复习与本次实训有关的知识，完成实训内容的预习准备工作；实训后做好实训总结（包括实训过程中遇到的问题及其解决方法、实训心得体会等），并根据实训情况完成实训报告。1、Sqlserver数据库对应的物理文件。2、大小的估算和设置。3、触发器的类型。4、触发器的约束。课程设计注意事项课程设计内容
1、数据库的概念设计和逻辑设计。2、数据库和数据表的创建。3、数据查询。4、数据库的备份。5、数据库的导入与导出。Windowsserver201*服务器实训
课程设计简要操作步骤1、安装和配置VB前台和SQL201*后台2、后台SQLserver201*配置，创建服务器，创建数据表3、前台VB6.0设计登录信息窗口写入代码4、前台VB和后台SQL201*关联，然后测试连接是否成功5、启动前台登录窗口测试并完成所有项目6、附录前台登录窗口代码此次实训，虽说时间很短，但其中的每一天都使我收获很大、受益匪课程设计心得体会浅，它极大地加深了我对一些理论知识的理解，在实践能力上也得到了提高，真正地做到了学以致用，对我来说受益非浅。这次实训为我提供了与众不同的学习方法和学习体会，从书本中面对现实，为我将来走上社会打下了扎实的基础。从实践操作中，我总结出一些属于自己的实践经验，社会是不会要一个一无是处的人的。作为在校网络工程专业的学生，现在我能做的就是吸取知识，提高自身的综合素质，提高自己的职业技能，自己有了能力，到时候才会是“车到山前必有路”。我相信在不久的未来，会有属于我自己的一片天空课程设计评语及成绩评语
成绩指导教师（签名）201*年12月日Windowsserver201*服务器实训
附：
一、MicrosoftSQLServer201*企业版和VisualBasic6.0企业版安装：
1、首先熟知SQLServer201*数据库和MicrosoftVisualBasic6.0企业版
的注册方法与技能，了解SQLServer201*的体系结构；掌握使用SQLServer企业管理器创建数据库的技能与方法；掌握使用SQLServer企业管理器创建基本表的技能与方法；了解SQLServer201*查询分析器的应用方法；熟悉SQLServer201*和VisualBasic6.0的运行环境。2、MicrosoftSQLServer201*企业版安装
这是安装成功后：
Windowsserver201*服务器实训
3、VisualBasic6.0企业版安装：
二、后台数据库配置管理：
【开始】【程序】【SQLServer】【服务器网络实用工具】
【客户端网络实用工具】
Windowsserver201*服务器实训
【企业管理器】【sqlserver组】【新建数据库】
【新建表】【xsxxb】
Windowsserver201*服务器实训
三、前台VB配置管理：
1、2、
设置学生信息详情数据系统然后关联SQLserver201*数据库
【connectionstring】-----【使用连接字符串】---获取SQL地址然后生成…
写入代码并测试连接是否正确，｛代码附后录｝
Windowsserver201*服务器实训
学生信息系统是记录学生信息的数据库，不能随便每个人都进吧，呵呵，所以我又设置了一个管理登录窗口，然后将管理登录窗口连接指向学生信息系统，所以需要密码才可以进入查询学生信系统额》。。
3、管理登录系统;
2、管理登录账户：
登录窗口和数据库连接了但还要给予密码账户》。。。我们去数据库创建安全表吧
Windowsserver201*服务器实训
四、前台VB和后台SQLserver201*测试调配：
Windowsserver201*服务器实训
测试成功，实训完成！
Windowsserver201*服务器实训
附：
一、管理登录窗口代码：
PrivateSubCommand1_Click()DimsqlAsString
Dimrs_loginAsNewADODB.RecordsetDimconnAsNewADODB.Connection
conn.Open"Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=Stuscore;DataSource=SOLOVE007"IfTrim(Text1.Text)=""Then
MsgBox"用户名不能为空，请重新输入！"Text1.SetFocusElse
sql="select*fromadminwhereuserl=""&Trim(Text1.Text)&"""rs_login.Opensql,conn,adOpenKeyset,adLockPessimisticIfrs_login.EOF=TrueThen
MsgBox"没有这个用户,请重输入！",vbOKOnly+vbExclamation,""Text1.Text=""Text1.SetFocusElse
UserName=Text1.Text
IfTrim(rs_login.Fields(1))=Trim(Text2.Text)ThenUnloadMe
学生信息详情.ShowElse
MsgBox"密码不正确,请重输入！",vbOKOnly+vbExclamation,""Text2.SetFocusText2.Text=""EndIfEndIfEndIf
cnt=cnt+1Ifcnt=3ThenUnloadMeEndIfEndSub
PrivateSubCommand2_Click()EndEndSub
PrivateSubForm_Load()cnt=0EndSub
Windowsserver201*服务器实训
二、学生信息详情系统：
PrivateSubCommand1_Click()DimmynumberAsString
mynumber=InputBox$("请输入学号(4位)","学号搜索")"输入搜索的学号
Adodc1.Recordset.MoveFirst
"将记录移至第一条Ifmynumber""Then
mynumber="sno=""&mynumber&"""
"组合搜索字符串Adodc1.Recordset.Find(mynumber)
"寻找符合学号的记录
IfAdodc1.Recordset.EOFThen
"没找到，输出提示信息MsgBox"没有该学生！"EndIfEndIf
EndSub
PrivateSubCommand2_Click()DimiAsIntegerOnErrorGoToapperr
Adodc1.Recordset.AddNew"添加新纪录Fori=0To5
Text1(i).Text="""清除数据窗口Next
Text1(0).SetFocus"将焦点设置在Text1(0)savecancelExitSub
apperr:MsgBoxErr.DescriptionEndSub
PrivateSubCommand3_Click()DimsAsString
OnErrorGoTodelerr
s=MsgBox("确定要删除吗?",vbQuestion+vbOKCancel,"确定删除！")"删除确认窗口
Ifs=1Then"确定删除一条记录Adodc1.Recordset.Delete"删除记录Adodc1.Recordset.MoveNext"移至下一条记录IfAdodc1.Recordset.RecordCount>0Then
"是否还有记录IfAdodc1.Recordset.EOFThen
创建12
Windowsserver201*服务器实训
"是否移记录指针到尽头Adodc1.Recordset.MoveLast"移至最后一条记录EndIfEndIfEndIfExitSubdelerr:
MsgBoxErr.DescriptionEndSub
PrivateSubCommand4_Click()DimsAsString
OnErrorGoToupdateerrAdodc1.Recordset.UpdateAdodc1.Refreshinitial_buttonExitSubupdateerr:
MsgBoxErr.Description
EndSub
PrivateSubCommand5_Click()OnErrorGoTocancelerr
Adodc1.Recordset.CancelUpdateinitial_buttonExitSub
cancelerr:MsgBoxErr.DescriptionEndSub
PrivateSubCommand6_Click()EndEndSub
PublicSubsavecancel()Command1.Enabled=FalseCommand2.Enabled=FalseCommand3.Enabled=FalseCommand4.Enabled=TrueCommand5.Enabled=TrueCommand6.Enabled=FalseEndSub
PublicSubinitial_button()
IfAdodc1.Recordset.RecordCount=0ThenCommand1.Enabled=FalseCommand2.Enabled=TrueCommand3.Enabled=FalseCommand4.Enabled=False
Windowsserver201*服务器实训
Command5.Enabled=FalseCommand6.Enabled=TrueElse
Command1.Enabled=TrueCommand2.Enabled=TrueCommand3.Enabled=TrueCommand4.Enabled=FalseCommand5.Enabled=FalseCommand6.Enabled=TrueEndIfEndSub
PrivateSubForm_Load()initial_buttonEndSub
友情提示：本文中关于《SQL实训报告》给出的范例仅供您参考拓展思维使用，SQL实训报告：该篇文章建议您自主创作。
来源：网络整理 免责声明：本文仅限学习分享，如产生版权问题，请联系我们及时删除。
《SQL实训报告》
由互联网用户整理提供,转载分享请保留原作者信息,谢谢!
http://m.bsmz.net/gongwen/625138.html
- 上一篇：实训总结报告
- 下一篇：Oracle实训总结