- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]关于文件名显示在列的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52094)
-- 发布时间：2014/6/9 10:17:00
-- [求助]关于文件名显示在列的问题
此主题相关图片如下：未命名3.jpg
各位狐爸们，请问下，如何在导入数据表后，想在每行数据前加一列显示导入的文件名，这样如何用表代码实现？
[此贴子已经被作者于2014-6-9 10:18:25编辑过]
-- 发布时间：2014/6/9 10:20:00
--
文件名从何而来?
-- 发布时间：2014/6/9 10:20:00
--
就是导入时候EXCEL的文件名
-- 发布时间：2014/6/9 10:23:00
--
参考帮助,编码合并http://www.foxtable.com/help/topics/2334.htm
合并的时候为文件名列赋值为Excel文件名即可
-- 发布时间：2014/6/9 10:24:00
--
这个需要你自己编写代码合并数据，合并以后，对文件名为空的行，赋值成文件名
Dim dlg As New OpenFileDialog
dlg.Filter = "excel|*.xls;*.xlsx"
If dlg.ShowDialog =DialogResult.OK Then
Dim mg As New Merger
mg.SourcePath = dlg.FileName
mg.Format = "Excel"
mg.SourceTableName = "订单$"
mg.DataTableName = "订单"
mg.Merge()
DataTables("订单").ReplaceFor("文件名", FileSys.GetName(dlg.FileName), "文件名 is null")
End If
-- 发布时间：2014/6/9 10:26:00
--
好哒，谢谢~
-- 发布时间：2014/6/9 10:39:00
--
可以像e.DataRow("日期")=Date.Now 这一条一样直接提取文件名字显示在行的么？由于我这边有个导入的窗口了。
-- 发布时间：2014/6/9 10:44:00
--
利用Select获取到对应的行 http://www.foxtable.com/help/topics/0400.htm
-- 发布时间：2014/6/9 10:44:00
--
以下是引用bluetina在2014-6-9 10:39:00的发言：
可以像e.DataRow("日期")=Date.Now 这一条一样直接提取文件名字显示在行的么？由于我这边有个导入的窗口了。
可以像e.DataRow("日期")=Date.Now 这一条一样直接提取文件名字显示在行的么？由于我这边有个导入的窗口了。
什么意思？是说DataRowAdded事件？
-- 发布时间：2014/6/9 10:45:00
--
恩恩