预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10

亲,该文档总共17页,到这已经超出免费预览范围,如果喜欢就直接下载吧~

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

PAGE重庆大学计算机基础系列课程实验报告本课程名称计算机信息管理基础实验学期2011年至2012年第1学期学生所在学院材料科学与工程学院年级2010专业班级学生姓名学号指导教师余嘉实验最终成绩计算机学院基础系制实验题目PowerBuilder开发环境中数据库操作实验时间2011.12.08实验地点DS1408实验成绩实验性质□验证性□设计性√综合性教师评价:□算法正确;□程序结构合理;□语法、语义正确;□实验结果正确;□报告规范;其他:一、实验目的1.理解并掌握PB中数据窗口对象、菜单的概念和使用方法;2.掌握在PB通过数据窗口控件显示数据库表中数据的方法及菜单的基本应用;3.掌握PB中SQLSelect及QuickSelect类型数据源的选取和操作方法;4.掌握在PB中通过数据窗口对数据库数据进行复杂操作的方法;二、实验主要内容及过程(原始记录)1.创建登录窗口,可根据不同对象(老师、学生)关联不同的数据窗口对象(选择数据源:SQLSelect);2.创建菜单,完成菜单设计(涵盖级联、下拉、快捷键、加速键等设计),菜单版式见后。3.主窗口中可根据不同的登录类型,检索出登录人的基本信息数据窗口一(本人的基本信息):(1)(学生号、学生姓名、所在系名)A.学生登录时,按钮示例不可用(ENABLED)B.菜单中m_基本应用的按多个条件查询学生不可见(VISIBLE)C.菜单基本数据维护不可见(VISIBLE)或(2)(教师号、教师姓名、所在系名)显示(显示风格:Grid,选择数据源:SQLSelect);4.通过菜单M_查询课程详情打开子窗口,该子窗口中设计两个数据窗口控件对课程信息进行查询,1.数据窗口对象(上)(显示风格:freeform,选择数据源:QuickSelect),完成前、后行查阅;2.数据窗口对象(下)(显示风格:Grid,选择数据源:QuickSelect)中,完成对课程信息插入、删除、保存、退出功能,并能对课程号精确查询,对课程名称进行模糊查询。3、打开子窗口时,数据窗口控件下中无数据,直到按下按钮_显示课程信息,其中数据才出现。4.完成增加、删除.保存(注意:COMMIT,ROLLBACK的使用)、退出各个按钮5.、通过菜单按多个条件查询学生,打开窗口:按学院、性别两个条件查询表(学号学生姓名学生性别年龄所在系)显示(显示风格:Grid,选择数据源:SQLSelect)6、通过菜单按学生所在系查询该系所有学生选课情况,打开子窗口2,可完成A.数据窗口一:(学生号、学生姓名、学生所在系)B.窗口二:(学生姓名、课程名称、成绩、学生所在系)显示(显示风格:Grid,选择数据源:SQLSelect);C.编制脚本(程序)通过数据窗口1选中的学生表中的记录,根据该生所在系信息,能够在数据窗口2中显示当前学生所在系所有学生成绩信息;菜单版式:三、实验过程及结果(1)界面截图教师登录教师登录后学生登录学生登录后按多个条件查询学生的应用(3)程序1)应用中的open事件//ProfileDatabaseSQLCA.DBMS="ODBC"SQLCA.AutoCommit=FalseSQLCA.DBParm="Connectstring='DSN=database'"connect;ifSQLCA.SQLCode<>0thenMessagebox("连接失败","不能连接到数据库的原因为:"+SQLCA.SQLErrText)returnelseopen(w_main)endif2)登录按钮gs_stuno=sle_1.textgs_stucode=sle_2.textgs_style=ddlb_1.textgs_teano=sle_1.textgs_teacode=sle_2.textifddlb_1.text=""thenmessagebox("警告","请选择类型",Stopsign!)elseifgs_style="学生"thendw_1.dataobject="dw_stu"dw_1.settransobject(sqlca)dw_1.retrieve(gs_stuno,gs_stucode)elseifgs_style="教师"thendw_1.dataobject="dw_teacher"dw_1.settransobject(sqlca)dw_1.retrieve(gs_teano,gs_teacode)endififdw_1.rowcou