1,111
社区成员
发帖
与我相关
我的任务
分享关于动态创建数据窗口
我有一个表，表中的字段都给出，我想动态创建一个窗口，在窗口上动态建立一个freeform形式的datawindow，各个字段来自那张表，能不能给出代码
多谢了
多谢了
...全文
请发表友善的回复…
发表回复
wjbboo 2004-09-09
- 打赏
- 举报
up
cxwsoftware 2004-08-06
- 打赏
- 举报
帮你顶!
地狱余烬 2004-08-06
- 打赏
- 举报
xingtao(as) 的代码,image 类型会出错,行不通
littlerainsnow 2004-05-10
- 打赏
- 举报
救救我吧：）
superbee111 2004-05-09
- 打赏
- 举报
学习中！
yebigroc 2004-05-09
- 打赏
- 举报
顶
littlerainsnow 2004-05-09
- 打赏
- 举报
klbt(快乐白兔）：
能不能举个例子，保存dw，再导入
谢谢啦
能不能举个例子，保存dw，再导入
谢谢啦
yangxingbo 2004-05-08
- 打赏
- 举报
好好学一下 我也不懂
klbt 2004-05-08
- 打赏
- 举报
用LibraryImport函数保存DW
feixianzhi 2004-05-08
- 打赏
- 举报
楼上的代码很好！！可以用！！
xingtao 2004-05-08
- 打赏
- 举报
string ERRORS, sql_syntax
string presentation_str, dwsyntax_str
sql_syntax = "SELECT * FROM 表名"
presentation_str = "style(type=freeform)"
dwsyntax_str = SQLCA.SyntaxFromSQL(sql_syntax,presentation_str, ERRORS)
IF Len(ERRORS) > 0 THEN
MessageBox("Caution", "SyntaxFromSQL caused these errors: " + ERRORS)
RETURN
END IF
dw_1.Create( dwsyntax_str, ERRORS)
dw_1.settransobject(sqlca)
dw_1.retrieve()
IF Len(ERRORS) > 0 THEN
MessageBox("Caution", "Create cause these errors: " + ERRORS)
RETURN
END IF
string presentation_str, dwsyntax_str
sql_syntax = "SELECT * FROM 表名"
presentation_str = "style(type=freeform)"
dwsyntax_str = SQLCA.SyntaxFromSQL(sql_syntax,presentation_str, ERRORS)
IF Len(ERRORS) > 0 THEN
MessageBox("Caution", "SyntaxFromSQL caused these errors: " + ERRORS)
RETURN
END IF
dw_1.Create( dwsyntax_str, ERRORS)
dw_1.settransobject(sqlca)
dw_1.retrieve()
IF Len(ERRORS) > 0 THEN
MessageBox("Caution", "Create cause these errors: " + ERRORS)
RETURN
END IF
littlerainsnow 2004-05-08
- 打赏
- 举报
提示说"style(type=freeform)"is not valid
在一个窗口中创建的datawindow怎么保存下来，不用每次需要是再创建
谢谢啦
在一个窗口中创建的datawindow怎么保存下来，不用每次需要是再创建
谢谢啦
ghost34 2004-05-08
- 打赏
- 举报
不错的代码。
yebigroc 2004-05-08
- 打赏
- 举报
就用楼上的代码
