[文本处理] 如何用BAT以空行为分段进行段处理把缺失的表头添加进去 方便导入EXCEL呢?

caizhenbin

像这样的数据。。有些没有地址、email、主页、经营范围的表头。。如何用BAT以空行为分段进行段处理把缺失的表头添加进去 方便导入EXCEL呢?完整的数据像这样

公司名:深圳中天银河科技有限公司
地址:深圳市福田区金田路3037号金中环国际商务大厦3405B
邮编:518048
电话:0755-82521188
传真:0755-82521187
E-mail:shenzhengalaxy@126.com
主页:http：//www.szztyh.com.cn
经营范围:CCTV高清镜头、电动变倍镜头等

永康小侬

heh~~终于进来了

caizhenbin

请高手赐教~~~~~~~~~

batman

@echo off&setlocal enabledelayedexpansion
copy /y a.txt $>nul
(echo,&echo,)>>$
(for /f "tokens=1,2* delims=:" %%a in ('findstr /n .* $') do (
  if "%%b" neq "" (
    set "%%b=%%c"&set "flag="
    ) else (
    if not defined flag (
      for %%d in (公司名 地址 邮编 电话 传真 E-mail 主页 经营范围)  do echo %%d:!%%d!&set "%%d="
      echo,&set "flag=a"
    )
  )
))>new.txt
start new.txt&del $
复制代码

caizhenbin

不愧是老大。。简短精湛的代码把复杂的问题给解决了。。

hacker85

学习一下，备用