Newsgroup: it.comp.appl.access
Titolo: controllo su date

Salve a tutti,
come posso impostare un controllo su due date in modo da convalidare la 
seconda data se e solo se è maggiore o uguale alla prima e se non lo è far 
comparire una msgbox che mi avverte dell'errore... e ovviamente mi impedisce 
anche di inserire una data antecedente alla prima.
Ciao Luciano. 

 ha scritto nel messaggio
news:c8dth.3790$qN4.1...@twister1.libero.it...

Su dopo aggiornamento della seconda fai un test se la prima esiste e quindi
se è minore o uguale della seconda.
Se non è così, msgbox ecc ecc
Antonio

 Ciao Luciano.
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------

 ha scritto nel messaggio 
news:2Xjth.3856$qN4.1...@twister1.libero.it...

Probabilmete la soluzione è anche banale... ma la mia scarsa dimistichezza 
con access non mi permette di risolvere il problema
Ho provato ad inserire diversi codici:
If DataFine>=DataInizio Then
    msgbox"Non puoi inserire una data precedente a quella di
inizio",vbInformation
    Exit Sub
End IF
End Sub
If me.DataFine < me.DataInizio then
Msgbox "Non puoi inserire una data precedente a quella di
inizio"
end if
Tuttavia nessuno di questi funziona.
potreste spiegarmi cosda ho sbagliato?
Grazie, Luciano.

 Tuttavia nessuno di questi funziona.
    If Not isnull(Data_inizio) And Not isnull(Data_Fine) Then
        If DateDiff("d", Data_Fine, Data_inizio) > 0 Then
            msg = "Attenzione!@La data di inizio non puň essere successiva a
"
            msg = msg & "quella di fine.@Modificare una delle due date prima
di "
            msg = msg & "stampare!"
            MsgBox msg, vbCritical, "Operazione annullata"
            Exit Sub
        End If
    End If

     End If
@Si vede che usi ancora A97.....!@
@Alex

 ha scritto nel messaggio
news:1169566061....@a75g2000cwd.googlegroups.com...
Antonio Biso ha scritto:
[CUT]


Qualcosa c'è l'ho sempre!
E mo' dimmi che per questa cosa non era meglio!!!
Fammi la formattazione col grassetto coll'access 2K o 2003, dai, dai
Antonio

 Antonio
Beh ho vinto qualche cosa adesso...?
http://www.trigeminal.com/usenet/usenet015.asp
;-)
@Alex

 [CUT]


http://www.trigeminal.com/usenet/usenet015.asp
;-)
@Alex
Azz....
Mi tocca pagarti una cena
Antonio

"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:uzGth.5204$qN4.1...@twister1.libero.it...

Ferma tutto, non ti pago proprio niente.
Quella cosa non mi funziona, il grassetto non me lo da, e mi da solo le
prime due parti, troncandomi la terza
Rivoglio io i soldi indietro, truffatori!!!!
Antonio

 Rivoglio io i soldi indietro, truffatori!!!!
Antò ma nemmeno i Demo sai far funzionare....?
@Alex

 ha scritto nel messaggio
news:1169636809.7...@k78g2000cwa.googlegroups.com...


@Alex
Prova.
Usalo su Access 2000.
A me non ha funzionato
Antonio

 Antonio
Chi mai usa A2000...?
Io ho solo 2002 e 2003 e funziona come su A97...., ma non lo uso
ugualmente...!
@Alex

 ha scritto nel messaggio
news:1169641179....@k78g2000cwa.googlegroups.com...

Resta il fatto che quella sòla su A2000 non funziona
Antonio

"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio 
news:ieIth.5346$qN4.1...@twister1.libero.it...

Ciao Antonio
ho appena provato su A2000 è funziona.
ma, forse, non ho capito io cosa vuoi ottenere.....uno sconto sulla cena?1?
:-))
Daniele 

 ha scritto nel messaggio
news:ep89f9$57j$1...@aioe.org...

A me non funziona.
Io scrivo formattedmsgbox "Attenzione@dati mancanti@riprova",
vbcritical,"MADDECHE"
e mi fa vedere solo
Attenzione
dati mancanti
senza il riprova e con attenzione senza il grassetto
Antonio

"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio 
news:xJ_th.6099$422....@twister2.libero.it...

Ciao Antonio
confermo quanto sopra.
Ho voluto rifarlo con i tuoi dati di esempio, puoi vedere qua i risultati:
http://mio.discoremoto.alice.it/paperopoli
questa la riga completa:
    If FormattedMsgBox("Attenzione @Dati mancanti@riprova", , "MADDECCHE") = 
vbOK Then
Daniele