以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  找不到路径  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=171630)

--  作者:万寿山
--  发布时间:2021/9/5 11:26:00
--  找不到路径

For Each  file As  String In  filesys .GetFiles("d:\\qqq")
    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("XXXXX").AddNew
    \'    dr("姓名") =  sheet(3,1).Text
    \'    dr("邮箱") =  sheet(7,5).text
    End If
Next


提示:找不到路径

以前都没问题


--  作者:有点蓝
--  发布时间:2021/9/5 21:09:00
--  
d盘有qqq这个文件夹吗
--  作者:万寿山
--  发布时间:2021/9/6 21:08:00
--  
@有点蓝,对不起,我搞错了。