Shopping Cart

Free Newsletter
Signup

Contact me | vCard

Brian on CNN

Brian on CBS Radio

FileMaker is a registered trademark of FileMaker, Inc. in the U.S. and other countries.

FileMaker Pro Custom Functions

List | Show Random | Upload | Add This to Your Site

vcard ( FirstName; LastName; Org; Title; Phone; Fax; Mobile; Email

Rate this function:

Average rating: 3.7 (7 votes)
Discuss this Custom Function

Chris Pye, Mactec
http://www.mactec.com.au

Returns text formatted as a vCard

Sample Input:

vcard ( "Fred" ; "Bloggs" ; "F Bloggs & Co" ; "Mr" ; "0754 321 789" ; "0754 321 799" ; "0413 284 343" ; "fred@bloggsco.net" ; "1 Test Lane" ; "Suburb" ; "State" ; "5035" ; "Fredland" )

Sample Output:

BEGIN:VCARD
VERSION:2.1
N:Bloggs;Fred;;Mr;
FN:Fred Bloggs
ORG:F Bloggs & Co;
TEL;work:0754 321 789
TEL;fax:0754 321 799
TEL;cell:0413 284 343
EMAIL;INTERNET;work:fred@bloggsco.net
ADR;work:;;1 Test Lane;Suburb;State;5035;Fredland
END:VCARD

/* Returns text formatted as a vCard This function takes contact info and formats it into the vCard format as text. The result field contents can be exported and opened as a .vcf file which can be opened in the Apple Address Book and other software that supports the vCard format. Written by Chris Pye - info@mactec.com.au vcard ( FirstName; LastName; Org; Title; Phone; Fax; Mobile; Email; Street; Suburb; State; Zip; Country ) */ // DECLARE VARIABLES Let ( [ // All relevant fields are mapped here _LastName = LastName; _FirstName = FirstName; _MiddleName =""; _Title = Title; _Suffix = ""; _Org = Org; _Dept = ""; _JobTitle = ""; _Phone1Value = Phone; _Phone1Label = "work"; _Phone2Value = Fax; _Phone2Label = "fax"; _Phone3Value = Mobile; _Phone3Label = "cell"; _Email1Value = Email; _Email1Label = "work"; _Address1Street = Street; _Address1City = Suburb; _Address1State = State; _Address1Code = Zip; _Address1Country = Country; _Address1Label ="work"; _FullName = FirstName & " " & LastName; // I have had problems with bad characters in the street line, so added this _FilterText = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890.-()/¶\’ []?,!#" & "'"; // // NOW START FORMATTING THEM FOR THE VCARD FORMAT // vname = _LastName & ";" & _FirstName & ";" & _MiddleName & ";" & _Title & ";" & _Suffix; vfname = _FullName; vtel1 = If( not IsEmpty ( _Phone1Value );"TEL;" & If(PatternCount (_Phone1Label ;" " )=1;Substitute ( _Phone1Label ; " " ; ";" );_Phone1Label) & ":" & _Phone1Value & "¶";"" ); vtel2 = If( not IsEmpty ( _Phone2Value );"TEL;" & If(PatternCount (_Phone2Label ;" " )=1;Substitute ( _Phone2Label ; " " ; ";" );_Phone2Label) & ":" & _Phone2Value & "¶";"" ); vtel3 = If( not IsEmpty ( _Phone3Value );"TEL;" & If(PatternCount (_Phone3Label ;" " )=1;Substitute ( _Phone3Label ; " " ; ";" );_Phone3Label) & ":" & _Phone3Value & "¶";"" ); vmail1 = If( not IsEmpty ( _Email1Value);"EMAIL;INTERNET;" & LeftWords ( _Email1Label;1 ) & ":" & _Email1Value & "¶";"" ); vad1 = If( not IsEmpty (_Address1Street); "ADR;" & _Address1Label & ":;;" & Filter(Substitute ( _Address1Street;"¶";"\n") ; _FilterText) & ";" & _Address1City & ";" & _Address1State & ";" & _Address1Code & ";" & _Address1Country & "¶";""); vorg = If( not IsEmpty (_Org);"ORG:" & _Org & ";" & _Dept & "¶";""); vtitle = If( not IsEmpty ( _JobTitle ); "TITLE:" & _JobTitle & "¶";"") // AND THE FINAL FORMATTING ]; "BEGIN:VCARD¶VERSION:2.1¶" & "N:" & vname & "¶" & "FN:" & vfname & "¶" & vorg & vtel1 & vtel2 & vtel3 & vmail1 & vad1 & vtitle & "END:VCARD" )
Then copy & paste into FileMaker Advanced's Edit Custom Function window.

Click here to copy To Clip Manager if you have myFMbutler's Clip Manager installed

Description:

Creates a vCard from contact fields.

I created this function as simple and portable way of exporting vCards from any Filemaker solution. This function takes contact info and formats it into the vCard format as text. The result field can be exported as tab separated text and saved with the .vcf file extension which can then be opened in the Apple Address Book and other software that supports the vCard format.

Please note that you need to use the "Export Field Contents" script step to maintain the returns at the end of each line. Using export record will strip the returns, and the vcard file will not open.

I started off thinking that this function should be kept simple, but then I thought it might be easier to delete unwanted fields rather than adding them latter.

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

This is my Custom Function and I want to edit it

Discuss:

There are no comments yet. Be the first to post a comment about this Custom Function! Please try to keep it brief & to the point. Anyone can post:

Download the Custom Function Dashboard Widget for OS X
Keep all the latest Custom Functions right at your fingertips!

Newest Custom Functions:

1.	captialLetters ( numWords ; text)
	(Thu, Jul 02, 9:53am)
2.	Base64ToAscII ( string )
	(Sun, Jun 28, 11:47am)
3.	AscIIToBase64 (string)
	(Sun, Jun 28, 11:36am)
4.	ToggleFlag_cf ( myfield ; myVL ; pos ; neg )
	(Fri, Jun 26, 12:41pm)
5.	IsDaylightSavings ( TS )
	(Thu, Jun 18, 1:56pm)
6.	DaylightSavingsEnds
	(Thu, Jun 18, 1:38pm)
7.	DaylightSavingsBegins
	(Thu, Jun 18, 1:35pm)
8.	DayofMonthbyWeek ( DayofWeekWanted_Sunday_1 ; WeekWantedasNum ; MonthasNum ; YearasNum )
	(Thu, Jun 18, 1:31pm)


			[ Close Window ]
	The class that teaches you how to successfully sell your FileMaker Pro solution as a professional shrinkwrapped software application.
	Let's Meet in Person Sunday, August 13 2006, Orlando FL Courtyard Orlando International Drive
	Don't miss this most important day of the Developer Conference. Please click here for complete details and online registration.

FileMaker Pro Custom Functions

Description:

Discuss:

Let's Meet in Person