Skip to main content

AccessTr.neT


sıralama ve kayıt düzenleme hatası

sıralama ve kayıt düzenleme hatası

Çözüldü #3
Merhaba;
Kayıt edilen bir müşteride aynı form içinde iken değişiklik yapılmaması için
Önce FrmMusteri formunuzun özellikler penceresindeki GezintiDüğmelerini Hayır olarak değiştirin. Sonra form üzerine Komut Düğmesi Sihirbazını kullanarak Önceki Kayda Git ve Sonraki Kayda Git butonları ekleyin.
Önceki kayda git butonun adını özellikler penceresinden OncekiKayit yapıp kod tarafını aşağıdaki gibi yapın. Bu kod ile önceki kayıt butonu tıklanınca form üzerindeki kontroller inaktif olacak ve değişiklik yapılamayacak.
On Error GoTo Err_OncekiKayit_Click
Dim kontrol As Control


DoCmd.GoToRecord , , acPrevious

For Each kontrol In Form_FrmMusteri.Controls
If kontrol.ControlType = acTextBox Or kontrol.ControlType = acComboBox Then
kontrol.Enabled = False
End If
Next
Exit_OncekiKayit_Click:
Exit Sub

Err_OncekiKayit_Click:
MsgBox Err.Description
Resume Exit_OncekiKayit_Click
Sonraki Kayda Git butonun adını özellkler penceresinden SonrakiKayit yapın ve kodunu aşağıdaki gibi yazın.
On Error GoTo Err_SonrakiKayit_Click

DoCmd.GoToRecord , , acNext
If IsNull(Me.IdMusteri) Then
For Each kontrol In Form_FrmMusteri.Controls
If kontrol.ControlType = acTextBox Or kontrol.ControlType = acComboBox Then
kontrol.Enabled = True
End If
Next
End If
Exit_SonrakiKayit_Click:
Exit Sub

Err_SonrakiKayit_Click:
MsgBox Err.Description
Resume Exit_SonrakiKayit_Click
Dışarı çıkmak zorunda olduğum için bu kadarını yapabildim.Umarım işinize yarar iyi çalışmalar.
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: sıralama ve kayıt düzenleme hatası - Yazar: direnist - 06/10/2013, 15:46
Task