以文本方式查看主题

-  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=34307)
--  作者：8350
--  发布时间：2013/6/4 22:56:00
--  [求助]文件路径--低级问题

因为没有用过弧表，刚刚接触，试试。

 

For Each dr As DataRow In DataTables("表A").DataRows
     Dim fl1 As String = "C:\\A\\" & dr("宗地号") &  "-权属来源表-登记卡-归户卡.XLS"
     Dim fl2 As String = "C:\\B\\"  & dr("宗地号") &"-权属来源表-登记卡-归户卡.XLS"----------这里问题：我是将文件复制到c：\\B\\"表A中的第一列列名文件夹（宗地号）"\\& dr("宗地号") &"-权属来源表-登记卡-归户卡.XLS
     FileSys.CopyFile(fl1,fl2,True)
Next

 

 

 

这里问题：我是将文件复制到c：\\B\\"表A中的第一列列名文件夹（宗地号）"\\& dr("宗地号") &"-权属来源表-登记卡-归户卡.XLS
这里不会写中间的B文件夹下的 宗地号 文件夹下的指定宗地号-权属来源表-登记卡-归户卡exl文件

 

其中宗地号为表A中的第一列
--  作者：Bin
--  发布时间：2013/6/5 8:36:00
--  
Dim fl2 As String = "C:\\B\\"  & dr("宗地号") & "\\" & dr("宗地号") & "-权属来源表-登记卡-归户卡.XLS"