Newsgroup: it.comp.appl.access
Titolo: Creare report in base alla data

Ciao a tutti
Come faccio, in access xp, a farmi visualizzare tutti i record che hanno la
data di scadenza (un campo del record) in un determinato mese (a scelta,
magari da un box coi mesi già inseriti), in un report?
Del tipo: seleziono dalla casella il mese di gennaio, clicco su un tasto e
questo mi crea un report con tutti i record che hanno scadenza in questo
mese.
Grazie :)

 ha scritto nel messaggio 
news:RsWdd.52169$N45.1...@twister2.libero.it...

nella casellacombinata ci metti l'elenco dei mesi gennaio febbraio 
ecc....poi
crei una casella di testo nascosta di nome mesenumerico
su dopo aggiornamento del campo mese ci metti questo codice
select case mese
    case 'gennaio'
                mesenumerico=1
    case 'febbraio'
                mesenumerico=2
    ecc....
end select
docmd.openreports "nomereports",acnormal
crei una query con i campi interessati e un campo che vale month(data) in 
quel campo nei criteri ci metti
=forms![miaform]![mesenumerico]
il report lo devi associara alla query
tutto chiaro? prova e fammi sapere ciao
Simba883

 ha scritto nel messaggio
news:RsWdd.52169$N45.1...@twister2.libero.it...

Filtra il report impostando adeguatamente l'argomento condizioneWHERE del
metodo OpenReport.
Se il report da aprire si chiama MioReport.
Se il campo che contiene la data di scadenza è di tipo Data/ora e si chiama
MiaScadenza.
Se la casella combinata dalla quale selezionerai il nome di un mese si
chiama MioMese, ha una sola colonna e la sua origine riga contiene l'elenco
dei dei nomi dei 12 mesi dell'anno.
A fronte dell'evento "Dopo aggiornamento" della casella combinata o a fronte
dell'evento "Su clic" di un pulsante di comando genera il seguente codice
VBA:
DoCmd.OpenReport "MioReport", acViewPreview, , _
"Format(MiaScadenza, 'mmmm') ='" & Me!MioMese & "'"
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Uhm...
Scrivendo come dici tu, Simba
case 'gennaio'
        mesenumerico=1
Il compilatore mi da errore all'inizio di "gennaio".
---------------------
Per la soluzione suggerita da Roberto, sono un po' incasinato :|
----------------------
Provo a spiegarmi meglio (anche se credo che sono io a non aver capito che
voi avete capito la mia richiesta :D)
Ho 1 db con:
1 tabella
1 maschera
Nella maschera ho messo tutti i campi della tabella + una casella combinata
per la scelta del mese.
Ecco, io vorrei che, una volta selezionato il mese e cliccato su un tasto,
access mi pescasse dal database tutti i record che hanno il campo scadenza
compresi nel mese selezionato e me li ficcasse in un report, pronto da
stampare/visualizzare.
Ah, se potete, spiegatevi nel modo + semplice possibile, dato che access
l'ho provato un paio di volte, giusto per curiosità :P
Grazie
Igor

 Igor



        Select Case mese
            Case "Gennaio"
                    memenumerico = 1
            Case "Febbraio"
                    mesenumerico = 2
            ...................
    End Select
ci volevano i doppi apici prova cosi e dopo aggiornamento della 
casellacobminata con i mesi esegui un requery
per aprire il report lo apri cosi
docmd.openreport "nomereport",,me.filter che ti stamperà solo i record 
attulamente visibili nella maschera quelli cioè del tuo mese scelto.
ciao simba883 

 problema e di capire le soluzioni che ti vengono proposte.
Scusate se mi intrometto, potresti consigliarmi qualche documento o libro
per imparare a programmare in access, partendo dalle basi?
Grazie
Fabio

 ha scritto nel messaggio 
news:MD5ed.72205$b5.34...@news3.tin.it...

La guida in linea tasto F1 leggila dall'inizio è gratuita completa 
facilmente consultabile. ciao. 

 Fabio


 Roberto
Il fatto è che non mi serve impararlo ad usare (almeno, non per ora, anche
se mi piacerebbe), devo solamente fare questo coso per mio padre :)
Appena ho un po' di tempo provo di nuovo e vi dico.
Grazie
Igor

 Il fatto è che non mi serve impararlo ad usare
Per tua conoscenza ti riporto qui di seguito il manifesto di questo NG:
===================
Questo gruppo dovrebbe trattare dell'ambiente Microsoft-Access, di
specifiche tecniche, aggiornamenti, discussioni, scambi di codice
sorgente e routines, chiarimenti su eventuali bug, discussioni tra
utenti e in particolar modo tra sviluppatori.
Sarebbe inoltre utile per lo scambio di URL per link interessanti
riguardanti il pacchetto.
==================
Se ritieni di non essere, né voler diventare un utente e/o uno sviluppatore
Access, le conclusioni tirale da solo.
[CUT]



[OT]
Bè, il manifesto non dice "per chiedere aiuto devi diventare sviluppatore o
assiduo frequentatore" :P
Mi pare assurdo che uno, per chiedere magari un piccolo aiuto, deve
diventare frequentatore del NG...no?
Io sono un utente di un forum generico, dove si parla di hardware, grafica,
stupidate e tutto il resto...se qualcuno chiede qualcosa, e io conosco la
risposta, lo aiuto. Se lui non diventa assiduo frequentatore, non mi
interessa :)
[/OT]
Ho fatto quello che hai detto tu:
--------------------
Filtra il report impostando adeguatamente l'argomento condizioneWHERE del
metodo OpenReport.
Se il report da aprire si chiama MioReport.
Se il campo che contiene la data di scadenza è di tipo Data/ora e si chiama
MiaScadenza.
Se la casella combinata dalla quale selezionerai il nome di un mese si
chiama MioMese, ha una sola colonna e la sua origine riga contiene l'elenco
dei dei nomi dei 12 mesi dell'anno.
A fronte dell'evento "Dopo aggiornamento" della casella combinata o a fronte
dell'evento "Su clic" di un pulsante di comando genera il seguente codice
VBA:
DoCmd.OpenReport "MioReport", acViewPreview, , _
"Format(MiaScadenza, 'mmmm') ='" & Me!MioMese & "'"
----------------
Quando clicco sul pulsante, mi visualizza si il report, però con un numero
di tabelle pari al nr di record presenti...però con i campi vuoti.
Grazie
Igor

 Grazie
Prego


 Ma questo puoi saperlo solo tu.
Ok, provo ancora a lavorarci su.
Grazie cmq
Igor