• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    批处理将文件侠内的文件名导入表格对应名称中

    使用批处理实现将相片文件内的相片名称导入1表格对应名字中

    方法一

    /*cls
    @echo off
    dir /b "相片\*.jpg"|cscript -nologo -e:jscript "%~f0"
    pause  exit/b
    */
    
    var jpglist = '';
    while(!WScript.StdIn.AtEndOfStream){
      jpglist += WScript.StdIn.ReadLine()+'\r';
    }
    var fd = new ActiveXObject("Scripting.FileSystemObject").GetFolder(".").Path
    var objExcel = new ActiveXObject("Excel.Application");
    var objBook = objExcel.Workbooks.open(fd+'\\1.xls');
    objBook.worksheets(1).activate;
    var objSheet = objBook.activeSheet;
    var cnt = objSheet.usedrange.rows.count;
    for(var i = 1; i=cnt; i++) {
      var A1 = objSheet.Cells(i, 1).value;
      var re = new RegExp("[^\\r]*?"+A1+"[^\\r]*?\\.jpg","ig");
      var m = jpglist.match(re);
      if(m)objSheet.Cells(i, 2).value = m[0];
    }
    objBook.SaveAs(fd+'\\2.xls');
    objBook.Close();
    objExcel.Quit();
    
    

    方法二(更加简化些):

    @echo off
    >$ dir /b "相片\*.jpg"
    (for /f "tokens=1 delims=, " %%a in (1.csv) do (
      set /p"=%%a,"
      findstr "%%a" $||echo;
    ))nul>2.csv
    del $
    pause
    

    您可能感兴趣的文章:
    • MySQL文本文件导入及批处理模式应用说明
    上一篇:批处理获取文件夹下面txt文件行数并添加到文件名后
    下一篇:常用批处理内部命令使用详解
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    批处理将文件侠内的文件名导入表格对应名称中 批处理,将,文件,侠内,的,