如何使用pb做动态数据窗口,并保存出excel,保存出excel我能实现。
如何使用pb做动态数据窗口,就是事先定义了sql语句,或者使用sqlserver储存过程,然后根据定义的sql语句/存储过程查询的内容根据列名自动生成列名和内容,大量报表...
如何使用pb做动态数据窗口,就是事先定义了sql语句,或者使用sqlserver储存过程,然后根据定义的sql语句/存储过程查询的内容根据列名自动生成列名和内容,大量报表需要制作,太吃力了,谢谢解答最好能上次实例。非常感谢!!
展开
1个回答
展开全部
在窗体上新建一数据窗口,不要指定DATAOBJECT,
再建一个CB按钮,clicked事件中写入如下代码:运行即可
string us_code=""
string lsdwsyntax,lsdwsyntax2
string lserr
string lssqlstr
string lserrc
long k=1
lssqlstr="select * FROM 表名(视图名)"
//select * FROM 表名(视图名) 你根据你的情况作修改。
lsdwsyntax = SQLCA.syntaxfromsql(lssqlstr,"style(type=Grid)",lserr)
的报表读取
if len(lserr) > 0 then
messagebox("语句错误信息!",lserr)
end if
dw_1.create(lsdwsyntax,lserrc)
dw_1.settransobject(SQLCA)
dw_1.retrieve()
再建一个CB按钮,clicked事件中写入如下代码:运行即可
string us_code=""
string lsdwsyntax,lsdwsyntax2
string lserr
string lssqlstr
string lserrc
long k=1
lssqlstr="select * FROM 表名(视图名)"
//select * FROM 表名(视图名) 你根据你的情况作修改。
lsdwsyntax = SQLCA.syntaxfromsql(lssqlstr,"style(type=Grid)",lserr)
的报表读取
if len(lserr) > 0 then
messagebox("语句错误信息!",lserr)
end if
dw_1.create(lsdwsyntax,lserrc)
dw_1.settransobject(SQLCA)
dw_1.retrieve()
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询