AccessTr.neT
hatırlatma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: hatırlatma (/konu-hatirlatma--12333.html)

Sayfalar: 1 2


hatırlatma - svs007 - 27/08/2011

merhaba

Resolved olarak seçtiğimde bana 3 gün sonra active olarak gözükmesini istiyorum.ve istediğimde günü nasıl değiştirebilirim
örnek ektedir.
[Resim: wwhle0.png]



Cvp: hatırlatma - nsahin - 27/08/2011

Sayın svs007, istediğiniz böyle bir şey mi?



Cvp: hatırlatma - svs007 - 06/09/2011

desteğiniz için teşekkürler,
öncelikle Date()-2)) -1 olarak değiştirdim (1 gün sonra değişmesi gerekir diye düşünüyordum bugün baktığımda herhangi bir değişiklik göremedim
"resolved" dan "active " geçmedi. bir eksiklik mi var ?

Private Sub Form_Load()
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE Cases SET Cases.Status = 'Active', Cases.[Resolved Date]= Null WHERE (((Cases.Status)='Resolved') And ((Format([Resolved Date],'Short Date'))<Date()-1)) "
Form.Requery
End Sub




Cvp: hatırlatma - Yandemir - 06/09/2011

aşağıdaki kodu deneyin
DoCmd.RunSQL "UPDATE Cases SET Cases.Status = 'Active', Cases.[Resolved Date]= Null WHERE Cases.Status='Resolved' And cvdate([Resolved Date])<Date()-1"



Cvp: hatırlatma - svs007 - 06/09/2011

Aşağıdaki gibi değiştirdim. 1 gün bekleyeceğim yarın aktive durumuna gelmesi gerekir. teşekkürler,

Private Sub Form_Load()
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE Cases SET Cases.Status = 'Active', Cases.[Resolved Date]= Null WHERE Cases.Status='Resolved' And cvdate([Resolved Date])<Date()-1"
Form.Requery
End Sub



Cvp: hatırlatma - Yandemir - 06/09/2011

hatta emniyet olsun diye

****And cvdate([Resolved Date])<cvdate(Date()-1)" 

yapın