Skip to main content

AccessTr.neT


formda sadece kaydet butonunun kaydetmesi

formda sadece kaydet butonunun kaydetmesi

Çözüldü #15

evet ozan bey alış formunda bir problem yok. fatih bey düzenlemesini alışlar formunda yaptığı için alış formu dedim bende.

şunu demek istemiştim, form kapanması durumu için verdiği kodlar, aynı form eğer başka tablolara da kayıt yapıyorsa bu durumda yine genel olarak uygulanabilir bir kod varmı.. yani formda veri girişinden vazgeçince tüm herşeyi iptal etmek için yapabileceğimiz birşey varmı.. bunu demek istemiştim..

ozan bey sizin daha önce yapmış olduğunuz alışlar formundaki kapatma butonundaki kodları kendimce düzenleyerek satışlar formuna uyarlamaya çalışıyorum.. fakat şu uyarıyı alıyorum:

eksik işleç... debug:

DoCmd.RunSQL "UPDATE alislar SET [Satildi] = -1 WHERE [imeiid]=" & Me.imeiid.Value & ";"

kodlar şöyle;

If IsNull(Me.satistarihi) Or IsNull(satisfiyati) Or IsNull(musteribilgi) Then

If MsgBox("Formda Boş Alanlar Mevcut. Kaydedilmeden Kapatılsın mı?", vbInformation + vbYesNo, "Kapatılıyor...") = vbYes Then
Me.Undo
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE alislar SET [Satildi] = -1 WHERE [imeiid]=" & Me.imeiid.Value & ";"
DoCmd.SetWarnings True
DoCmd.Close
End If

Else
Me.satisfiyati.Enabled = False
Me.satistarihi.Enabled = False
Me.musteribilgi.Enabled = False
MsgBox "Satış İptal Edilsin mi?", vbCritical + vbYesNoCancel, "Satış İptal Ediliyor..."
Me.Undo
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE alislar SET [Satildi] = -1 WHERE [imeiid]=" & Me.imeiid.Value & ";"
DoCmd.SetWarnings True
DoCmd.Close

Exit Sub

End If

biraz yardım edebilirseniz sevinirim.
.rar telefon.rar (Dosya Boyutu: 77,47 KB | İndirme Sayısı: 2)
Son Düzenleme: 24/01/2014, 20:34, Düzenleyen: miCRoBe`.
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
Cvp: formda sadece kaydet butonunun kaydetmesi - Yazar: miCRoBe` - 24/01/2014, 20:31
Task