Kaydetme,seçime göre sorgu,Null değeri

Katılım
8 Ağustos 2006
Mesajlar
28
3 tane sorunum var bunların hepsine cevap verebilirseniz sevinirim
1-Formlarıma kaydet butonu koydum ama sadece görünüşte varlar hiç bir işe yaradıklarını sanmıyorum çünkü kayıt giriyorum değiştiriyorum kaydet butonuna basmadan çıksamda kendi kaydediyor.benim istediğim kaydet e basmazsam kayıt yapmasın değişiklikleri ayrıca kapat a basınca değişiklikleri kaydetsin mi diye sorsun istiyorum uğraştım baya bi olmadı.
2-İkinci sorunum ise hammadde girişlerini yaptım çıkışlarını da yaptım fakat ayrı bir formda mevcut stokları görebilmek için açılan kutularla yaptığım seçime göre (parti no;firma;menşeli...vs) bana mevcut stokları göstersin istiyorum onu da beceremedim.yani seçtiğim kriterlere göre(bu kriterleri açılan kutu ile formdan girebileyim)
3-son sorunum ise beni gıcık eden bişey.form üzerinden yeni kayıt ekleye basıyorum ama vazgeçip kapat a basıyorum daha sonra birincil anahtar null değeri alamaz falan yazıyor.ben daha giriş yapmadım ki null değeri alsın

teşekkürler saygılar....
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın ilhandundogdu77,

Aşağıdaki kod parçasını ilişkili formun kod sayfasına yapıştırırsanız yukarıdaki 3 problemden de kurtulmuş olursunuz.

Kod:
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMsg As String
    strMsg = "Veriler değişti!."
    strMsg = strMsg & "   @Değişiklikleri kaydetmek istermisiniz?"
    strMsg = strMsg & "   @Kaydetmek için EVET'e değişiklik istemiyorsanız HAYIR'a klikleyin."
    If MsgBox(strMsg, vbQuestion + vbYesNo, "Veriler Kaydedilsin mi?") = vbYes Then
        'Hiç bir şey yapma
    Else
        DoCmd.RunCommand acCmdUndo
        
        
    End If
End Sub
İyi çalışmalar:hey:
 
Katılım
8 Ağustos 2006
Mesajlar
28
Sayın Modalı

dediğinizi yaptım fakat bu seferde kliklediğim her butondan sonra değişiklikler kaydedilsinmi ibaresi geliyor.yani sonraki kayıt önceki kayıt butonlarına bastığımda bile bu ifade geliyor ne yapabiliriz?

Saygılar...
 
Üst