Forms

3.121 Mini agenda appuntamenti realizzata con Access XP
  Alessandro Baraldi

I database allegato a questa FAQ rappresenta una semplice agenda di appuntamenti, e non ha la pretesa di risolvere problematiche complesse o di essere un tool completo, ma solo una dimostrazione di semplicità.
La maschera principale espone 7 giorni con altrettante ListBox, nelle quali ogni riga rappresenta un’intervallo orario.
La configurazione dell’agenda si effettua tramite queste costanti contenute nel Modulo “basAppuntamenti” e definiscono l’ora d’inizio, l’ora di fine e la durata degli intervalli temporali.
Public Const START_TIME    	As String = "09:00"
Public Const STOP_TIME     	As String = "18:00"
Public Const DELTA_TIME    	As Integer = 30	‘ In Minuti
Caratteristiche
I giorni della settimana sono Evidenziati in modo differente (colore) a seconda si tratti di una domenica oppure che il giorno sia precedente o successivo alla data attuale.
Il giorno selezionato viene colorato in modo personalizzato.
Le personalizzazioni dei colori sono nel modulo “basAppuntamenti” e possono essere modificate variando il valore delle seguenti costanti:
Public Const cBK_NOW = vbWhite          ' Colore Giorno Attuale
Public Const cFC_NOW = vbBlack           ' Colore Testo Attuale
Public Const cBK_PREV = 13073234       ' Colore Giorni Passati
Public Const cBK_NEXT = 16775666       ' Colore Giorni Successivi
Public Const cBK_SEL = 11599871          ' Colore Giorno Selezionato
Public Const cBK_SUND = vbRed            ' Colore Sfondo Domenicale
Public Const cFC_SUND = vbWhite          ' Colore Testo Domenicale
Per accedere alla configurazione dell’appuntamento basta fare un Dbl_Click sull’ora indicata nella lista.
Si apre la maschera secondaria per la configurazione che dovrà essere compilata obbligatoriamente nel campo Oggetto.

A fianco all’oggetto c’è un elenco (camuffato da casella di testo) con gli orari dell’appuntamento che verrà compilato con la lista di orari disponibili da quello selezionato in avanti.
L’espansione della lista si ottiene selezionandola e premendo “+”, così pure il rientro sarà gestito con “-“.
La Lista è predisposta per accettare la MultiSelezione estesa, quindi basterà selezionare e trascinare la selezione per ottenere un’appuntamento di più intervalli.
C’è la possibilità di modificare lo stato di un’appuntamento già prefissato con la selezione dello stato “Posticipato/Annullato”.
La scelta di “Posticipato” abiliterà la parte per le variazioni delle impostazioni.
Al rientro nella maschera principale con l’Opzione INSERISCI verrà aggiornata la Lista modificata.

Sono graditi i riscontri di eventuali BUGS, per le migliorie apportabili invece il Codice è OpenSource, ma sarei felice di poterne essere informato per arricchire il DEMO a vantaggio di tutti.

Download:
 
  Forms_Agenda_Lite.zip (94Kb) MSAccessXP database


Se pensate di avere del materiale freeware interessante e volete pubblicarlo, allora leggete qui.