[split] Şartlı Kayıt Ekleme Hk.
Tarih
29/11/2010 15:06
Konu Sahibi
ozmly
Yorumlar
7
Okunma
2096
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



ozmly
Aktif Üye
Kullanici Avatari
Aktif Üye
44
01/10/2010
0
Ankara
Ofis 2007
05/03/2013,19:09
Çözüldü 
Sponsor Reklam
Arkadaşlar
Fomda Adı soyadı veya doğum yeri alanlarından herhangibirinin doldurulması yeterli olması halinde aşağıdaki kodda nasıl bir değişiklik yapmalıyız

ElseIf IsNull(DOGUMYERI) Then
MsgBox "DOGUMYERI alanı boş bırakılamaz..!", vbCritical, "UYARI"
DOGUMYERI.SetFocus
DoCmd.CancelEvent
Exit Sub

ElseIf IsNull(CALISTIGIKURUM) Then
MsgBox "CALISTIGIKURUM alanı boş bırakılamaz..!", vbCritical, "UYARI"
CALISTIGIKURUM.SetFocus
DoCmd.CancelEvent
Exit Sub

Else

DoCmd.GoToRecord , , acNewRec

End If

Exit_Komut10_Click:
Exit Sub

Err_Komut10_Click:
MsgBox Err.Description
Resume Exit_Komut10_Click
End Sub


Cevapla

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.750
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
13/02/2017,02:22
Çözüldü 
Sayın ozmly, cevaplanmış bir sorunun arkasına soru eklemişsiniz. Ben konuyu sorular bölümüne ayırarak ekledim. Lütfen daha dikkatli olun, yoksa site mevcut düzenliliğini kaybedecek.
Sorunuzla ilgili olarak da lütfen -ama lütfen- örnek ekleyiniz. Bahsettiğiniz kodları denemek gerekli, tek tek analiz edecek kadar kimsenin boş zamanının olduğunu sanmam.
İnadına, ille de Accesstr.net...
Cevapla

İzmir
Java Gui Uzmani
Kullanici Avatari
Aktif Üye
M.... E.... Ö....
197
8
02/11/2008
100
İzmir
Ofis 2013 64 Bit
17/02/2017,22:47
Çözüldü 
Sponsor Reklam

Visual Basic Code
1
2
3
4
5
6
7
8
9
  If (IsNull(AdiSoyadi) Then
     MsgBox ("AdSoyad bölümünü boş geçtiniz Doğumyerini girmelisiniz")
     DOGUMYERI.SetFocus
  ElseIf IsNull(DOGUMYERI) Then
    MsgBox ("Doğumyerini boş geçtiniz AdSoyad bölümünü giriniz")
    AdSoyad.SetFocus
    DoCmd.CancelEvent

    Exit Sub


Cevapla

ozmly
Aktif Üye
Kullanici Avatari
Aktif Üye
44
01/10/2010
0
Ankara
Ofis 2007
05/03/2013,19:09
Çözüldü 
Yadımınız için teşekkürler Ancak,
Bu kod ad soyadı boşsa DOGUMYERI odaklanıyor. DOGUMYERI doldurulup tekrar tıklandığında ad soyadı kontrol etmeyip DOGUMYERI nin dolu olup olmadığına bakmalı ama tekrar adı soyadına gidiyor. Aynı zamanda adı soyadı dolu iken DOGUMYERI kontrol etmeden geçmeli

her ikiside boşsa birine odaklanmalı. Herhangi biri dolu ise çalıştığı kurumu kontrol etmeli

If IsNull(ADISOYADI) Then yapısını If IsNull(ADISOYADI) (DOGUMYERI)Then şeklinde birlikte kullanmak mümkün mü?


Ek Dosyalar
.rar   şartlı boş alan kontrolü.rar (Dosya Boyutu: 16,2 KB / İndirme Sayısı: 7)
Cevapla

İzmir
Java Gui Uzmani
Kullanici Avatari
Aktif Üye
M.... E.... Ö....
197
8
02/11/2008
100
İzmir
Ofis 2013 64 Bit
17/02/2017,22:47
Çözüldü 
Sponsor Reklam
(30/11/2010, 17:34)ozmly Adlı Kullanıcıdan Alıntı: Yadımınız için teşekkürler Ancak,
Bu kod ad soyadı boşsa DOGUMYERI odaklanıyor. DOGUMYERI doldurulup tekrar tıklandığında ad soyadı kontrol etmeyip DOGUMYERI nin dolu olup olmadığına bakmalı ama tekrar adı soyadına gidiyor. Aynı zamanda adı soyadı dolu iken DOGUMYERI kontrol etmeden geçmeli

her ikiside boşsa birine odaklanmalı. Herhangi biri dolu ise çalıştığı kurumu kontrol etmeli

If IsNull(ADISOYADI) Then yapısını If IsNull(ADISOYADI) (DOGUMYERI)Then şeklinde birlikte kullanmak mümkün mü?

Evet Olabilir size kalmış döngüden çıkması için Else bir görev yazmalsınız ben başlangıcını yazmıştım.

Visual Basic Code
If (IsNull((ADISOYADI) Or (DOGUMYERI))) Then

   MsgBox ("AdSoyad veya Doğumyerinden birini yazmalısınız boş geçemezsiniz.")
   ADISOYADI.SetFocus


Cevapla

C*e*l*o*y*c*e
Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.867
29/10/2008
902
Ankara
Ofis 2010 32 Bit
Çözüldü 
sayın schworse kardeşimize ek olarak
If (IsNull((ADISOYADI) Or (DOGUMYERI))) Then MsgBox "Lütfen Boş geçmeyin, AdSoyad veya Doğumyerinden birini yazmalısınız boş geçemezsiniz", 48, "Kayıt İşlemi": Me.ADISOYADI.SetFocus: Exit Sub
şeklinde bitişkte yazılabilir ..
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Altformda Yeni Kayıt-Kaydet Vb İşlemler koruyucu 2 69 16/02/2017, 20:00 koruyucu
  Kayıt Kontrol Eksik Verileri Bulma Ve Hesaplama hknct 10 117 11/02/2017, 18:11 hknct
  Tablolara Tek Formdan Kayıt Girmek Ve Kayıtları Görmek ozer1971 5 56 09/02/2017, 13:32 atoz112
  Formda veri ekleme broiling 16 181 09/02/2017, 06:11 broiling
  Raporu Pdf Olarak Kayıt Etmek. m_demir 9 73 08/02/2017, 22:34 atoz112


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya