雷火电竞-中国电竞赛事及体育赛事平台

歡迎來(lái)到入門教程網(wǎng)!

DOS/BAT

當(dāng)前位置:主頁(yè) > 腳本語(yǔ)言 > DOS/BAT >

批處理將文件俠內(nèi)的文件名導(dǎo)入表格對(duì)應(yīng)名稱中

來(lái)源:本站原創(chuàng)|時(shí)間:2020-01-10|欄目:DOS/BAT|點(diǎn)擊:

使用批處理實(shí)現(xiàn)將相片文件內(nèi)的相片名稱導(dǎo)入1表格對(duì)應(yīng)名字中

方法一

/*&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();

方法二(更加簡(jiǎn)化些):

@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

上一篇:bat、vbs、js 原生混編(一個(gè)bat可以執(zhí)行vbs,js代碼)

欄    目:DOS/BAT

下一篇:BAT批量去除文件首行以及批量合并文件腳本

本文標(biāo)題:批處理將文件俠內(nèi)的文件名導(dǎo)入表格對(duì)應(yīng)名稱中

本文地址:http://www.jygsgssxh.com/a1/DOS_BAT/10081.html

網(wǎng)頁(yè)制作CMS教程網(wǎng)絡(luò)編程軟件編程腳本語(yǔ)言數(shù)據(jù)庫(kù)服務(wù)器

如果侵犯了您的權(quán)利,請(qǐng)與我們聯(lián)系,我們將在24小時(shí)內(nèi)進(jìn)行處理、任何非本站因素導(dǎo)致的法律后果,本站均不負(fù)任何責(zé)任。

聯(lián)系QQ:835971066 | 郵箱:835971066#qq.com(#換成@)

Copyright © 2002-2020 腳本教程網(wǎng) 版權(quán)所有