2012-11-15 4 views
3

다음 코드를 사용하여 vcs 파일을 만들었습니다.VCS 파일 설명 :

  Dim mstream As New MemoryStream 
      Dim writer As New StreamWriter(mstream) 
      writer.AutoFlush = True 

      GetvCalendarText(writer) 
      Response.Clear() 
      Response.AppendHeader("Content-Disposition", "attachment; filename=Event" &    eventID & ".vcs") 
      Response.AppendHeader("Content-Length", mstream.Length.ToString) 
      Response.ContentType = "application/download" 
      Response.BinaryWrite(mstream.ToArray) 
      Response.End() 
  • GetCalendarText 방법

    Dim body As String = <b>New event</b> 
        writer.WriteLine("BEGIN:VCALENDAR{0}", vbCrLf) 
        writer.WriteLine("VERSION:1.0{0}", vbCrLf) 
        writer.WriteLine("BEGIN:VEVENT{0}", vbCrLf) 
        writer.WriteLine("DTStart:{0}{1}", DateTime.Now.ToString("yyyyMMddTHHmm00Z"), vbCrLf) 
        writer.WriteLine("DTEnd:{0}{1}", DateTime.Now.AddHours(2).ToString("yyyyMMddTHHmm00Z"), vbCrLf) 
        writer.WriteLine("DESCRIPTION:{0}", body) 
        writer.WriteLine("X-ALT-DESC;FMTTYPE=text/html:{0}", body) 
        writer.WriteLine("SUMMARY;ENCODING=QUOTED-PRINTABLE:{0}{1}", Test event, vbCrLf) 
        writer.WriteLine("PRIORITY:3{0}", vbCrLf) 
        writer.WriteLine("END:VEVENT{0}", vbCrLf) 
        writer.WriteLine("END:VCALENDAR{0}", vbCrLf) 
    

그것은 VCS 파일을 생성하고 파일을 열 때이 주제와 Outlook 2010에서 개방되고, 시작 시간과 종료 시간에 올바른 값.

우리가 제공 한 설명은 html 형식이지만 일반 텍스트로 표시됩니다.

그래서 우리는 HTML 설명을 어떻게 표시 할 수 있습니까?

답변

2

html 설명을 vCalendar 형식으로 추가하려고 시도했으며이를 수행 할 적절한 방법을 찾을 수 없습니다.

마지막으로 vCalendar 형식을 iCalendar로 변경하여 html 설명을 표시 할 수 있습니다.

설명 줄 (예 : writer.WriteLine("DESCRIPTION:{0}", body) )이 삭제되었으며 이제는 html 형식의 설명이 표시됩니다.

다음 부품도 변경되었습니다.

Response.AppendHeader("Content-Disposition", "attachment; filename=Event" & eventID & ".ics") 

writer.WriteLine("VERSION:2.0{0}", vbCrLf)