以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [原创]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=64846)

--  作者:nxqtxwz
--  发布时间:2015/3/3 15:23:00
--  [原创]
请问我在删除表A的一行时,想把这一行的内容复制到表B或表C中,表B或表C要通过选择确认,如何写代码呢。
--  作者:Bin
--  发布时间:2015/3/3 15:25:00
--  
参考帮助http://www.foxtable.com/help/topics/2292.htm
--  作者:nxqtxwz
--  发布时间:2015/3/3 15:38:00
--  
我知道这个例子,但这个例子是要在表A中设一个逻辑列,并且复制到表B或表C没有选择,我对如何选择不知怎么写。
--  作者:Bin
--  发布时间:2015/3/3 15:40:00
--  
勾上逻辑列就是选择上呗? 你哪里不懂? 
--  作者:nxqtxwz
--  发布时间:2015/3/3 15:48:00
--  
老师你好,我是新手。我有一个总表A,想把总表A中的某一条记录删除时复制到表B或表C中,具体复制到表B还是表C中要根据记录的内容选择。
--  作者:Bin
--  发布时间:2015/3/3 15:49:00
--  
看2楼,就是这么做.增加一个逻辑列 勾上就复制到表B 不勾上就添加到表C
--  作者:Bin
--  发布时间:2015/3/3 15:49:00
--  
Dim dr As DataRow
if 逻辑列=True then
  dr=DataTables("表B").AddNew
else
 dr =DataTables("表C").AddNew
end if

--  作者:nxqtxwz
--  发布时间:2015/3/3 15:53:00
--  

谢谢了,就是想要个代码,不想在表中高逻辑列。


--  作者:lihe60
--  发布时间:2015/3/3 15:54:00
--  
以下是引用nxqtxwz在2015/3/3 15:23:00的发言:
请问我在删除表A的一行时,想把这一行的内容复制到表B或表C中,表B或表C要通过选择确认,如何写代码呢。

原创是什么意思?


--  作者:Bin
--  发布时间:2015/3/3 15:55:00
--  
这不是代码的问题,问题是你要怎么判断.

难度程序还会读心术,知道你要添加到B还是C吗?

没有逻辑列作为选择判断,也要其他方式的判断,总之得有东西让电脑知道你要干啥.