0225版本更新以后,发现原有项目中的很多统计及查询功能都不能正常使用了,尤其是通过sql语句直接进行的查询。
检查发现,新版table的Fill方法存在严重问题。只要该Table已经在属性中定义了sql语句,或者在执行新的sql语句前已经执行了其它的sql语句,则所有的数据全部无法加载!
这是一个非常简单的例子:
可能的话,请老六紧急更正一下。项目中有很多的基本设置都无法使用了,因为它们也都是根据TreeView中的选择条件、用Fill方法进行加载的。
C版的“更烦恼的事”能否说说?提醒一下让我等注意。
这样就正常了:
Forms("窗口1").RemoveControl("Table1")
Dim t As WinForm.Table
t = Forms("窗口1").CreateTable("Table1","表A",true)
t.SetBounds(12,12,480,300)
Forms("窗口1").AddControl(t)
Tables("窗口1_Table1").Fill("select * from {表A}","",False)
以前也碰到过,没敢提出,好像是使用SQL语句加载数据后,再来Fill 就会出错,说是找不到 X列 什么的。
再者,记得增加临时列后再删除,再来 Fill 也会这样提示。
[此贴子已经被作者于2010-2-26 9:07:36编辑过]
搞定,我今天再更新一次
这次是我自作聪明了,删除了不该删除的一行代码。
以下是引用狐狸爸爸在2010-2-26 9:02:00的发言:
搞定,我今天再更新一次
这次是我自作聪明了,删除了不该删除的一行代码。
转到提取其它外部数据表时,闪动厉害(中间有停顿).
如:
Dim cm As winform.combobox = e.sender
Select Case cm.value
Case "工作号"
Tables("单证_Table3").Fill("Select 工作号,业务员,运输方式 From {业务录入}","myacc",true)
case "核销单号"
Tables("单证_Table3").Fill("Select 工作号,业务员,核销单号 From {核销单管理}","myacc",true)
case "提单号"
Tables("单证_Table3").Fill("Select 工作号,业务员,提单号 From {提单录入}","myacc",true)
end select
二楼的,需要使用窗口重新绘制代码,forms("a").
stopRedraw 和
forms("a").ResumeRedraw