Skip to main content

AccessTr.neT


satış varken kapatma uyarısı

satış varken kapatma uyarısı

#7
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
Dünya hayatı bir oyun ve eğlenceden başka bir şey değildir. Allah'tan korkanlar için elbette ahiret yurdu daha hayırlıdır. Hâlâ akıl erdiremiyor musunuz? 
(En'am: 32)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
satış varken kapatma uyarısı - Yazar: kayaaltin - 06/05/2015, 12:44
Cvp: satış varken kapatma uyarısı - Yazar: atoz112 - 06/05/2015, 14:10
Cvp: satış varken kapatma uyarısı - Yazar: atoz112 - 06/05/2015, 16:56
Cvp: satış varken kapatma uyarısı - Yazar: atoz112 - 06/05/2015, 18:52
Cvp: satış varken kapatma uyarısı - Yazar: kayaaltin - 06/05/2015, 19:09
Cvp: satış varken kapatma uyarısı - Yazar: atoz112 - 06/05/2015, 19:20
Task