Foxtable(狐表)用户栏目专家坐堂 → 4月10号版本发现一bug 请官方测试一下


  共有3436人关注过本帖树形打印复制链接

主题:4月10号版本发现一bug 请官方测试一下

帅哥哟,离线,有人找我吗?
ap9709130
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:11456 威望:0 精华:0 注册:2013/11/24 22:10:00
4月10号版本发现一bug 请官方测试一下  发帖心情 Post By:2020/4/10 9:07:00 [只看该作者]

 老师

    昨天因为电脑问题升级到了最新版.发现了一个bug.

   窗口中的表代码如下:

Tables(e.form.name & "_Tbab").Fill(sql语句,"h",True)

Tables(e.form.name & "_Tbab").SetColVisibleWidth("产品名称|20|企业名称|20|代工企业|20|录入日期|20")
Tables(e.form.name & "_Tbab").DataTable.SysStyles("Normal").FontBold = True
Tables(e.form.name & "_Tbab").DataTable.SysStyles("Alternate").BackColor = Color.SkyBlue
Tables(e.form.name & "_Tbab").AutoSizeCols

其中 sql 语句中用了 Row_Number() 排序 , 打开窗口后 表的列会变成这样.其它的不用 Row_Number() 函数的都正常.请看图:

图片点击可在新窗口打开查看此主题相关图片如下:`6x`b$yolk9f_k1o$a$yf(e.png
图片点击可在新窗口打开查看




 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/10 9:12:00 [只看该作者]

sql语句发上来

 回到顶部
帅哥哟,离线,有人找我吗?
ap9709130
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1470 积分:11456 威望:0 精华:0 注册:2013/11/24 22:10:00
  发帖心情 Post By:2020/4/10 9:17:00 [只看该作者]

 老师

请看以下的sql语句

s ele ct * from (S ele ct Row_Number() Over(Order by 录入日期 DESC,BAXXDW DESC) As 序号,录入日期,(s elec t[产品名称] from {产品目录} where CPDW = {备案信息目录}.产品名称) as 产品名称,(s ele ct [企业名称] from {企业目录} where QYDW = {备案信息目录}.企业名称) as 企业名称,(s ele ct [备案名称] from {备案目录} where BADW = {备案信息目录}.备案名称) as 备案名称,IIF((s ele ct count(*) from {代工明细} where BAXXDW = {备案信息目录}.BAXXDW) < 2,(se le ct [企业名称] from {企业目录} where QYDW = (se lec t QYDW from {代工明细} where BAXXDW = {备案信息目录}.BAXXDW)),'多个代工厂,移鼠标看明细') as 代工企业,BAXXDW,备案日期 From {备案信息目录}) as tmp where 序号 <=  30 * " & ys & " And 序号 > 30 * (" & ys & " - 1) Order by 序号

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/4/10 10:01:00 [只看该作者]

这一句代码的原因,一开始列宽设置的太窄,会导致行号拉高,Tables(e.form.name & "_Tbab").AutoSizeCols会导致列拉宽,但是不会自动缩窄行高。把里面的20改为相对大的值如200即可

Tables(e.form.name & "_Tbab").SetColVisibleWidth("产品名称|20|企业名称|20|代工企业|20|录入日期|20")

 回到顶部