数据库实验报告.docx
- 文档编号:24725703
- 上传时间:2023-05-31
- 格式:DOCX
- 页数:28
- 大小:989.11KB
数据库实验报告.docx
《数据库实验报告.docx》由会员分享,可在线阅读,更多相关《数据库实验报告.docx(28页珍藏版)》请在冰豆网上搜索。
数据库实验报告
实验报告1
4.
selectStudent.sclass,Student.sno,sname,ssex,sage,sdept,cname,grade
fromStudentLEFTJOINSCON(Student.sno=SC.snoANDStudent.sclass=SC.sclass)LEFTJOINCourseON(SC.cno=Co)
5.
6.select2014-sagebirth
fromStudent
wheresname='刘晨';
7
selectStudent.sclass,Student.sno,sname,ssex,sage,sdept,cname,grade
fromStudentLEFTJOINSCON(Student.sno=SC.snoANDStudent.sclass=SC.sclass)LEFTJOINCourseON(SC.cno=Co)
whereStudent.snamelike'刘%'
8
selectsname,ssex,grade
fromStudentLEFTJOINSCON(Student.sno=SC.snoANDStudent.sclass=SC.sclass)LEFTJOINCourseON(SC.cno=Co)
whereSC.cno=1
9。
selectcno,cname
fromCourse
wherecponisNULL
10、
selectStudent.sclass,Student.sno,sname,ssex,sage,sdept,cname,grade
fromStudentLEFTJOINSCON(Student.sno=SC.snoANDStudent.sclass=SC.sclass)LEFTJOINCourseON(SC.cno=Co)
whereStudent.ssex='女'andStudent.sclass=2
11.
selectcno,cname
fromCourse
whereccredit<=3andccredit>=2
12
selectStudent.sclass,Student.sno,sname,cname,grade
fromStudentLEFTJOINSCON(Student.sno=SC.snoANDStudent.sclass=SC.sclass)LEFTJOINCourseON(SC.cno=Co)
whereSC.cno=1orSC.cno=2
13
selectStudent.sclass,Student.sno,sname,ssex,sdept,SC.cno,grade
fromStudentLEFTJOINSCON(Student.sno=SC.snoANDStudent.sclass=SC.sclass)LEFTJOINCourseON(SC.cno=Co)
whereCourse.cpon=1andSC.sclass=2
14.selectSC.sclass,SC.sno
fromSCLEFTJOINCourseON(SC.cno=Co)
whereSC.cno=2andgrade=(selectmax(grade)fromSCWherecno=2)
15.
selectSC.sclass,SC.sno
fromSCLEFTJOINCourseON(SC.cno=Co)
whereSC.cno=2andSC.sclass=1andgrade=(selectmax(grade)fromSCWherecno=2andsclass=1)
16
selectSC.sclass,SC.sno
fromSCLEFTJOINCourseON(SC.cno=Co)
whereSC.cno=2andgrade>(selectmin(grade)fromSCWherecno=2)
实验报告2
一、
1,
selectsclass,sno
fromsc
wherecno=1andsnoin(selectsnofromscwherecno=2)
2,
selectsclass,sno
fromsc
wherecno=1andsnonotin(selectsnofromscwherecno=2)
3,
Selectstudent.sclass,student.sno,sname,ssex,sage,sdept,cname,grade
Fromstudent,sc,course
Wherestudent.sno=sc.snoandstudent.scalss=sc.sclassando=oandstudent.sclass=1andsc.snoin
(selectsnofromscwheresclass=1groupbysnohavingavg(grade)>85)
4,
Selectsclasss,sno,snamefromstudent
Wherenotexists(select*fromsc,s1wheres1.sclass=1ands1.sno=2andnotexusts(select*fromsc,s2wheres2.sno=student.snoands2.sclass=student.sclassando=o))
5,
Selectdistinctstudent.scalss,student.sno
Fromstudent
Wherenotexists(select*fromscwheresno=student.snoandcno=1)
6
Select sname,grade
From student,sc
Where student.sclass=sc.sclass and student.sno=sc.sno and cno=2
Order by grade desc
7,
Selectstudent.sclass,student.sno,sum(ccredit)
fromStudentLEFTJOINSCON(Student.sno=SC.snoANDStudent.sclass=SC.sclass)LEFTJOINCourseON(SC.cno=Co)
Groupbystudent.sclass,student.sno
8,
select1sclass,avg(grade)grade
fromSC
whereCno=3andsclass=1
9
insertintoStudentvalues(3,1,'张三丰','男',21,'WC')
insertintoSCvalues(3,1,'8',100)
insertintoCoursevalues(8,'无机化学',NULL,6)
10
DeleteFromscWherecno=3
Select*Fromsc
DeleteFromscWherecno=3
Select*Fromsc
11
Updatestudent
Setsage=sage+1
Wheressex=’男’andsnoin(selectsnofromscwherecno=1andstudent.sno=sc.snoandstudent.sclass=sc.sclass)
Select*Fromstudent
二、
2.1
Createviews_c_grade
Asselectstudent.sno,student.sclass,sname,cname,grade
FromstudntLEFTJOINscON(student.sno=sc.snoandsyident.sclass=sc.sclass)LEFTJOINcourseON(o=o)
2.2
Createviewv_is_score
As
Selectstudent.sno,student.sclass,cname,grade
FromstudntLEFTJOINscON(student.sno=sc.snoandsyident.sclass=sc.sclass)LEFTJOINcourseON(o=o)wheresdept=’I’andgrade>90
3
Select*froms_c_grade
Select*fromv_is_score
4
Selectsclass,sno,ame,grade
Froms_c_grade
Wherecnamein(selectcnamefromcoursewherecno=1)
实验报告3
1,计算器设计
求解方程组:
2、连接数据库
3、研究生管理系统
实验报告4
信息录入界面:
相关代码:
longll_id,ll_i
dateld_birthday
stringls_name,ls_nation,ls_sex,ls_home,ls_tel,ls_party
//数据格式检查
ifsle_id.text=""orisNull(sle_name.text)then
MessageBox("缺少数据","请输入学号")
sle_name.setfocus()
return
elseifsle_name.text=""ORisNull(sle_name.text)then
messagebox("缺少数据","请输入学生姓名")
sle_name.setfocus()
return
endif
ifsle_birthday.text<>""andnotisNull(sle_birthday)then
ifisDate(sle_birthday.text)then
ld_birthday=date(sle_birthday.text)
else
messagebox("输入数据有误","请使用“年-月-日”的日期格式")
sle_birthday.setfocus()
return
endif
endif
ll_id=long(sle_id.text)
//取出党员选择
ifrb_cy.checkedthen
ls_party=rb_cy.text
elseifrb_cp.checkedthen
ls_party=rb_cp.text
else
ls_party=rb_none.text
ENDIF//取出性别选择
IFrb_man.checkedTHEN
ls_sex=rb_man.text
ElseIFrb_woman.checkedTHEN
ls_sex=rb_woman.text
ENDIF//由民族ddlb,取出民族选择
IFddlb_nation.text="none"THEN
ls_nation=""
ELSE
ls_nation=trim(ddlb_nation.text)
endif
//检查学号有无重号
selectstudent.stud_id
into:
ll_i
fromstudent
wherestudent.stud_id=:
ll_id;
IFll_i<>0then
messagebox("错误信息","学号第"+string(ll_i)+"号重号!
请改正。
")
sle_id.setfocus()
return
endif
LS_name=trim(sle_name.text)
LS_home=trim(sle_home.text)
LS_tel=trim(sle_tel.text)
//向数据库写入数据
INSERTINTOstudent
(stud_id,
name,
birthday,
nation,
home,
tel,
resume,
sex,
party)
VALUES(
:
ll_id,
:
ls_name,
:
ld_birthday,
:
ls_nation,
:
ls_home,
:
ls_tel,
:
mle_resume.text,
:
ls_sex,
:
ls_party);
sle_id.text=""
sle_name.text=""
sle_birthday.text=""
mle_resume.text=""
sle_home.text=""
sle_tel.text=""
sle_id.setfocus()
查询界面:
略。
实验报告5
图书管理系统:
主界面
登陆代码:
退出代码:
主界面:
书籍借阅:
代码:
新书入库:
代码;
保存代码:
longSQLCODE
intls_sto=1
//数据格式检验
stringls_isbn,ls_bname,ls_public,ls_writer,ls_class,ls_cno,ls_intro,ls_cato,ll_isbn
realls_price
longll_i=0
ifsle_isbn.text=""orisNull(sle_isbn.text)then
MessageBox("缺少数据","请输入ISBN号")
sle_isbn.setfocus()
return
elseifsle_bname.text=""orisNull(sle_bname.text)then
MessageBox("缺少数据","请输入书名")
sle_bname.setfocus()
return
endif
ifddlb_class.text="none"then
ls_class=""
else
ls_class=Trim(ddlb_class.text)
endif
ls_isbn=Trim(sle_isbn.text)
selectisbn
into:
ll_isbn:
ll_i
fromBook
whereBook.isbn=:
ls_isbn;
ll_isbn=trim(ll_isbn)
ifls_isbn=ll_isbnthen
updateBook
setBsto=Bsto+1
whereBook.isbn=:
ls_isbn;
ifsqlca.sqlcode=0then
MessageBox("成功","保存成功")
sle_isbn.text=""
sle_bname.text=""
sle_public.text=""
sle_price.text=""
sle_writer.text=""
ddlb_class.text=""
mle_into.text=""
mle_cato.text=""
else
MessageBox("错误","保存错误")
endif
sle_isbn.setfocus()
return
endif
ls_bname=Trim(sle_bname.text)
ls_public=Trim(sle_public.text)
ls_price=real(Trim(sle_price.text))
ls_writer=Trim(sle_writer.text)
ls_intro=trim(mle_into.text)
ls_cato=trim(mle_cato.text)
ifls_writer<>""then
Insertintowriter
(Isbn,Wname)
values(:
ls_isbn,:
ls_writer);
endif
ls_class=trim(ddlb_class.text)
//检查分类有没有存在
selectCNuminto:
ls_cno
fromClass
whereCName=:
ls_class;
ifls_cno=""then
open(w_addclass)
return
endif
INSERTINTObook(
Isbn,
Bname,
Bpublic,
Bprice,
Cnum,
Bintro,
Bcato,
Bsto
)
values(
:
ls_isbn,
:
ls_bname,
:
ls_public,
:
ls_price,
:
ls_cno,
:
ls_intro,
:
ls_cato,
:
ls_sto
);
ifsqlca.sqlcode=0then
MessageBox("成功","保存成功")
sle_isbn.text=""
sle_bname.text=""
sle_public.text=""
sle_price.text=""
sle_writer.text=""
ddlb_class.text=""
mle_into.text=""
mle_cato.text=""
else
MessageBox("错误","保存错误")
endif
图书搜索:
读者信息查询:
查询代码:
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 数据库 实验 报告