Product Bundles
DevCraft
All Telerik .NET tools and Kendo UI JavaScript components in one package. Now enhanced with:
Web
Mobile
Document Management
Desktop
Reporting
Testing & Mocking
CMS
UI/UX Tools
Debugging
Free Tools
Support and Learning
Productivity and Design Tools
Dim
data
As
String
= RadScheduler.ExportToICalendar(LoadContent(tzid, content))
' data = data.Replace("DTSTART:", "DTSTART;TZID=""" & tzid & """:").Replace("DTEND:", "DTEND;TZID=""" & tzid & """:")
data = data.Replace(
"0Z"
,
"0"
)
iPos
Integer
= data.IndexOf(
"DESCRIPTION:"
data = data.Substring(0, iPos)
data = data &
"X-ALT-DESC;FMTTYPE=text/html:<html>"
& _
"<head></head><body>"
& Server.HtmlDecode(content).Replace(vbCrLf,
""
).Replace(vbCr,
).Replace(vbLf,
) &
"</body></html>"
& vbCrLf & _
"END:VEVENT"
"END:VCALENDAR"
& vbCrLf