boş kayıt...başka tabloya kayıt...belli sürede...

06/01/2014, 15:06

derebeyi

merhaba arkadaşlar,
öncelikle başarılı bilgi paylaşımlarının olduğu bu siteyi hazırlayanlara teşekkür ederek bazı bilgi taleplerim var. hali hazırda örneğim yok.ben de zaten bu bilgiler ışığında bazı çalışmalar düşünüyorum.yardımcı olunabilirse sevinirim.
saygılar...

Mesela 100 kayıtlık bir tablo olsun.bu kayıt sayısı sabit kalacak.ve form üzerinde ilgili kayıt ile çalışırken,bu tabloya özellikle boş bir kaydın veya yeni bir kaydın eklenmemesini kod ile nasıl sağlayabilirim?


ilgilenen arkadaşlara şimdiden bilgileri için teşekkür ederim.
07/01/2014, 04:22

ozanakkaya

Alıntı:Mesela 100 kayıtlık bir tablo olsun.bu kayıt sayısı sabit kalacak.ve form üzerinde ilgili kayıt ile çalışırken,bu tabloya özellikle boş bir kaydın veya yeni bir kaydın eklenmemesini kod ile nasıl sağlayabilirim?

Formda Boş Geçilen Alan Olduğunda Uyarı Vermesi

linkindeki 1. mesajdaki örneği inceleyiniz. kaydet butonunu tıklandığında

If IsNull(Me.alistarihi) Then
MsgBox ("Alış Tarihi alanı boş bırakılamaz")
Me.alistarihi.SetFocus
ElseIf IsNull(imeino) Then
MsgBox ("imei no alanı boş bırakılamaz")
Me.imeino.SetFocus
ElseIf IsNull(markaadi) Then
MsgBox ("marka adı alanı boş bırakılamaz")
Me.markaadi.SetFocus
ElseIf IsNull(modeladi) Then
MsgBox ("model adı alanı boş bırakılamaz")
Me.modeladi.SetFocus
ElseIf IsNull(tedarikturu) Then
MsgBox ("Tedarik Türü alanı boş bırakılamaz")
Me.tedarikturu.SetFocus
ElseIf IsNull(alisfiyati) Then
MsgBox ("Alış Fiyatı alanı boş bırakılamaz")
Me.alisfiyati.SetFocus
ElseIf IsNull(satisilkfiyati) Then
MsgBox ("Satış Fiyatı alanı boş bırakılamaz")
Me.satisilkfiyati.SetFocus
Else
DoCmd.RunCommand acCmdSaveRecord
End If

kodu ile boş alanın olup olmadığını kontrol eder ve uyarır. Tüm olanlar dolu ise kaydeder.

Umarım sorunuz bunun ile alakalıdır, soru tam anlaşılmıyor.
07/01/2014, 12:07

derebeyi

Sn.Ozanakkaya, cevap verdiğiniz için teşekkür ederim.

Bahsettiğiniz linkteki örneği inceleyeceğim…

İlginize tekrar teşekkür ederim.iyi çalışmalar.