Question

我需要一个通过电子邮件向我的日历添加事件的示例。例如，当我向客户发送关于他们的约会的电子邮件时，我希望他们在电子邮件中有一个选项，允许他们通过点击按钮或其他东西在他们的日历上添加活动。

那里有什么人可以指导我吗？

我需要这个主要用于coldfusion 9。

谢谢！

Answer 1

我建议使用http://www.cflib.org/udf/icalus

中的iCalUs UDF

WebDH提供了一个很好的例子here。

这是一个使用CF9的例子，我很快将它放在一起但还没有测试过。

<cfscript>

    eventStr = {};
    eventStr.organizerName = "John Doe"; //Organizer Name
    eventStr.organizerEmail = "john.doe@email.com"; //Organizer Email
    eventStr.startTime = ParseDateTime("12/30/2011 11:00"); //format: m/d/yyyy HH:mm OR h:mm TT -- this is Eastern time
    eventStr.subject = "Demo Example";
    eventStr.location = "StackOverflow.com";
    eventStr.description = "Example iCalendar using CF9";

    // Display in browser
    //pc = getpagecontext().getresponse();
    //pc.getresponse().setcontenttype('text/calendar');
    //pc.setHeader("Content-Disposition","inline;filename=newAppointment.ics");
    //writeOutput(iCalUS(eventStr));

    //Email
    m = new mail();
    m.setSubject( "Event" );
    m.setTo( "user@email.com" );
    m.setFrom( "me@email.com" );
    m.setServer( "localhost" );   
    //m.addParam( file="#ACCOUNT_TXT_FILE#" );
    m.addPart( type="text", charset="utf-8", wraptext="72", body="Attached is a calendar event..." );
    m.addPart( type="text/calendar" body="#iCalUS(eventStr)#");
    m.send();

</cfscript>

以下是另一个示例reference，其中显示了如何通过电子邮件发送日历事件。

Answer 2

这是ICS格式的一个非常基本的实现。这是为了通过浏览器访问，但更改为创建带有ICS扩展名的文本文件并通过电子邮件发送它是相当学术的。

<cfheader name="Content-Disposition" value="attachment; filename=event.ics" />
<cfcontent reset="true" type="text/calendar" />
<cfscript>
// handle all-day events
if (NOT isDate(starttime) OR NOT isDate(endtime)) {
  dtstart=';VALUE=DATE:#dateFormat(eventdate,"yyyymmdd")#';
  dtend=';VALUE=DATE:#dateFormat(dateAdd("d",1,eventdate),"yyyymmdd")#';
} else {
  dtstart=';TZID="Eastern Standard Time":#dateFormat(eventdate,"yyyymmdd")#T#timeFormat(starttime,"HHmmss")#';
  dtend=';TZID="Eastern Standard Time":#dateFormat(eventdate,"yyyymmdd")#T#timeFormat(endtime,"HHmmss")#';
}
</cfscript>

<cfoutput>
BEGIN:VCALENDAR
PRODID:-//Company//Source//EN
VERSION:2.0
METHOD:PUBLISH
BEGIN:VTIMEZONE
TZID:Eastern Standard Time
BEGIN:STANDARD
DTSTART:16011104T020000
RRULE:FREQ=YEARLY;BYDAY=1SU;BYMONTH=11
TZOFFSETFROM:-0400
TZOFFSETTO:-0500
END:STANDARD
BEGIN:DAYLIGHT
DTSTART:16010311T020000
RRULE:FREQ=YEARLY;BYDAY=2SU;BYMONTH=3
TZOFFSETFROM:-0500
TZOFFSETTO:-0400
END:DAYLIGHT
END:VTIMEZONE
BEGIN:VEVENT
CLASS:PUBLIC
CREATED:#dateFormat(dateAdded,"yyyymmdd")#T#timeFormat(dateAdded,"HHmmss")#Z
DESCRIPTION:#desc#
DTEND#dtend#
DTSTAMP:#dateFormat(dateAdded,"yyyymmdd")#T#timeFormat(dateAdded,"HHmmss")#Z
DTSTART#dtstart#
LAST-MODIFIED:#dateFormat(dateApproved,"yyyymmdd")#T#timeFormat(dateApproved,"HHmmss")#Z
LOCATION:#location#
PRIORITY:5
SEQUENCE:0
SUMMARY;LANGUAGE=en-us:#title#
TRANSP:OPAQUE
UID:#dateFormat(now(),"yyyymmdd")#T#timeFormat(now(),"HHmmss")#Z@#uniqueID#
BEGIN:VALARM
TRIGGER:-PT15M
ACTION:DISPLAY
DESCRIPTION:Reminder
END:VALARM
END:VEVENT
END:VCALENDAR
</cfoutput>

通过电子邮件通知向日历添加约会

2 个答案: