Newsgroup: it.comp.appl.access
Titolo: Controllo calendario.....

Salve a tutti qualche giorno fà ho esposto un problema che ho risolto
parzialmente.......
Ho una maschera con sottomaschera con un pulsante di comando (Ricerca) con
origini dati da una query con Parametri di ricerca...bene tutto funzionava
perfettamente, fino a quando mi è venuta la brillante idea di immettere i
parametri tramite una maschera personalzzata......
la query generava (alla pressione del comando button) i form dove immettere
i parametri ,esempio.....
mi chiedeva ,Nome, dopo:Data inizio,e ancora Data fine, alla creazione della
maschera personalizzata ogni volta che lancio la ricerca, mi viene questo
errore.....Tabella"origine" Occupata da un altro utente o record
"bloccati.........?! Strano perchè sono solo io ad entrare nel db......
ho provato a cambiare le opzioni nella schermata stzumenti opzioni.. ma
nessun risultato come mai??
Vorrei anche domandare un'altra cosa che forse interesserà altri...... nella
Maschera Ricerca personalzzata ho due caselle di testo con accanto un
Bottone che mi apre il calendari per l'immissione della data.......(Data
inizio, data fine)..... bene (premettendo che tutti i controlli sono tutti
non Associati) è possibile far funzionare il Controllo calendario in una
casella non associata?!
Perchè se metto come origini dati il campo data della query(Campo comune a
tutt'è due i controlli) quando immetto la data nel primo automaticamente si
aggiorna anche l' altro......
grazei è scusate ho cercato di essere + breve possibile.
--
Gianni

 ha scritto nel messaggio
news:3d859104$1...@news.bluewin.ch...

Scusami, ho letto male o poco fa, in un altro tuo messaggio, ho letto che
avevi risolto il problema?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:apih9.1518$j15....@twister2.libero.it...

Si Roberto ho risolto il problema di come far funzionare la maschera
personalizzata ma poi sono sorti dei problemi come descritto sopra.....
Ciao
--
Gianni

 Gianni
Per maggior chiarezza io direi di dividere il tuo problema in due parti; la
prima che risolve come usare una maschera per passare i parametri ad una
query di selezione parametrica che comunque già funzionava; la seconda che
riguarda il modo per fornire, tramite il controllo calendario, due date a
due caselle di testo non associate, tenendo conto che l'esempio del Sito
Comune le fornisce a caselle di testo associate.
Per risolvere il primo problema.
Se la tua maschera si chiama Maschera1, nell'intestazione (scrivo
intestazione e non corpo) di Maschera1 inserisci tre caselle di testo non
associate che chiamerai rispettivamente CercaNome, CercaDa e CercaA.
Nei criteri della query relativi al campo Nome (dove prima scrivevi [Digita
Nome:]) ora scrivi [Forms]![Maschera1]![CercaNome] .
Nei criteri della query relativi al campo data (dove prima scrivevi Between
[Digita data inizio:] And [Digita data fine:]) ora scrivi Between
[Forms]![Maschera1]![CercaDa] And [Forms]![Maschera1]![CercaA] .
A fronte deo tre eventi "dopo aggiornamento" delle tre caselle di testo non
associate di cui sopra genera la seguente riga di codice VBA:
Me.Requery
Ti consiglio, prima di passare alla soluzione della seconda parte, di far
funzionare il tutto digitando a manina santa le due date nelle caselle di
testo non associate CercaDa e CercaA; solo dopo puoi passare a inserire i
due controlli calendario.
Per risolvere il secondo problema.
Rispetto all'esempio del Sito Comune avrai le seguenti differenze:
1) La caselle di testo (CercaDa e CercaA) saranno non associate.
2) Se il controllo calendario che riempirà la casella di testo CercaDa si
chiama acxCalendario, la routine da generare a fronte dell'evento "Dopo
aggiornamento" del controllo calendario sarà questa:
Private Sub acxCalendario_AfterUpdate()
Me!CercaDa = Me!acxCalendario.Value
Me!CercaDa.SetFocus
Me!acxCalendario.Visible = False
End Sub
3) La routine da generare a fronte dell'evento "Su clic" del pulsante di
comando ApriChiudi posto vicino al controllo CercaDa sarà invece questa:
Private Sub ApriChiudi_Click()
If Me!acxCalendario.Visible = False Then
     Me!acxCalendario.Visible = True
     Me!acxCalendario.Year = Year(Date)
     Me!acxCalendario.Month = Month(Date)
     Me!acxCalendario.Value = Date
Else
    Me!CercaDa = Me!acxCalendario.Value
    Me!acxCalendario.Visible = False
End If
End Sub
4) Se il controllo calendario che riempirà la casella di testo CercaA si
chiama acxCalendario2, la routine da generare a fronte dell'evento "Dopo
aggiornamento" di questo controllo calendario sarà questa:
Private Sub acxCalendario2_AfterUpdate()
Me!CercaA = Me!acxCalendario2.Value
Me!CercaDa.SetFocus
Me!acxCalendario2.Visible = False
End Sub
5) La routine da generare a fronte dell'evento "Su clic" del pulsante di
comando ApriChiudi2 posto vicino al controllo CercaA sarà invece questa:
Private Sub ApriChiudi2_Click()
If Me!acxCalendario2.Visible = False Then
     Me!acxCalendario2.Visible = True
     Me!acxCalendario2.Year = Year(Date)
     Me!acxCalendario2.Month = Month(Date)
     Me!acxCalendario2.Value = Date
Else
    Me!CercaA = Me!acxCalendario2.Value
    Me!acxCalendario2.Visible = False
End If
End Sub
6) Il codice VBA: da generare a fronte dell'evento "Su corrente" della
mascherà sarà il seguente:
Private Sub Form_Current()
Me!acxCalendario.Visible = False
Me!acxCalendario2.Visible = False
End Sub
Naturalmente restano valide tutte le altre indicazioni che trovi sulla FAQ
del Sito Comune., tipo il fatto di come ottenere le routine AfterUpdate dei
due controlli calendario; ti ricordo che il tutto funziona con Access 97, ma
non so se le versioni successive di Access possono usare l'ActiveX Controllo
calendario 8.0 .


 ha scritto nel messaggio
news:F7mh9.1726$wr.3...@twister1.libero.it...

Bene Roberto devo dirti che sei un drago.......Grazie di tutto a proposito
io uso access 2000 è và tutto bene.
Grazie ancora.
--
Gianni