AccessTr.neT

Tam Versiyon: Boş metin kutusu uyarısı
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3
Merhaba Arkadaşlar Aşağıdaki kodlarla Kaydet ve yazdır işlemini yapıyorum.

Alt Formda bulunan aşağıdaki metin kutularım var. Bu metin kutularından bir tanesi boş olduğu zaman uyarı versin kayıt etme ve yazdırmasın. Aşağıdaki kodlara uyarı kodunu eklerseniz sevinirim. İyi akşamlar.
 
Metin Kutuların adları:
Toplam
KdvSekiz
KdvOnSekiz
Yekun
 
Kaydet Kodu:
Kod:
Private Sub Komut30_Click()
 
If MsgBox("Faturayı KAYDETMEK istiyor musunuz?", vbYesNo, "KAYDETME UYARISI") = vbYes Then
    If Me.FaturaID = "" Or IsNull(Me.FaturaID) Then
        MsgBox ("Lütfen FATURA işlemi için kayıt seçiniz"), vbCritical, "KAYIT SEÇME UYARISI"
    Exit Sub
    Else
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    End If
Else
Me.Undo
MsgBox ("Kaydetme işlemi iptal edilmiştir"), vbCritical, "KAYDETME İPTAL BİLGİLENDİRMESİ"
Exit Sub
End If
 
Me.Refresh
End Sub


Yazdır Kodu:
Kod:
Private Sub Komut33_Click()
    If Me.FaturaID = "" Or IsNull(Me.FaturaID) Then
    MsgBox ("Lütfen FATURA işlemi için kayıt seçiniz"), vbCritical, "KAYIT SEÇME UYARISI"
    Exit Sub
    Else
    DoCmd.OpenReport "FaturaDokum", acPreview
    End If
End Sub
https://accesstr.net/konu-formda-bos-gec...rmesi.html bağlantısındaki konuyu inceleyiniz.
Çok teşekkürler hocam.
Alıntı
https://accesstr.net/konu-formda-bos-gec...rmesi.html bağlantısındaki konuyu inceleyiniz.

Hocam yukarıdaki adresdeki kodları dosyama ekledim. Kodlar çalışmadı. Size zahmet olmayacaksa eklediğim dosyama uygularmısınız. Saygılar
sayın kenan827,

Alıntı:...Alt Formda bulunan aşağıdaki metin kutularım var. Bu metin kutularından bir tanesi boş olduğu zaman uyarı versin kayıt etme ve yazdırmasın. 
 
Metin Kutuların adları:
Toplam
KdvSekiz
KdvOnSekiz
Yekun

EK'te;
bahsettiğiniz talebinize yönelik olarak,SADECE bu dört denetim için olmak üzere hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
Çok teşekkürler hocam ellerinize sağlık.

Hocam uyarıyı veriyor. Yazdırmıyor. Ancak uyarıya rağmen kayıt yapıyor.

Hocam birde uyarıyı sadece Toplam ve Yekun metin kutular boş olduğu zaman versin. KdvSekiz, KdvOnSekiz boş olsa işlem yapsın uyarı vermesin.

Hocam aşağıdaki metin kutuları dolu olduğu zamanda da yazdır butonuna tıkladığımız zamanda rapor baskı önizleme olarak açılmıyor. Boş metin kutusu uyarısı veriyor.
Toplam
KdvSekiz
KdvOnSekiz
Yekun
Sayın kenan827,

EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

NOT:
Daha önceki mesajlarda da bahsi yapıldığı üzere,sanırım önceki sürüme dönüştürme farklılığından ya da sorunlarından veyahut da hesaplama fonksiyonundan dolayı olsa gerek,alt forma kayıt işlemini sağlayamadığından dolayı;alt forma veri girme veya toplam ve yekun denetimlerini boş bırakma işlemlerini deneme imkanı da söz konusu olmadığı için,bu şekilde bir deneme yapılmamıştır.

Denemelerinizin neticesini paylaşabilirsiniz.

bilginize...iyi çalışmalar,saygılar.
Sayfalar: 1 2 3