以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  论坛发贴不正常,网页变形,图片,文字不法跟贴  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187745)

--  作者:lin98
--  发布时间:2023/8/8 16:10:00
--  论坛发贴不正常,网页变形,图片,文字不法跟贴
论坛发贴不正常,网页变形,图片,文字不法跟贴
--  作者:lin98
--  发布时间:2023/8/8 16:11:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:网页出问题.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2023/8/8 16:13:00
--  
截图咯,或者把问题放到记事本发上来
--  作者:lin98
--  发布时间:2023/8/8 16:13:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:批量审核导入问题.jpg
图片点击可在新窗口打开查看

\'If e.DataCol.Name = "审核" AndAlso e.DataRow("审核") =\'已审核\' Then
    
\'    Dim nma() As String = {"A1", "A2", "A3", "A4"} \'A表数据来源列
\'    Dim nmb() As String = {"B1", "B2", "B3", "B4"} \'B表数据接收列
\'    Dim dr As DataRow = DataTables("表B").AddNew
\'    For i As Integer = 0 To nma.Length - 1
\'        dr(nmb(i)) = e.DataRow(nma(i))
\'    Next
\'End If

需求:将表A的已审核的数据全部导入表B后,清空表A,如果表A的审核列的有一行或多行数据未审核,则无法导入任何数据,
上面代码,报错,如何解决

--  作者:有点蓝
--  发布时间:2023/8/8 16:35:00
--  
报什么错?
--  作者:lin98
--  发布时间:2023/8/8 17:15:00
--  
报错在,提示:4楼编译错识,DataCol不是成员


--  作者:有点蓝
--  发布时间:2023/8/8 17:31:00
--  
先看几遍:http://www.foxtable.com/webhelp/topics/0604.htm

不同事件有不同的e参数,表格里才有datacol,控件是不会有的。代码写到合适的地方