- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 目录文件找不到 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63547)
-- 发布时间：2015/1/23 10:23:00
-- 目录文件找不到
老师，我做测试在命令窗口中输入
For Each file As String In filesys .GetFiles("C:\\Users\\19880034\\Documents\\Foxtable项目\\")
Output.Show(file)
Next
可以看到文件 合同明细.xls
但输入For Each file As String In filesys .GetFiles("C:\\Users\\19880034\\Documents\\Foxtable项目\\合同明细.xls")
Output.Show(file)
Next
却出错！我需要利用合同明细的一些数据再返输入到另一个表中。
此主题相关图片如下：spximage2.jpg
-- 发布时间：2015/1/23 10:25:00
--
此主题相关图片如下：spximage2.jpg
-- 发布时间：2015/1/23 10:26:00
--
呃，红色代码，必须是目录名，而不是文件名
For Each file As String In filesys .GetFiles("C:\\Users\\19880034\\Documents\\Foxtable项目\\")
Output.Show(file)
Next
-- 发布时间：2015/1/23 10:26:00
--
你第二行代码莫名奇妙
-- 发布时间：2015/1/23 10:27:00
--
如果要操作excel，参考这里 http://www.foxtable.com/help/topics/1144.htm
-- 发布时间：2015/1/23 10:30:00
--
是的，我就是要操作Excel, 可是出错，我才去命令窗口测试一下。代码如下：
For Each file As String In filesys .GetFiles("C:\\Users\\19880034\\Documents\\Foxtable项目\\合同明细.xls")
If file.EndsWith(".xls") OrElse file.EndsWith(".xlsx") Then
Dim Book As New XLS.Book(file)
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim dr As DataRow = DataTables("销售收入").AddNew
dr("客户简称") = sheet(4,1).Text
dr("合同编号") = sheet(5,14).text
dr("非含税价格") = sheet(9,12).text
dr("含税价格") = sheet(10,12).text
End If
Next
-- 发布时间：2015/1/23 10:32:00
--
看5楼.
-- 发布时间：2015/1/23 11:24:00
--
老师，一般来说统计表中的合计、总计都放在下面，如果我想把它放在上面，也就是把合计、总计的表格固定住，应该怎么设计Excel模板啊？
-- 发布时间：2015/1/23 11:25:00
--
此主题相关图片如下：spximage2.jpg
-- 发布时间：2015/1/23 11:28:00
--
老师，一般来说统计表中的合计、总计都放在下面，如果我想把它放在上面，也就是把合计、总计的表格固定住，应该怎么设计Excel模板啊？
设计标记，然后在报表事件那里写代码
http://www.foxtable.com/help/topics/1396.htm
http://www.foxtable.com/help/topics/1954.htm