参考文献:
《Power Builder 6.5 应用基础》 夏虹、刘群 中国水利水电出版社
《Power Builder 7.0 高级教程》 马晖 编 电子工业出版社
《Power Script 语言、事件与函数》 何军、刘红岩 编 电子工业出版社
《Power Builder 6.5 实用指南》 云舟工作室 编 人民邮电出版社
《Power Builder 6.0 使用与开发指南》 赵鲁印、白卫 编 宇航出版社
《Power Builder 6.0 应用与开发》 吴洁明 著 清华大学出版社
《软件工程导论》 张海藩著 清华大学出版社
《数据库原理与设计》 张龙祥、陶影 等编 西安交大出版社
源程序清单
应用对象脚本：
sqlca.DBMS = ProfileString ("pb.ini", "database", "dbms", "")
sqlca.database = ProfileString ("pb.ini", "database", "database", "")
sqlca.userid = ProfileString ("pb.ini", "database", "userid", "")
sqlca.dbpass = ProfileString ("pb.ini", "database", "dbpass", "")
sqlca.logid = ProfileString ("pb.ini", "database", "logid", "")
sqlca.logpass = ProfileString ("pb.ini", "database", "LogPassWord", "")
sqlca.servername = ProfileString ("pb.ini", "database", "servername", "")
sqlca.dbparm = ProfileString ("pb.ini", "database", "dbparm", "")
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Connectstring='DSN=tushu'"
connect;
open(w_login)
版本信息窗口：
确定按钮脚本：
close（parent）
统计窗口：
打开脚本：
dw_1.settransobject(sqlca)
dw_1.retrieve()
oldsql=dw_1.getsqlselect()
统计条件一的脚本：
string wheresql
string newsql
//设置模糊查询的WHERE条件
wheresql="where qikan.qikanno like '"+sle_1.text+"'"
//合成新的SQL Select语句
newsql=oldsql+wheresql
//数据窗口进行查询
dw_1.setsqlselect(newsql)
dw_1.retrieve()
统计条件二的脚本：
string wheresql
string newsql
//设置模糊查询的WHERE条件
wheresql="where qikan.qikanname like '"+sle_2.text+"'"
//合成新的SQL Select语句
newsql=oldsql+wheresql
//数据窗口进行查询
dw_1.setsqlselect(newsql)
dw_1.retrieve()
统计条件三的脚本：
string wheresql
string newsql
//设置模糊查询的WHERE条件
wheresql="where qikan.nian like '"+sle_4.text+"'"
//合成新的SQL Select语句
newsql=oldsql+wheresql
//数据窗口进行查询
dw_1.setsqlselect(newsql)
dw_1.retrieve()
统计条件四的脚本：
string wheresql
string newsql
//设置模糊查询的WHERE条件
wheresql="where qikan.chubanshe like '"+sle_3.text+"'"
//合成新的SQL Select语句
newsql=oldsql+wheresql
//数据窗口进行查询
dw_1.setsqlselect(newsql)
dw_1.retrieve()
刷新按钮的脚本：
dw_1.setsqlselect(oldsql)
dw_1.retrieve()
<< 上一页 [11] [12] [13] [14] [15] 下一页