js获取文件路径导入到excel

最新推荐文章于 2025-06-08 14:00:48 发布

原创最新推荐文章于 2025-06-08 14:00:48 发布 · 664 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#js #excel

这段代码演示了如何利用JavaScript遍历文件夹，根据文件后缀（azw3, pdf, mobi, epub）将文件路径填入Excel表格对应列。首先，它打开Excel文件并显示窗口，接着遍历特定路径下的文件，提取文件后缀，然后根据后缀将文件路径写入Excel相应列。最后，保存并关闭工作簿，显示结束行号。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

var xls = new ActiveXObject("Excel.application");
xls.Workbooks.open("D:\\Calibre.xlsx");//打开excel文件
xls.visible = true;//窗口可显示
var xlsheet=xls.ActiveSheet;//操作sheet表
var line = 1;
do {
  line++;
  xlsheet.Cells(line,1).Value != null
  if (xlsheet.Cells(line,1).Value == null) {
    break;
  }
  var str = xlsheet.Cells(line,1).Value
  var file_path=str.split("\\cover.jpg",1)
  var fso = new ActiveXObject("Scripting.FileSystemObject");
  var fldr = fso.GetFolder(file_path);
  fc = new Enumerator(fldr.files);
  for (; !fc.atEnd(); fc.moveNext())//枚举所有文件  
  {
    s = fc.item();   //取文件对象
    var file_name = s.name.lastIndexOf(".");//获取最后一个.的位置
    var ext = s.name.substr(file_name+1);//获取后缀
    if (ext == "azw3") {
      xlsheet.Cells(Number(line),2).Value = s;
    }
    if (ext == "pdf") {
      xlsheet.Cells(Number(line),3).Value = s;
    }
    if (ext == "mobi") {
      xlsheet.Cells(Number(line),4).Value = s;
    }
    if (ext == "epub") {
      xlsheet.Cells(Number(line),5).Value = s;
    }
  }
}
while (xlsheet.Cells(line,1).Value != null);
xls.ActiveWorkbook.Save();
xls.Workbooks.Close();
WSH.Echo("全部完成，结束行：",line);

知识点：
1.do循环中，加入if判断所在位置是否为空来进行break断点退出循环，结束运行。

  if (xlsheet.Cells(line,1).Value == null) {
    break;
  }

2.通过split来对最后文件名进行分割，取开头第一个内容，拿到cover.jpg的路径。

  var str = xlsheet.Cells(line,1).Value
  var file_path=str.split("\\cover.jpg",1)

3.调用Scripting.FileSystemObject对象来遍历路径全部文件。

  var fso = new ActiveXObject("Scripting.FileSystemObject");
  var fldr = fso.GetFolder(file_path);

4.for枚举文件进行提取后缀名，采用lastIndexOf函数，进行获取最后一个.的位置，再用substr定位到位置开始+1提取后缀名。最后if判断，再把Value内容为s（指定文件的路径）导入到相应的excel表格中。

for (; !fc.atEnd(); fc.moveNext())//枚举所有文件  
  {
    s = fc.item();   //取文件对象
    var file_name = s.name.lastIndexOf(".");//获取最后一个.的位置
    var ext = s.name.substr(file_name+1);//获取后缀
    if (ext == "azw3") {
      xlsheet.Cells(Number(line),2).Value = s;
    }
    if (ext == "pdf") {
      xlsheet.Cells(Number(line),3).Value = s;
    }
    if (ext == "mobi") {
      xlsheet.Cells(Number(line),4).Value = s;
    }
    if (ext == "epub") {
      xlsheet.Cells(Number(line),5).Value = s;
    }
  }

5.while到表格中内容 != null 不是时，继续do循环。其中!=为不是，==为啥。直到最后if中的break断点提前结束do循环，避免继续运行发现无内容提取报错。结束后回显结束行号到多少。

while (xlsheet.Cells(line,1).Value != null);
xls.ActiveWorkbook.Save();
xls.Workbooks.Close();
WSH.Echo("全部完成，结束行：",line);

在这里插入图片描述

参考文献：
JS 获取文件后缀，判断文件类型(比如是否为图片格式)
https://blog.csdn.net/qq_45457134/article/details/109486650

JS 遍历文件夹指定后缀文件
https://www.cnblogs.com/ygrzzz/articles/2116750.html