AccessTr.neT

Tam Versiyon: mecburi giriş
Ş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
Kaydet Butonuna aşağıdaki kodu ekle.

Kod:
Private Sub Komut649_Click()
If (IsNull(Açılan_Kutu663.Value)) Then
DoCmd.Save
Else
If (IsNull(TARİH.Value)) Or (IsNull(SAYISI.Value)) Or (IsNull(ALINDIĞI_TARİH.Value)) Or (IsNull(EKİ.Value)) Or (IsNull(KONUNUN_ÖZETİ.Value)) Or (IsNull(Liste645.Value)) Then
MsgBox ("Boş kalan alanlar var.")
End If
End If
If (IsNull(Açılan_Kutu665.Value)) Then
DoCmd.Save
Else
If (IsNull(TARİHİ.Value)) Or (IsNull(KONUNUN_YAPILAN_VEYA_YAPILACAK_İŞLEMİN_ÖZETİ.Value)) Or (IsNull(AİT_OLDUĞU_DOSYA_NO.Value)) Or (IsNull(KAYIT_NO_SONRASI.Value)) Or (IsNull(KAYIT_NO_ÖNCESİ.Value)) Then
MsgBox ("Boş kalan alanlar var.")
End If
End If
End Sub

Ayrıca, Yeni Konu Açma, Yeni Cevap Yaz.
teşekkür ederim Eline sağlık
Bu program tam aradığım formatmış.Keşke sorunun çözen arkadaş son halini ekleseymiş bizde faydalansaymışız !
bU PROĞRAMA NASIL kullanıcı-şifre-yetki eklemesi yapabiliriz ?


Değerli üstatlar; bu konuyla ilgili yardım edecek yok mu ? Ve program bu haliyle kullanıma açık mıdır ? İncelediğim kadarıyla evet ama, ben acemi penceresinden baktım.

Sn.Hanedan0812 'ye mesaj attım-Yanıt bekliyorum, saygılarımla.
Kullanıcı adı ve şifre ile giriş için sitede onlarca örnek var. Sizin aradığınız daha farklı bir şey mi?
Sn.Alpek99 hoca, arkadaşların emeklerine sağlık lakin bulsam bile neyi nereye yapıştıracağımı veya yazacağımı bilmiyorum.Denediğim zaman ise evde ki bulgurdan oluyorum..Bir sorun da raporları excele atıyor gözüküyor ama nereye atıyor bulamadım.

Tşk.
Sn.Hanedan0812 gelirse bu işi çözer.
Sayfalar: 1 2 3