Foxtable(狐表)用户栏目专家坐堂 → [求助]CreateSQLTable增加Table时出现 错误 ,


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

主题:[求助]CreateSQLTable增加Table时出现 错误 ,

帅哥,在线噢!
2900819580
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1365 积分:9955 威望:0 精华:0 注册:2015/6/30 8:46:00
[求助]CreateSQLTable增加Table时出现 错误 ,  发帖心情 Post By:2025/1/7 9:26:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:截屏图片202412200123.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:截屏图片202412200122.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:截屏图片202412200121.jpg
图片点击可在新窗口打开查看

        Dim txt As String = e.Form.Controls("Txt产品ID").text
 Dim tbn As String = txt & "_" & Format(Functions.Execute("返回服务器日期"), "HHmmss")
 MessageBox.Show(tbn & ">>" & "S elect * From {BOM} where  [_Identify] Is Null" & ">>" & "ksg") 
    Dim tbl As WinForm.Table
'    CreateSQLQuery(Name, SqlText , ConnectionName)
    tbl = e.Form.CreateSQLTable(tbn , "Sel ect * From {BOM} where  [_Identify] Is Null" , "ksg")
    tbl.Dock = 5
    e.Form.Controls("TabControl1").Tabpages(id).AddControl(tbl)
    MessageBox.Show(3)

老师,以上代码,发布项目后,执行就会出现错误 ,在本机运行就没有问题,错误如图片所示。
[此贴子已经被作者于2025/1/7 9:26:17编辑过]

 回到顶部
帅哥,在线噢!
2900819580
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1365 积分:9955 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/1/7 9:47:00 [只看该作者]

老师,发现凡是用到以下代码的窗体都会出现错误,或不执行。如tb.Fill,填充数据,发布后其它电脑用的都有问题,但开发环境中调试就没有发现有问题。
软件 开发用了好几年了,就是最近升级了,修改了其它功能,再发布,就出现这种错误。

tb.Fill("sel ect * from {ViewCaption} where [Bname]  = '" & bm & "'" , "Ac_Data", False)


       Dim f As New Filler

        f.SourceTable = Sqldt '指定数据来源

        f.SourceCols = lm

        f.DataTable = dt2 '指定数据接收表

        f.DataCols = lm '指定数据接收列

        f.ExcludeNullValue = True

        f.Distinct = False

        f.Append = True

        f.Fill() '填充数据


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


加好友 发短信
等级:超级版主 帖子:111651 积分:568379 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 9:47:00 [只看该作者]

这样测试呢?tbl = e.Form.CreateSQLTable("table1", "Select * From {BOM} " , "ksg")

发布后是连接的同一个数据库吗

 回到顶部
帅哥,在线噢!
2900819580
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1365 积分:9955 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/1/7 12:51:00 [只看该作者]

老师,以下的代码都不行呀, 数据库是新增的,会不会跟这个有关系?应该怎么检查。
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~``
tbl = e.Form.CreateSQLTable("table1", "Select * From {BOM} " , "ksg")
tbl = e.Form.CreateSQLTable("table1", "Select * From {BOM}  where 1 = 2" , "ksg")
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~``

tb.Fill("sel ect * from {ViewCaption} where [Bname]  = '" & bm & "'" , "Ac_Data", False)

    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~``

Dim f As New Filler

        f.SourceTable = Sqldt '指定数据来源

        f.SourceCols = lm

        f.DataTable = dt2 '指定数据接收表

        f.DataCols = lm '指定数据接收列

        f.ExcludeNullValue = True

        f.Distinct = False

        f.Append = True

        f.Fill() '填充数据




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


加好友 发短信
等级:超级版主 帖子:111651 积分:568379 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/7 13:32:00 [只看该作者]

检查一下后台数据库,看看这些表是不是没有设置主键

 回到顶部
帅哥,在线噢!
2900819580
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1365 积分:9955 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/1/7 13:41:00 [只看该作者]

Dim f As New Filler

        f.SourceTable = Sqldt '指定数据来源

        f.SourceCols = lm

        f.DataTable = dt2 '指定数据接收表

        f.DataCols = lm '指定数据接收列

        f.ExcludeNullValue = True

        f.Distinct = False

        f.Append = True

        f.Fill() '填充数据



老师,设置了主键,之前两个问题解决了,目前还有以上代码不执行。


老师,发现整个项目中用到填充数据的都不执行,也不报错。
[此贴子已经被作者于2025/1/7 20:41:16编辑过]

 回到顶部
帅哥,在线噢!
2900819580
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1365 积分:9955 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/1/8 14:49:00 [只看该作者]

顶一下

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


加好友 发短信
等级:超级版主 帖子:111651 积分:568379 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/8 15:01:00 [只看该作者]

完整代码发上来

 回到顶部
帅哥,在线噢!
2900819580
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1365 积分:9955 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2025/1/8 17:18:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:1.txt


老师,麻烦帮忙看一下,这是其中一个代码,代码没有修改过,在旧版本的FoxTable是可以正常发布,正常使用的,
但升级到了最新版本,发布后就执行了,但在Foxtable中又可以执行。
整个项目只要用到这种方式去合拼数据的都不执行,
[此贴子已经被作者于2025/1/8 17:18:51编辑过]

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


加好友 发短信
等级:超级版主 帖子:111651 积分:568379 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/8 17:37:00 [只看该作者]


 回到顶部
总数 11 1 2 下一页