Vulcan.NET Code Examples

REFERENCES "Microsoft.Office.Interop.Outlook.dll"

USING       System.Runtime.InteropServices
USING       Microsoft.Office.Interop.Outlook

FUNCTION Start() AS VOID
    // An example showing how to add a contact to Outlook

    LOCAL oOutlook AS Application
    LOCAL oContact AS ContactItem
    LOCAL oItemType AS OlItemType

    oOutlook := Application{}

    oItemType := OlItemType.olContactItem
    oContact := (ContactItem)oOutlook:CreateItem(oItemType)

    oContact:FullName := "Mr Spock"
    oContact:Email1Address := "spock@domain.com"
    oContact:JobTitle := "Vulcan.NET Programmer"

    oContact:Save()

    RETURN