以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  e参数是狐表特有?还是NET特有?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=188068)

--  作者:lin98
--  发布时间:2023/8/30 16:27:00
--  e参数是狐表特有?还是NET特有?
e参数是狐表特有?还是NET特有?
常常e参数报错

--  作者:有点蓝
--  发布时间:2023/8/30 16:30:00
--  
都有。报错是编译异常导致的,一般是电脑环境的原因。

1、把Foxtable设置为“使用管理员身份运行”
2、不要把项目放到云盘,u盘,共享目录等地方运行

--  作者:lin98
--  发布时间:2023/8/30 16:59:00
--  
1、把Foxtable设置为“使用管理员身份运行”,
2、不要把项目放到云盘,u盘,共享目录等地方运行


一、使用管理员身份运行,在开本地电脑,开发,在同一个项目,在一表写代码运行没报错,复制到一另一表,代码基本相同,只是字段不一样,就e参数报错。
二、有时之前项目测试算正常,过一些时间再测试,就e参数报错。
[此贴子已经被作者于2023/8/30 17:00:26编辑过]

--  作者:有点蓝
--  发布时间:2023/8/30 17:05:00
--  
目前只能重启项目,没有其它办法
--  作者:lin98
--  发布时间:2023/8/30 17:20:00
--  
\'Select Case e.DataCol.Name \'
\'    Case "A数量", "B数量", "C数量", "D数量","E数量"\'       
\'        Dim a As Integer = e.DataRow("A数量") \', 
\'        Dim b As Integer = e.DataRow("B数量") \'
\'        Dim c As Integer = e.DataRow("C数量") \'
\'        Dim d As Integer = e.DataRow("D数量") \'
\'        Dim e As Integer = e.DataRow("E数量") \'

\'        If c >= a And b >= a And d >= a And e >= a Then \'
\'            e.DataRow("等级") = "A" \'      
\'        ElseIf c <> 0 And b <> 0 And d <> 0 And e <> 0 Then \'
\'            e.DataRow("等级") = "B" \'                   
\'        Else \'否则:
\'            e.DataRow("等级") = "C" \'
\'        End If
\'End Select


上面代码,报错,提示,局部全变e在声明之前不能被引用,Dim a As Integer = e.DataRow("A数量") ,如何解决?

--  作者:有点蓝
--  发布时间:2023/8/30 17:21:00
--  
关闭退出项目,删除项目所在的文件夹里的bin目录,然后重启项目试试。
--  作者:lin98
--  发布时间:2023/8/30 19:14:00
--  
关闭退出项目,删除项目所在的文件夹里的bin目录,然后重启项目试试。
试过,没用,还是报错

--  作者:有点蓝
--  发布时间:2023/8/31 8:21:00
--  
代码放在什么事件执行的?
--  作者:lin98
--  发布时间:2023/8/31 10:32:00
--  
代码放在
DataColChanged,




--  作者:有点蓝
--  发布时间:2023/8/31 10:35:00
--  
那不可能有问题。联系客服远程看看