|
| HOMEPAGE | INDICE FORUM | REGOLAMENTO | ::. | NEI PREFERITI | .:: | RSS Forum | RSS News | NEWS web | NEWS software | |
| PUBBLICITA' | | | ARTICOLI | WIN XP | VISTA | WIN 7 | REGISTRI | SOFTWARE | MANUALI | RECENSIONI | LINUX | HUMOR | HARDWARE | DOWNLOAD | | | CERCA nel FORUM » | |
31-05-2008, 10.58.50 | #1 |
Newbie
Registrato: 31-05-2008
Messaggi: 1
|
Problema Access
ho una maschera all'interno della quale devo inserire una data (data prossimo contattoTextBox) e deve essere obbligatoriamente inserita, deve essere da oggi in poi fino ad un massimo di 3 mesi da oggi dunque oggi è il 31 maggio non deve essere oltre il 31 agosto. questo controllo lo devo inserire sul tasto chiudi da me generato nella mashera come posso fare? Grazie |
03-06-2008, 11.16.56 | #2 |
Hero Member
Registrato: 14-01-2005
Loc.: Rome, Italy
Messaggi: 1.132
|
supponiamo che il campo della data si chiami CampoData
e quello di chiusura maschera Comando0 sull'evento click del Comando0 inserirai Private Sub Comando0_Click() On Error GoTo Err_Comando0_Click Dim Confronto As Date If Len(Nz(Trim(Me.CampoData))) < 1 Then MsgBox "ATTENZIONE: Il campo data è vuoto, correggere l'errore!" Exit Sub End If If Not (IsDate(Me.CampoData)) Then MsgBox "ATTENZIONE: La data inserita non è una data valida, correggere l'errore!" End If Confronto = DateAdd("m", 3, Date) If Me.CampoData > Confronto Then MsgBox "ATTENZIONE: La data inserita ha un lasso di tempo superiore ai 3 mesi, correggere la data!" End If If Me.CampoData < Date Then MsgBox "ATTENZIONE: La data inserita è antecedente alla data odierna, correggere la data!" End If DoCmd Quit Exit_Comando0_Click: Exit Sub Err_Comando0_Click: MsgBox Err.Description Resume Exit_Comando0_Click End Sub
___________________________________
♫ m u s i c ♪ i s ♫ t h e ♪ a n s w e r ♫ "Il più piccolo dei piccoli felini è già lui stesso un vero capolavoro". (Leonardo da Vinci) Namasté! |
Utenti attualmente attivi che stanno leggendo questa discussione: 1 (0 utenti e 1 ospiti) | |
Strumenti discussione | |
|
|
Discussioni simili | ||||
Discussione | Autore discussione | Forum | Risposte | Ultimo messaggio |
problema con access 2003 | procione | Office suite | 3 | 25-03-2008 09.50.44 |
Problema con i segnali acustici | shadowDK | Windows 7/Vista/XP/ 2003 | 3 | 21-03-2008 10.01.01 |
Problema microsoft access | deniro | Office suite | 10 | 26-08-2004 15.45.13 |
Problema ACCESS 97 | Sauzer | Office suite | 1 | 24-08-2004 10.23.16 |
F1 per avvio di windows | filll | Hardware e Overclock | 22 | 23-06-2004 16.15.36 |