[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
sirliu

Rank: 1

帖子
11 
积分
17 
技术
0  
捐助
0  
注册时间
2011-2-5 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2013-7-28 00:41 | 只看该作者

[文本处理] 批处理如何将VCF通讯录转成XLS通讯录？

vcf通讯录的内容如下:
BEGIN:VCARD
N:爱;爸;;;;;;
FN:爱爸
TEL;CELL:13787115555
VERSION:3.0
UID:988c4aef09584b2e950c01a044378898
REV:20130727
END:VCARD
BEGIN:VCARD
N:爱;妈;;;;;;
FN:爱妈
TEL;CELL:18777777742
VERSION:3.0
UID:92236076f574462ab012fb57099f5262
REV:20130727
END:VCARD
BEGIN:VCARD
N:爸;爸;;;;;;
FN:爸爸
TEL;CELL:13907317540
VERSION:3.0
UID:66e7a3dce5cc4610950eea2ad2275cda
REV:20130727
END:VCARD
BEGIN:VCARD
N:波;哥;;;;;;
FN:波哥
TEL;CELL:15487118650
VERSION:3.0
UID:6f44decc1f9d44cc8a21ecbf4348047d
REV:20130727
END:VCARD

我想实现用Excel打开后是下面的样子
我试着将vcf通讯录先粗处理，提取出姓名和电话号码的行。
  1. findstr /i "fn tel" 通讯录.vcf>通讯录.txt
复制代码
然后用for命令冒号“:"提取每行第二列字符，即姓名和电话号码，
但是姓名和电话不在同一行，且必须在姓名和电话之间加制表符或分号才能使Excel打开后自动分列，不知道该如何处理，请高手赐教。
收藏 分享

CrLf

Rank: 8Rank: 8

帖子
6388 
积分
18843 
技术
982  
捐助
100  
注册时间
2010-10-9 
2楼
发表于 2013-7-28 02:06 | 只看该作者
这个用 sed 最合适了：
  1. sed "s/.*://;N;s/\n.*:/;/" 通讯录.txt>通讯录.xls
复制代码
纯批比较繁琐点：
  1. @echo off

  2. (for /f "tokens=1* delims=:" %%a in (通讯录.txt) do (

  3.   if defined str (

  4.     echo !str!;%%b

  5.     endlocal&set "str="

  6.   ) else (

  7.     set str=%%b

  8.     setlocal enabledelayedexpansion

  9.   )

  10. ))>通讯录.xls
复制代码
链接：在线第三方命令行工具下载   bat、vbs、js 原生混编

TOP

523066680

Rank: 7Rank: 7Rank: 7

帖子
3151 
积分
6455 
技术
317  
捐助
70  
注册时间
2008-8-3 
3楼
发表于 2013-7-28 07:50 | 只看该作者
有些VCF通讯录的联系人名称是UTF-8 编码。非明文。

like this
BEGIN:VCARD
VERSION:2.1
N;CHARSET=UTF-8;ENCODING=QUOTED-PRINTABLE:=E5=85=B0=E6=A0=BC;=E8=82=96;;;
FN;CHARSET=UTF-8;ENCODING=QUOTED-PRINTABLE:=E5=85=B0=E6=A0=BC=20=E8=82=96
TEL;VOICEREF:1-352-013-0000
END:VCARD
FuniCode 编程论坛

TOP

sirliu

Rank: 1

帖子
11 
积分
17 
技术
0  
捐助
0  
注册时间
2011-2-5 
4楼
发表于 2013-7-28 11:26 | 只看该作者
回复 2# CrLf


    不能执行啊，for命令前有括号，最后的“))>通讯录.xls”怎么理解？

TOP

sirliu

Rank: 1

帖子
11 
积分
17 
技术
0  
捐助
0  
注册时间
2011-2-5 
5楼
发表于 2013-7-28 11:27 | 只看该作者
回复 3# 523066680


    用一款叫VCFEncoding的软件转过来。

TOP

CrLf

Rank: 8Rank: 8

帖子
6388 
积分
18843 
技术
982  
捐助
100  
注册时间
2010-10-9 
6楼
发表于 2013-7-28 17:02 | 只看该作者
回复 4# sirliu


    本地测试无误，请把你的 通讯录.txt 打包作为附件发上来看看
链接：在线第三方命令行工具下载   bat、vbs、js 原生混编

TOP

返回列表