04/09/2015, 09:25
suleymanteber
Merhaba,
Aşağıda bulunan kodu yazdığımda alt form güncellemesi yapmıyor.
Çözüm için yardımcı olmanızı rica ediyorum.
Private Sub Komut114_Click()
If Me.Dirty = True Then
If MsgBox("Kaydedilmemiş alanlar var. Kaydetmek istiyor musunuz?", vbYesNo, "ÖZLEM EKİN AKBULUT") = vbNo Then
Undo
DoCmd.Close
Else
DoCmd.GoToRecord , , acNewRec
End If
Else
DoCmd.GoToRecord , , acNewRec
End If
Me.[not_tbl_alt_formu].Requery
End Sub
Aşağıda bulunan kodu yazdığımda alt form güncellemesi yapmıyor.
Çözüm için yardımcı olmanızı rica ediyorum.
Private Sub Komut114_Click()
If Me.Dirty = True Then
If MsgBox("Kaydedilmemiş alanlar var. Kaydetmek istiyor musunuz?", vbYesNo, "ÖZLEM EKİN AKBULUT") = vbNo Then
Undo
DoCmd.Close
Else
DoCmd.GoToRecord , , acNewRec
End If
Else
DoCmd.GoToRecord , , acNewRec
End If
Me.[not_tbl_alt_formu].Requery
End Sub