以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自动复制代码问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97639)

--  作者:feixianzhi
--  发布时间:2017/3/16 8:24:00
--  自动复制代码问题

      我想做个按钮,点击后,将A表中第一列所有内容复制到B表中第二列,怎样写代码,请各位老师帮忙。
--  作者:有点蓝
--  发布时间:2017/3/16 8:44:00
--  

参考:http://www.foxtable.com/webhelp/scr/0680.htm

 

http://www.foxtable.com/webhelp/scr/1533.htm

 


--  作者:feixianzhi
--  发布时间:2017/3/23 6:58:00
--  

     麻烦问一下有点蓝老师,我想做一个按钮,把表A的第一列全部复制到第二列,第三列复制到第四列,代码怎么写。
--  作者:有点蓝
--  发布时间:2017/3/23 8:38:00
--  

还是看2楼的帮助,用法一样,表名称使用同一个即可,例如

 


Dim f As New  Filler
f.SourceTable = DataTables("表A") \'指定数据来源
f.SourceCols = "第一列,第三列"  \'指定数据来源列
f.DataTable = DataTables("表A") \'指定数据接收表
f.DataCols = "第二列,第四列"  \'指定数据接收列
f.Append = False
f.Distinct = False
f.Fill() \'填充数据


--  作者:feixianzhi
--  发布时间:2017/3/23 14:14:00
--  

 

谢谢有点蓝老师的帮忙。我再问一下,我在窗口放了一个文件管理器控件,怎么不能用呢,需要什么代码吗。

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170323141045.png
图片点击可在新窗口打开查看


--  作者:feixianzhi
--  发布时间:2017/3/23 14:15:00
--  
点增加、目录、打开、删除都没反应。
--  作者:有点色
--  发布时间:2017/3/23 14:20:00
--  
以下是引用feixianzhi在2017/3/23 14:15:00的发言:
点增加、目录、打开、删除都没反应。

 

绑定某个表某个列,即可。


--  作者:feixianzhi
--  发布时间:2017/3/23 14:59:00
--  
谢谢有点色老师帮忙,又有一个问题。在表中合同照片是多文件类型,我想将窗口中文件管理器中选定的文件添加到合同照片列,编写如下代码,但

ndr("合同照片") = e.Form.Controls("FileManager合同照片").Text

显示如下提示:

.NET Framework 版本:2.0.50727.3649
Foxtable 版本:2017.3.18.1
错误所在事件:窗口,合同录入,Button1,Click
详细错误信息:
未找到类型“FileManager”的公共成员“Text”。

请老师帮忙,如何改代码。


--  作者:feixianzhi
--  发布时间:2017/3/23 15:22:00
--  
还有CheckedComboBox控件的内容,也添加不到表中,代码如下:

ndr("计算依据") = e.Form.Controls("CheckedComboBox计算依据").Text

不知道哪有问题。

--  作者:有点色
--  发布时间:2017/3/23 15:27:00
--  

文件控件绑定的是表,直接取列的值就行啊

 

ndr("合同照片") = Tables("某表").Current("某列")

 

如果需要选中的值,就用selectItem http://www.foxtable.com/webhelp/scr/1899.htm

 

9楼代码没问题。