CARVIEW

MOTORHOMES

Select Language

HTTP/2 302 server: nginx date: Sun, 24 Aug 2025 10:47:05 GMT content-type: text/plain; charset=utf-8 content-length: 0 x-archive-redirect-reason: found capture at 20080709074436 location: https://web.archive.org/web/20080709074436/https://www.daniweb.com/code/snippet787.html server-timing: captures_list;dur=0.808313, exclusion.robots;dur=0.025455, exclusion.robots.policy;dur=0.010986, esindex;dur=0.016067, cdx.remote;dur=27.241563, LoadShardBlock;dur=243.578421, PetaboxLoader3.datanode;dur=116.131412, PetaboxLoader3.resolve;dur=106.233440 x-app-server: wwwb-app223 x-ts: 302 x-tr: 312 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0 set-cookie: wb-p-SERVER=wwwb-app223; path=/ x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() HTTP/2 200 server: nginx date: Sun, 24 Aug 2025 10:47:06 GMT content-type: text/html; charset=utf-8 x-archive-orig-date: Wed, 09 Jul 2008 14:43:23 GMT x-archive-orig-server: Apache/2.2 x-archive-orig-x-powered-by: PHP/5.1.6 x-archive-orig-set-cookie: bblastvisit=1215614603; expires=Thu, 09-Jul-2009 14:43:23 GMT; path=/; domain=.daniweb.com x-archive-orig-set-cookie: bblastactivity=0; expires=Thu, 09-Jul-2009 14:43:23 GMT; path=/; domain=.daniweb.com x-archive-orig-cache-control: private x-archive-orig-pragma: private x-archive-orig-connection: close x-archive-orig-transfer-encoding: chunked x-archive-orig-x_commoncrawl_parsesegmentid: 3876 x-archive-orig-x_commoncrawl_originalurl: https://www.daniweb.com/code/snippet787.html x-archive-orig-x_commoncrawl_urlfp: 2329258742144377126 x-archive-orig-x_commoncrawl_hostfp: -6905732606072050477 x-archive-orig-x_commoncrawl_signature: dfe1ed5fbca93f9268dd7ffc75a10d29 x-archive-orig-x_commoncrawl_crawlno: 1 x-archive-orig-x_commoncrawl_fetchtimestamp: 1215614676147 x-archive-guessed-content-type: text/html x-archive-guessed-charset: utf-8 memento-datetime: Wed, 09 Jul 2008 07:44:36 GMT link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Wed, 05 Dec 2007 07:54:38 GMT", ; rel="prev memento"; datetime="Tue, 12 Feb 2008 08:52:26 GMT", ; rel="memento"; datetime="Wed, 09 Jul 2008 07:44:36 GMT", ; rel="next memento"; datetime="Sat, 20 Sep 2008 11:56:47 GMT", ; rel="last memento"; datetime="Fri, 04 Sep 2009 16:06:29 GMT" content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org x-archive-src: 1216929228041_10-c/1216929609876_0.arc.gz server-timing: captures_list;dur=0.489816, exclusion.robots;dur=0.018189, exclusion.robots.policy;dur=0.008298, esindex;dur=0.011906, cdx.remote;dur=37.114341, LoadShardBlock;dur=200.332319, PetaboxLoader3.datanode;dur=108.499104, PetaboxLoader3.resolve;dur=327.955402, load_resource;dur=266.502984 x-app-server: wwwb-app223 x-ts: 200 x-tr: 561 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0 x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() content-encoding: gzip Creating a Microsoft Office Outlook Appointment using Asp.net - visualbasicnet

Creating a Microsoft Office Outlook Appointment using Asp.net

•

What is DaniWeb IT Discussion Community?

You're currently browsing the VB.NET section within the Software Development category of DaniWeb, a massive community of 363,782 software developers, web developers, Internet marketers, and tech gurus who are all enthusiastic about making contacts, networking, and learning from each other. In fact, there are 4,510 IT professionals currently interacting right now! Registration is free, only takes a minute and lets you enjoy all of the interactive features of the site.

Join our community!

Please support our VB.NET advertiser:

•

Nov 19th, 2007

Views: 2,581

Fungus1487

This is a very brief overview of how to achieve an ON-THE-FLY creation of an appointment in the clients outlook calendar. This will not force the user to add it to there calendar but gives them the option to add it automated. Using the older .vcs file extension for outlook we can add an appointment easily by creating this document and letting hte user open it via the web. I have used the .vcs extension as it is compatible with older versions of outlook (mine being 2002) and not just 2007 +

Show Printable Version

•

visualbasicnet Syntax

Toggle Plain Text

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim outlookvcs As New System.Text.StringBuilder
        Dim subject As String
        Dim content As String
        Dim startdate As DateTime
        Dim enddate As DateTime
 
        ' SET SUBJECT HEADER
        subject = "TESTING"
 
        ' SET CONTENT [use '=0D' to make outlook perform a line break]
        content = "There is some content here"
 
        ' SET DATES
        startdate = New DateTime(2007, 12, 25, 12, 0, 0)
        enddate = New DateTime(2007, 12, 25, 19, 30, 0)
 
        With outlookvcs
            .Append("BEGIN:VCALENDAR" & vbLf)
            .Append("PRODID:-//Microsoft Corporation//Outlook 10.0 MIMEDIR//EN" & vbLf)
            .Append("VERSION:1.0" & vbLf)
            .Append("BEGIN:VEVENT" & vbLf)
            .Append("DTSTART:" & str_outlookdate(startdate) & "T" & str_outlooktime(startdate) & "Z" & vbLf)
            .Append("DTEND:" & str_outlookdate(enddate) & "T" & str_outlooktime(enddate) & "Z" & vbLf)
            .Append("UID:1" & vbLf)
            .Append("DESCRIPTION;ENCODING=QUOTED-PRINTABLE:" & content & "=0A" & vbLf)
            .Append("SUMMARY;ENCODING=QUOTED-PRINTABLE:" & subject & vbLf)
            .Append("PRIORITY:3" & vbLf)
            .Append("END:VEVENT" & vbLf)
            .Append("END:VCALENDAR" & vbLf)
        End With
 
        Response.Clear()
        Response.ContentType = "text/calendar"
        Response.AddHeader("content-disposition", "attachment; filename=outlook_calendar_appointment.vcs")
        Response.Write(outlookvcs)
        Response.End()
    End Sub
 
    Private Function str_outlookdate(ByVal dat_date As Date) As String
        str_outlookdate = Format(dat_date, "yyyyMMdd")
    End Function
 
    Private Function str_outlooktime(ByVal dat_time As Date) As String
        str_outlooktime = Format(dat_time, "HHmmss")
    End Function

Post Comment

•

Only community members can submit or comment on code snippets. You must register or log in to contribute.

•

DaniWeb Marketplace (Sponsored Links)

Forum Highlights

Related Features

DANIWEB FEATURE INDEX

Statistics

Members: 363,782

Users Online Now: 4,510

Active IRC Users: 33

Forum Threads: 120,718

Forum Posts: 627,912

Code Snippets: 838

Blogs: 139

Blog Entries: 1,895

Directory Links: 539

Original Source | Taken Source

DaniWeb Home > Code Snippets > visualbasicnet Syntax

Creating a Microsoft Office Outlook Appointment using Asp.net