Foxtable(狐表)用户栏目专家坐堂 → [求助]我更新新版后,换了电脑,进程序就出了问题


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

主题:[求助]我更新新版后,换了电脑,进程序就出了问题

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
[求助]我更新新版后,换了电脑,进程序就出了问题  发帖心情 Post By:2019/12/6 21:43:00 [只看该作者]

在项目事件afteropenproject中是
。。。。。。。。。。。。。。。。
Forms("资料管理主表_f").open
图片点击可在新窗口打开查看此主题相关图片如下:i${e)dkx`u`s9ew7hg)hxib.png
图片点击可在新窗口打开查看
'生成临时表
Dim arr As List(Of String)  = DataTables("分项工程表").GetValues("分项工程名称")
Dim fxgc As String  = ""
If arr.Count > 0
    fxgc = cstr(  arr.ToArray(0) )
    
    Dim  temp As String = "[分项工程名称] like '"  +  fxgc   +  "' "
    Dim t As Table = Tables("施工记录表")
    t.Filter = temp
    Functions.Execute("根据施工记录表生成模版数据",fxgc ,t)
End If
。。。。。。。。。。。。。。。。
另外我设置的加密狗也不执行了

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


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

没有必要多此一举

Dim arr As List(Of String)  = DataTables("分项工程表").GetValues("分项工程名称")
If arr.Count > 0
    Dim  temp As String = "[分项工程名称] = '"  &  arr(0) &  "' "
    Dim t As Table = Tables("施工记录表")
    t.Filter = temp
    Functions.Execute("根据施工记录表生成模版数据",  arr(0) , t)
End If

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2019/12/7 0:25:00 [只看该作者]

这样改就好了呢 是不是新版本 做了 修改

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


加好友 发短信
等级:超级版主 帖子:105947 积分:538804 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/7 8:50:00 [只看该作者]

新版本升级到.net4.0,ToArray的用法确实有变化。但是主要的原因还是代码写的不够严谨

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


加好友 发短信
等级:二尾狐 帖子:594 积分:4030 威望:0 精华:0 注册:2015/3/10 13:25:00
  发帖心情 Post By:2019/12/7 17:15:00 [只看该作者]

我发布项目的时候 又报这个 错误但是 找不到 代码在哪里  时间久了 忘记了  怎么找啊

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


加好友 发短信
等级:超级版主 帖子:105947 积分:538804 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/7 17:20:00 [只看该作者]

输出全部代码,搜索:http://www.foxtable.com/webhelp/topics/1987.htm

 回到顶部