批处理将文件侠内的文件名导入表格对应名称中
批处理将文件侠内的文件名导入表格对应名称中
发布时间:2016-12-28 来源:查字典编辑
摘要:使用批处理实现将相片文件内的相片名称导入1表格对应名字中方法一/*&cls@echooffdir/b"相片*.jpg"|cscript-no...

使用批处理实现将相片文件内的相片名称导入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]*"[^r]*"); 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

推荐文章
猜你喜欢
附近的人在看
推荐阅读
拓展阅读
相关阅读
网友关注
最新DOS/BAT学习
热门DOS/BAT学习
脚本专栏子分类