Foxtable(狐表)用户栏目专家坐堂 → 无法创建新的堆栈防护页


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

主题:无法创建新的堆栈防护页

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/12 17:16:00 [显示全部帖子]

每次都能这样吗,打开2次同一个项目都会这样吗?

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/12 17:19:00 [显示全部帖子]

每次都能这样吗,打开2次同一个项目都会这样吗?如果是把项目发上来看看,如果不方便,发给客服测试

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/13 22:00:00 [显示全部帖子]

连接的是什么数据库?导出银行流水账这个表部分数据发上来测试。

DataColChanging事件代码没有存在的必要,可以删除

'DataColChanged事件2个地方改改

If e.DataCol.Name="操作类型"

    e.DataRow("制单日期")=Date.Now

    Dim dr As DataRow

    dr=DataTables("系统参数").Find("[表名] = '"  &  e.DataTable.Name & "'And [操作类型]='" &  e.DataRow("操作类型") & "'And [部门]='" &  e.DataRow("部门") & "'")

if dr isnot nothing then

    e.DataRow("工程代码")=dr("工程代码")

end if

End If


2、

e.DataRow("收付编号") = bh & Format(idx,"0000")

e.DataRow.save '因为使用了SQLCompute,如果不保存,下次还是会取到同样的编号


 回到顶部