vfc形式のアドレス帳を、csv形式に変換するスクリプト

[google][wsh][javascript]
docomoの携帯からエクスポートするときのvfc形式のアドレス帳を、gmailにインポートできる形のcsv形式に変換するスクリプト。
電話番号しかないアドレスデータはdummy@example.comをメールアドレスとして出力する。ちなみに、半角カナの名前の人が入っているとはじかれるっぽいので注意。

//＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

//VFC形式のアドレス帳をgmailにインポートできるcsv形式に変換

//＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
if (WScript.Arguments.length != 1) {

	WScript.Echo("ファイルいっこ渡してください");

	WScript.Quit();

}

inFile = WScript.Arguments(0);
fso = new ActiveXObject("Scripting.FileSystemObject");
adrsList = [];

cnt = 0;

dateBase = (function () {

	var d = new Date();

	var dateStrYY = (d.getYear() < 2000 ? d.getYear()+1900 : d.getYear());

	var dateStrMM = "" + (d.getMonth() + 1); dateStrMM = (dateStrMM.length == 1 ? "0" + dateStrMM : dateStrMM);

	var dateStrDD = "" + d.getDate();        dateStrDD = (dateStrDD.length == 1 ? "0" + dateStrDD : dateStrDD);

	return ("" + dateStrYY).substring(2,4) + dateStrMM + dateStrDD;

})();
var ts = fso.OpenTextFile(inFile);

while (!ts.AtEndOfStream) {

	var line = ts.ReadLine();
	if (line.match(/^BEGIN:VCARD/)) { person = []; person.tel=[]; person.email=[]; }

	

	if (line.match(/^N;CHARSET=Shift_JIS:([^;]+);+/)             ) person.name = RegExp.$1;

	if (line.match(/^SOUND;X-IRMC-N;CHARSET=Shift_JIS:([^;]+);+/)) person.kana = RegExp.$1;

	if (line.match(/^TEL;CELL:([0-9]+)/)                         ) person.tel.push(RegExp.$1);

	if (line.match(/^TEL;VOICE:([0-9]+)/)                        ) person.tel.push(RegExp.$1);

	if (line.match(/^EMAIL;INTERNET:(.*)@(.*)/)                  ) person.email.push(RegExp.$1 + "@" + RegExp.$2);
	if (line.match(/^END:VCARD/)  ) {

		if (person.email.length==0) person.email.push("d" + dateBase + "." + (cnt++) + "@example.com");


		adrsList.push(person);

	}

}

ts.Close();
str="名前,メール アドレス,メモ\n";

for (var i=0; i