Compact Framework: Eliminare un appuntamento tramite il CF 2.0 (VB.Net e C#)

Questo esempo di codice, illustra come eliminare un determinato appuntamento tramite il codice id, naturalmente si può eliminare anche tramite altre proprietà come l'oggetto o body.

Aggiunta di riferimenti.

Per gestire gli appuntamenti, dobbiamo aggiungere lo spazio dei nome WindowsMobile e PocketOutlook , dalla voce di menu progetto, selezionate la voce aggiungi riferimento, nella finiestra che viene aperta, selezionare gli assembly, Microsoft.WindowsMobile e Microsoft.WindowsMobile.PocketOutlook.

Dobbiamo aggiungere tali riferimenti nel nostro progetto.
Di seguito si riporta tale dichiarazione.

VB.Net

Imports Microsoft.WindowsMobile

Imports Microsoft.WindowsMobile.PocketOutlook

C#

using Microsoft.WindowsMobile;

using Microsoft.WindowsMobile.PocketOutlook;

Nell'evento click di un pulsante o in una funzione, inserire il seguente frammento di codice, che permette la cancellazione di determinati appuntamenti con un certo id.

VB.Net

Dim outlook As New OutlookSession()

Dim idAppuntamento As String() = {"1073741830", "1073741831"}

For intconta As Integer = 0 To outlook.Appointments.Items.Count - 1

'MsgBox(outlook.Appointments.Items(0).ItemId.ToString())

If intconta < outlook.Appointments.Items.Count Then

If Array.IndexOf(idAppuntamento, outlook.Appointments.Items(intconta).ItemId.ToString()) > -1 Then

outlook.Appointments.Items(intconta).Delete()

intconta -= 1

End If

End If

Next

C#

OutlookSession outlook = new OutlookSession();

string[] idAppuntamento = { "1073741830", "1073741831" };

for (int intconta = 0; intconta < outlook.Appointments.Items.Count - 1; intconta++)

{

if (intconta < outlook.Appointments.Items.Count)

{

if (Array.IndexOf(idAppuntamento, outlook.Appointments.Items[intconta].ItemId.ToString()) > -1)

{

outlook.Appointments.Items[intconta].Delete();

intconta -= 1;

}

}

}

Tramite la parola download si può scaricare il file di esempio
Download