1、可以通过下面的属性返回选定的文件：http://www.foxtable.com/webhelp/topics/1899.htm
2、实际上不是复制到控件2,而是复制到控件2所绑定的列，复制的代码类似：
Dim fl1 As WinForm.FileManager = e.Form.Controls("FileManager1")
Dim fl2 As WinForm.FileManager = e.Form.Controls("FileManager2")
If fl1.SelectedItem IsNot Nothing Then
Dim file1 As String = ProjectPath + "Attachments\" & fl1.SelectedItem
Dim file2 As String = ProjectPath + "Attachments\" & e.Form.Controls("姓名") & e.Form.Controls("任务") & System.IO.Path.GetExtension(file1)
FileSys.CopyFile(file1,file2,True)
Dim r As Row = Tables("xxx").Current
If r.IsNull("第二列") Then
r("第二列") = e.Form.Controls("姓名") & e.Form.Controls("任务") & System.IO.Path.GetExtension(file1)
Else
r("第二列") = r("第二列") & vbcrlf & e.Form.Controls("姓名") & e.Form.Controls("任务") & System.IO.Path.GetExtension(file1)
End If
End If
加好友 
发短信
Post By：2019/8/20 14:38:00 [显示全部帖子]
