以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 从excel中读取数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=153823) |
-- 作者:朱女士 -- 发布时间:2020/8/24 15:28:00 -- 从excel中读取数据 老师您好! 我有一个从excle读取数据的模块,问题还没有得到解决,我将此表直接拷贝到e:\\目录下了:我的代码: For Each file As String In filesys.GetFiles("e:\\采购订单")
错误信息:未能找到路径“e:\\采购订单”的一部分。
请帮帮我!谢谢! |
-- 作者:有点蓝 -- 发布时间:2020/8/24 15:32:00 -- 放到其他盘试试,比如d盘建一个目录aa,把文件复制到d:\\aa里 For Each file As String In filesys.GetFiles("d:\\aa")
|
-- 作者:朱女士 -- 发布时间:2020/8/24 15:53:00 -- For Each file As String In filesys.GetFiles("d:\\aa\\采购订单") 未能找到路径“d:\\aa\\采购订单”的一部分。 |
-- 作者:朱女士 -- 发布时间:2020/8/24 15:53:00 -- 还是这样 |
-- 作者:有点蓝 -- 发布时间:2020/8/24 15:56:00 -- For Each file As String In filesys.GetFiles("d:\\aa\\") 不要画蛇添足,GetFiles是干嘛用的请认真看看帮助:http://www.foxtable.com/webhelp/topics/0341.htm 如果只有一个文件 Dim Book As New XLS.Book(“d:\\aa\\采购订单.xlsx”) Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim dr As DataRow = DataTables("ylcgmxb").AddNew dr("名称") = sheet(11,2).Text dr("描述及规格") = sheet(11,3).text |