Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [FORM] Formun eksik veri girişinde kayıt yapmaması

[FORM] Formun eksik veri girişinde kayıt yapmaması
kasap_onur
Aktif Üye 100-150

*
Kayıt Tarihi: 28.08.2012
Toplam 8 konu açtı.
Toplam 114 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR,
Beğeniler: 0 / 0
#1
17-09-2012, 13:58
Merhabalar....
kullanıcı Record_Table1 formunu doldurduktan sonra çıkış yaparken eğer eksik bir bölüm doldurmuş ise kayıt yapamasın yada daha basitinden bir uyarı mesajı alsın...Bu formda "Save And Open New" "Exit" ve formun kapatma düğmesi var. Bu üçünden birine bastığında bu uyarı ile karşılaşsın istiyorum.
Yardımlarınız için şimdiden teşekkür ederim..
Saygılarımla....


Eklenti Dosyaları
.rar   tooling.rar (Boyut: 503,21 KB / İndirilme: 92)



  Bul
  Alıntı
Bu mesajı beğenenler:
Abdullah
Access Takımı

*
Kayıt Tarihi: 21.11.2009
Toplam 69 konu açtı.
Toplam 836 yorum yaptı.
Toplam 19 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003, Office 2007 TR,
Beğeniler: 0 / 1
#2
17-09-2012, 14:11
İlgili formunuzu tasarım görünümünde açın. Doldurulması zorunlu olsun istediğiniz alanların herbirine sağ tıklayıp "özellikler/diğer" sekmesinde bulunan İM alanına MB yazın. "Save And Open New" "Exit" ve formun kapatma düğmesinden herhangi birinin yada hepsinin tıklatıldığında yada girildiğinde olay yordamına aşağıdaki kodu yazın..

Visual Basic
  1. Dim ctl As Control
  2. Dim strList As String
  3. Dim strDelim As String
  4.  
  5. strList = "": strDelim = ""
  6. For Each ctl In Me.Form
  7. If ctl.Tag = "MB" Then
  8. If IsNull(Me(ctl.Name)) Then
  9. strList = strList & strDelim & ctl.Name
  10. strDelim = vbCrLf
  11. ctl.SetFocus
  12. End If
  13. End If
  14. Next ctl
  15.  
  16.  
  17. If strList <> "" Then
  18. MsgBox "" & "" & strList & ", " & " alanları boş bırakılamaz lütfen doldurun.....", vbOKOnly + vbCritical, "Uyarı"
  19. Me.SetFocus
  20. End If


"Amacımız; zorlaştırmak değil, kolaylaştırmak..." Abdullah Uğur
bayrak



  Bul
  Alıntı
Bu mesajı beğenenler:
kasap_onur
Aktif Üye 100-150

*
Kayıt Tarihi: 28.08.2012
Toplam 8 konu açtı.
Toplam 114 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR,
Beğeniler: 0 / 0
#3
17-09-2012, 15:23 (En son düzenleme: 17-09-2012, 19:50 kasap_onur.)
Abdullah Hocam merhabalar;
Sorunumla ilgilendiğiniz için çok teşekkür ederim.
Dediklerinizi harfiyen uyguladım. Eksik bir alan doldurulmuş ise hata mesajı veriyor. Ancak Şöyle bir problem var; "Save and Opan New" sekmesine tıklayınca hata mesajı veriyor ve ardından yeni sayfa açıyor."Exit" sekmesine basıncada aynı hata ile karşı karşıya kalıyorum. Burada hata mesajından sonra gerekli yerlerin doldurulmadan kaydetmesi yada sistemden çıkılmasını nasıl engelleyebilirz
Bu arada kapatma düğmesini iptal ettim.
Saygılarımla....



  Bul
  Alıntı
Bu mesajı beğenenler:
Abdullah
Access Takımı

*
Kayıt Tarihi: 21.11.2009
Toplam 69 konu açtı.
Toplam 836 yorum yaptı.
Toplam 19 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003, Office 2007 TR,
Beğeniler: 0 / 1
#4
18-09-2012, 10:42 (En son düzenleme: 18-09-2012, 10:44 Abdullah.)
kodun son bölümünü şu şekilde denermisiniz..
Visual Basic
  1. If strList <> "" Then
  2. MsgBox "" & "" & strList & ", " & " alanları boş bırakılamaz lütfen doldurun.....", vbOKOnly + vbCritical, "Uyarı"
  3. Me.SetFocus
  4. Else
  5. DoCmd.GoToRecord , , acNewRec
  6. End If


sistemden çıkış içinde kodun son bölümünü şu şekilde deneyin..
Visual Basic
  1. If strList <> "" Then
  2. MsgBox "" & "" & strList & ", " & " alanları boş bırakılamaz lütfen doldurun.....", vbOKOnly + vbCritical, "Uyarı"
  3. Me.SetFocus
  4. Else
  5. DoCmd.Quit
  6. End If



çıkış butonunun tıklatıldığında olay yordamına makro değilde bu kodları kullanın..
"Amacımız; zorlaştırmak değil, kolaylaştırmak..." Abdullah Uğur
bayrak



  Bul
  Alıntı
Bu mesajı beğenenler:
kasap_onur
Aktif Üye 100-150

*
Kayıt Tarihi: 28.08.2012
Toplam 8 konu açtı.
Toplam 114 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR,
Beğeniler: 0 / 0
#5
18-09-2012, 11:17
Hocam merhabalar;

Çok teşekkür ederim ilgilendiğiniz için..Allah razı olsun..

"Save an open new" sekmesine yerleştirdim ilk olarak.Bu sekmede düzgün çalışıyor. Sonra "Exit" sekmesine yerleştirdim. Eksik yer varsa söylüyor , kapatmıyor. Sonra eksik alanı dolduruyorum. Bu sefer "Job alanı boş bırakılamaz" diyor. Sonra ekranı kapatıyor. Eksiksiz girip denedim. Tam girilsede aynı uyarıyı veriyor. Job kısmına MB yazmış mıyım diye kontrol ettim. Eksik yazmamışım.Sorun neden kaynaklanıyor olabilir.
Saygılarımla....



  Bul
  Alıntı
Bu mesajı beğenenler:
kasap_onur
Aktif Üye 100-150

*
Kayıt Tarihi: 28.08.2012
Toplam 8 konu açtı.
Toplam 114 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR,
Beğeniler: 0 / 0
#6
18-09-2012, 13:57
Hocam arada da aşağıda resmini yüklediğim hatayı veriyor.


Eklenti Dosyaları
.jpg   ddd.jpg (Boyut: 11,9 KB / İndirilme: 102)



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Bir Alandaki Bilgiyi Eksik Yazma M_Kemal_Askeri 3 116 15-05-2026, 00:53
Son Mesaj: M_Kemal_Askeri
  [MAKRO] Alt Formda Filtrelemenin Iptali Ve Alt Formun Liste Olarak Görünmesi. M_Kemal_Askeri 2 192 21-04-2026, 23:57
Son Mesaj: M_Kemal_Askeri
  [RAPOR] Rapor Alt Formun A4 Sayfası Dolana Kadar Tekrar Tekrar Eklenmesi. tolgahanay8 2 361 01-04-2025, 22:26
Son Mesaj: tolgahanay8
  [FORM] Sadece Alt Formun Kaydedilmesi TheREDROSE 1 298 22-08-2024, 03:00
Son Mesaj: dsezgin
  [TABLO] Tabloya Veri Eklerken Kayıt Hatası anno 3 550 11-06-2024, 15:29
Son Mesaj: dsezgin
access-sql-18 Sorgu Kapatınca Formun Açılması burhanb 1 337 18-11-2023, 00:44
Son Mesaj: dsezgin
  [VBA] Kayıt Iptali: Kayıt Iptal Tablosuna Ekle, Kayıdı Sil Işlemi programmer67 6 908 21-07-2023, 10:40
Son Mesaj: onur_can
  [FONKSiYON] Alt Formun Kildini Açmak Ahmet51 3 506 05-07-2023, 08:48
Son Mesaj: onur_can

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi