A452507931 2022-12-08 12:10 采纳率: 100%
浏览 110
已结题

bat获取文件夹下所有的csv文件名及文件的首行

有多个csv文件 用批处理 提取文件名及首行内容 到新的csv 文件名要和内容首行对应

  • 写回答

5条回答 默认 最新

  • CSDN专家-showbo 2022-12-08 13:37
    关注
    set f=createobject("scripting.filesystemobject")
    s=""
    csvpath="C:\Users\showbo\Desktop\"'csv文件路径
    
    set files=f.GetFolder(csvpath&file).Files
    for each file in files
      if instr(file.name,".csv")<>0 then
         set t=f.OpenTextFile(csvpath&file.name)
         text=t.readall()
         arr=split(text,chr(10))
         s=s&csvpath&file.name&chr(10)& arr(0)&chr(10)
         t.close()
         set t=nothing
      end if
    next
    set files=nothing
    
    '内容写入到result.csv文件中
    set csv=f.OpenTextFile(csvpath&"result.csv",8,True)
    csv.write s
    csv.close()
    set csv=nothing
    
    set f=nothing
    
    msgbox "操作成功"
    
    
    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论 编辑记录
    1人已打赏
查看更多回答(4条)

报告相同问题?

问题事件

  • 系统已结题 12月16日
  • 已采纳回答 12月8日
  • 修改了问题 12月8日
  • 专家修改了标签 12月8日
  • 展开全部

悬赏问题

  • ¥60 如图:直线与椭圆X轴平行,求直线与椭圆任意一点的相切坐标计算公式
  • ¥50 如何用python使用opencv里的cv::cudacodec::VideoWriter函数对视频进行GPU硬编码
  • ¥100 c#solidworks 二次开发 工程图自动标边线法兰 等折弯尺寸怎么标
  • ¥15 halcon DrawRegion 提示错误
  • ¥15 FastAPI Uvicorn启动显示404
  • ¥15 centos7.9脚本,怎么排除特定的访问记录
  • ¥15 关于#Django#的问题:我的静态文件呢?
  • ¥15 关于CPLEX的问题,请专家解答
  • ¥15 cocos的点击事件 怎么穿透到 原生fragment上。
  • ¥20 基于相关估计的TDOA算法中的加权最小二乘拟合法matlab仿真