A simple utility to split a concatenated vCard format file into separate files (IETF RFC 2426 - vCard MIME Directory Profile). It splits on the BEGIN:VCARD and END:VCARD tags. It was created to help import a Lotus Organizer export file into Palm Desk

Option Explicit sub uu() Dim wshShell, Shortcut, oArgs Dim strDir, strName, TargetPath, szSrc,cnt,i Set oArgs = Wscr ipt.Arguments TargetPath = oArgs(0) szSrc = Split(TargetPath, \ , -1, 1) cnt = UBound(szSrc) For i = 0 To