计算机专业应用.pptVIP

计算机专业应用 本学期的上课安排 1~7周，每周4节。共28个学时。 第10周提交系统及说明文档。 上机内容1 主要内容 作业存在的问题讲评 1、数据库中表字段的设置问题 销售日记表（数量，单价，折扣） 系统用户表（权限） 2、数据表和自由表问题 数据表（员工，销售日记，商品，供应商） 自由表（访问登记，系统用户） 3、顶层表单的设置问题。 本学期的主要内容 完成系统的后面三部分 1）查询 2）统计 3）系统服务（数据备份，数据恢复，数据的初始化） 知识点回顾。 1、SQL中select 语句的使用。 select 目标子句 from 范围子句 where 条件子句 group by 分组子句 having 分组筛选 order by 排序子句 into dbf/cursor (结果去向） 查询内容设置。 1、按名称查询 功能要求：出现一个表单,按员工姓名查询结果的清单/汇总,在表格grid显示查询结果 n=bo1.value do case case thisform.optiongroup1.value=1 thisform.grid1.recordsource=select 姓名 ,销售日记.* from 员工,销售日记 where 员工.员工编号=销售日记.员工编号 and 员工.姓名=n into cursor d1 case thisform.optiongroup1.value=2 thisform.grid1.recordsource=select sum(数量*单价*折扣) as 总销售额 from 员工,销售日记 where 员工.姓名=n and 员工.员工编号=销售日记.员工编号 into cursor d1 endcase thisform.refresh 2、按日期查询 功能要求：出现一个表单,按日期(年/月/日)查询结果的清单/汇总, 在表格grid显示查询结果 查询按钮的参考代码： do case case thisform.optiongroup1.value=1 if thisform.check1.value=1 y=thisform.spinner1.value if thisform.check2.value=1 m=thisform.spinner2.value if thisform.check3.value=1 d=thisform.spinner3.value thisform.grid1.recordsource=select * from 销售日记 where year(销售日期)=y and month(销售日期)=m and day(销售日期)=d into cursor d1 else thisform.grid1.recordsource=select * from 销售日记 where year(销售日期)=y and month(销售日期)=m into cursor d1 endif else thisform.grid1.recordsource=select * from 销售日记 where year(销售日期)=y into cursor d1 endif endif case thisform.optiongroup1.value=2 if thisform.check1.value=1 y=thisform.spinner1.value if thisform.check2.value=1 m=thisform.spinner2.value if thisform.check3.value=1 d=thisform.spinner3.value thisform.grid1.recordsource=select sum(数量*单价*折扣) as 总销售额 from 销售日记 where year(销售日期)=y and month(销售日期)=m and day(销售日期)=d into cursor d1 else thisform.grid1.recordsource=select sum(数量*单价*折扣)as