+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: satış varken kapatma uyarısı (/konu-satis-varken-kapatma-uyarisi.html)
Sayfalar:
1
2
Cvp: satış varken kapatma uyarısı - kayaaltin - 06/05/2015
Sayın ATOZ gösterdiğin ilgi ve alaka en önemlisi emeğin için çok teşekkür ederim yolladığın örnekte satış olsun olmasın soruyordu. daha önce yolladığın üzerinde de saatlerdir uğraştım kodlarla oynadım fakat muaffak olamadım en son yolladığın kodlarla da oynadım ve en sonunda istediğim oldu senin yolladığın kodda ufak değişiklik ve yer değiştirmeyle sorun halledildi
kodlar:
If DCount("*", "stcıkıs") = 0 Then
DoCmd.Close acForm, "xxxxxxxxxx"
Exit Sub
End If
If MsgBox("Formu kapatmak istiyor musunuz?", vbYesNo, "KAPATMA UYARISI") = vbYes Then
If DCount("*", "stcıkıs") > 0 Then
DoCmd.SetWarnings False
DoCmd.OpenQuery "stokcıkısınısil", acViewNormal, acEdit
DoCmd.SetWarnings True
DoCmd.Close acForm, "xxxxxxxxxx"
Exit Sub
End If
Else
End If
iyi çalışmalar
saygılar
Cvp: satış varken kapatma uyarısı - atoz112 - 06/05/2015
sayın altın,
öncelikle,sorununuzun çözülmesi sizin adınıza iyi bir netice.paylaşmanız için de teşekkürler.
son olarak,
konunuzun 5.mesajındaki
Alıntı:...kayıt yoksa kapatmıyor...
ifadenizden dolayı,yine aynı mesaj içerisinde olması isteniyor diye yorumlandığı için;mesaj içerisine ilgili tüm kodlar yazılmıştır.
aksi durumda,elbette,mesajdan bağımsız şekilde yazmak gerekmektedir.bilginize.
iyi çalışmalar,
saygılar.
Cvp: satış varken kapatma uyarısı - kayaaltin - 06/05/2015
Haklısınız emeğiniz için tekrar teşekkür eder
iyi çalışmalar dilerim
saygılar.