Ekteki tabloda ana menude bulunan start date ve finishdate 13/4/12 ve 15/4/12 tarıhlerini seçtiğimde Material received report"a tıkladığımda rapor iki tarih arasında ne varsa onu getiriyor. Benim yapmak istediğim ise ben hiç bir şekilde tarih seçmeden direk olarak Material received report"a tıkladığımda raporda ne var ne yok hepsini açmasıdır. Umarım anlatabilmişimdir.
Saygılar
ilgili butonun kodunu bununla değiştir dene bakalım olacak mı
Kod:
Private Sub toplammaterialcmd_Click()
On Error GoTo Err_toplammaterialcmd_Click
Dim stDocName As String
baslamatarih = IIf(IsNull([baslamatarih]), (DLookup("[Entrydate]", "raporgiris", "cstr(Entrydate)='" & CStr(DMax("Entrydate", "raporgiris")) & "'")), [baslamatarih])
bitistarih = IIf(IsNull([bitistarih]), (DLookup("[Entrydate]", "raporcikis", "cstr(Entrydate)='" & CStr(DMax("Entrydate", "raporcikis")) & "'")), [bitistarih])
stDocName = "raporgircik"
DoCmd.OpenReport stDocName, acViewPreview
Exit_toplammaterialcmd_Click:
Exit Sub
Err_toplammaterialcmd_Click:
MsgBox Err.Description
Resume Exit_toplammaterialcmd_Click
End Sub
mantıken girmeden çıkamaz diye
en küçük tarihi giriş tablosunun en küçük tarihi
en büyük tarihi de çıkış tablosunun en büyük tarihinden aldım
Sorunsuz çalıştı teşekkür ederim. hocam
şu tıklama olayını da aşağıdaki kod ile değiştirin
Kod:
Private Sub Temizlecmd_Click()
Me.baslamatarih = Null
Me.bitistarih = Null
Me.baslamatarih.SetFocus
End Sub
değiştirdim hocam tamamdır. Konu cevaplanmıştır. Saygılar
yalnız bu çözüm hata verebilirçünkü
ilk tarih giriş tablosunun ilk tarihi mantıklı olmakla birlikte
son tarih herzaman çıkış tablosunun son tarihi olmayabilir
mesela
bugun itibariyle bir giriş olup henüz bugün çıkış yapılmadıysa
bugun giren malzemeler gözükmez
bu durumda bir union sorgu ile her iki tablonun tarihleri bir yere toplanır
ve bu sorgudaki en büyük ve en küçük tarihler kullanılır