Click or drag to resize

IActivityLinksAddAppointment Method

Add an appointment to the list Never implemented

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
void AddAppointment(
	SOAppointment pVal
)

Parameters

pVal
Type: SuperOffice.COM.SuperOfficeDBSOAppointment
SOAppointment - the appointment you want to add
Examples
VB
dim db
Dim msg, app, links, appnt
Set db = CreateObject("SuperOfficedb.Database")
if db.login("USERNAME","PASSWORD") then

    set app = db.GetAppointment(3)
    set links = app.ActivityLinks
    links.AddAppointment(db.GetAppointment(2))
    app.Save()
    For Each appnt In links.Appointments
        msg = msg & appnt.description & vbCrLf
    Next

    MsgBox(msg)

    'remove the appointments
    For Each appnt In links.Appointments
        links.RemoveAppointment(appnt)
    Next
    app.Save()
    MsgBox("done")
else
    MsgBox "Could not log on"
end if
Set objSO = Nothing
See Also