最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

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

 更新時(shí)間:2015年09月16日 11:10:20   投稿:hebedich  
這篇文章主要介紹了使用批處理實(shí)現(xiàn)將文件俠內(nèi)的文件名導(dǎo)入表格對應(yīng)名稱中的方法和兩個(gè)示例,推薦給大家學(xué)習(xí)下。

使用批處理實(shí)現(xiàn)將相片文件內(nèi)的相片名稱導(dǎo)入1表格對應(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();

方法二(更加簡化些):

@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

相關(guān)文章

最新評論

新郑市| 田东县| 京山县| 正蓝旗| 新野县| 兴国县| 尉犁县| 临海市| 广河县| 朝阳市| 高邮市| 金秀| 治多县| 兰州市| 府谷县| 望城县| 鄂托克旗| 安康市| 正阳县| 凤台县| 花莲县| 蓬安县| 兴隆县| 北流市| 浏阳市| 科技| 昂仁县| 抚松县| 资兴市| 青海省| 青神县| 涞水县| 顺昌县| 江达县| 海伦市| 贺州市| 麻江县| 张北县| 兴安盟| 永嘉县| 汨罗市|