[WScript][携帯]DoCoMo F902iSでバックアップしたスケジュール表をMS Outlookが読み込めるように変換 / LiosK-free Blog

[WScript][携帯]DoCoMo F902iSでバックアップしたスケジュール表をMS Outlookが読み込めるように変換

DoCoMo F902iSからminiSDにバックアップしたvCalendar形式のスケジュール表を、MS Outlook 2003でインポートしようとしたら失敗した。

なぜか、BEGIN:VCALENDARというキーワードとEND:VCALENDARというキーワードを余計にネストしたり、SUMMARYとDESCRIPTIONを逆にしたりしているのが原因っぽい。

ということで、F902iSのvCalendarを変換してOutlookで読み込めるようにするWScriptを書いたので、メモがわりにエントリー化。詳しいことは時間と気力があるときにエントリー化したい。

おそらく、F902iS以外では使うことがないと思うが、もし他の機種でも動くようであれば、コメント欄などで教えてくれるとありがたい。

コード

/**
 * F902iS VCS Converter
 *
 * F902iSが出力するvCalendarファイルを、MS Outlookが読み込める形式に変換する。
 * 使い方: F902iSが出力したvCalendarファイルをドラッグ＆ドロップするだけ。
 * @version 1.0 2007-12-13
 * @author LiosK http://liosk.blog103.fc2.com/
 * @license Public Domain
 */

var fso = WScript.CreateObject('Scripting.FileSystemObject');

var begin = 'BEGIN:VCALENDAR', end = 'END:VCALENDAR',
    pattern = /^SUMMARY|^DESCRIPTION/mg,
    replace = function(s) { return (s == 'SUMMARY') ? 'DESCRIPTION' : 'SUMMARY'; };

for (var args = new Enumerator(WScript.Arguments); !args.atEnd(); args.moveNext()) {
    var bf = fso.OpenTextFile(args.item()).ReadAll();
    var af = bf.substring(bf.indexOf(begin, 1), bf.lastIndexOf(end)).replace(pattern, replace);
    if (af) fso.OpenTextFile(args.item(), 2).Write(af);
}

WScript.Echo('Done');

WinXP Home SP2で動作確認。

このコードを、拡張子が.jsのファイルとして保存し、F902iSがminiSDに吐き出した.VCSファイルをドラッグ＆ドロップすればOK。あとはOutlookでインポートするのみ。僕は、そのままCSV形式でエクスポートしてGoogle Calendarに読み込ませている。

トラックバックURL

http://liosk.blog103.fc2.com/tb.php/63-3ba0a809

0 件のトラックバック

1 件のコメント

auの携帯電話（A5527SA）の日記帳（拡張子がVCS）のファイルがパソコンで読めず困っていたところ、検索で貴ホームページに行き着きました．早速試したところ正常に働きました．ありがとうございました．
なお、手元のOSはWindows　VISTAです．
ご報告ならびにお礼まで

>F902iS以外では使うことがないと思うが、もし他の機種でも動くようであれば、コメント欄などで教えてくれるとありがたい

2008-09-09
by hosomori
id:-

LiosK-free Blog