powerbuilder10,学生成绩数据库设计报告 - 图文(8)

16.使用帮助界面

17 版本信息界面

36

盐城工学院经济与管理学院

18．软件宣传界面

19．备忘录

1）“保存”按钮click事件 integer li_rtn

li_rtn=rte_1.savedocument(\if li_rtn=1 then messagebox(\操作成功\保存路径为d:\\myf.txt\else

messagebox(\操作失败\保存失败\end if 2）“返回”按钮的click事件 close (parent)

37

盐城工学院经济与管理学院

20电子日历

1） 窗口的open事件 oleobject ole ole=ole_1.object ole.today 21．统计分析

1） 窗口的open事件 gr_1.elevation=33 gr_1.spacing=150

gr_1.addcategory(\第一学期\gr_1.addcategory(\第二学期\gr_1.addcategory(\第三学期\gr_1.addcategory(\第四学期\gr_1.addcategory(\第五学期\gr_1.addcategory(\第六学期\gr_1.addcategory(\第七学期\

38

盐城工学院经济与管理学院

gr_1.addseries(\计算机基础\

gr_1.addseries(\程序设计与语言\ gr_1.addseries(\数据结构\ gr_1.addseries(\操作系统\ gr_1.addseries(\程序设计与语言\ gr_1.addseries(\计算机原理\ gr_1.addseries(\数据库原理\ gr_1.addseries(\软件工程\

gr_1.adddata(1,80,1) gr_1.adddata(2,68,2) gr_1.adddata(4,68,5) gr_1.adddata(5,68,6) gr_1.adddata(6,85,5) gr_1.adddata(7,68,7) gr_1.adddata(9,51,7) 22.数据通道

1） 窗口的open事件

serverdb=create transaction u_zxh18_pipe=create pipeline dw_1.settransobject(sqlca) 2） connectserver函数

serverdb.autocommit=true serverdb.dbms=\

serverdb.database=\serverdb.userid=\serverdb.dbpass=\serverdb.servername=\

39

盐城工学院经济与管理学院

serverdb.logid=\serverdb.logpass=\

serverdb.dbparm=\connect using serverdb; return serverdb.sqlcode 3） error函数 string msg choose case ret case -1 msg=\打不开数据管道\ case -2 msg=\列数太多\ case -3 msg=\要创建的表已经存在\ case -4 msg=\要增加的数据的表不存在\ case -5 msg=\未建立于数据库的连接\ case -6 msg=\参数错误\ case -7 msg=\列不匹配\ case -8 msg=\访问的源数据库的sql语句致命错误\ case -9 msg=\访问的目标数据库的sql语句致命错误\ case -10 msg=\已经到达指定的最大错误数\ case -11 msg=\不正确的表语法\ case -12 msg=\需要关键字，但未指定关键字\ case -13 msg=\已经到达指定的最大错误数\ case -15 msg=\数据管道已经在运行\ case -16 msg=\源数据库出错\ case -17 msg=\目标数据库出错\ case -18 msg=\目标数据库处于只读状态，不能写入数据\end choose

messagebox(\数据管道运行出错\4） startpipe函数

40

盐城工学院经济与管理学院