ACCESS FEED: [belajar-access] (Solved) Bagaimana cara mendisable fitur delete list item pada subform

Minggu, 27 Januari 2013

[belajar-access] (Solved) Bagaimana cara mendisable fitur delete list item pada subform

Terimakasih atas Pencerahannya Mas Aksan

pada Property On Current subform saya masukkan

Private Sub Form_Current()
If Me.NewRecord Then
Me.AllowDeletions = True
Me.AllowEdits = True
Else
Me.AllowDeletions = False
Me.AllowEdits = False
End If
End Sub

regards
--- In belajar-access@yahoogroups.com, aksan kurdin wrote:
>
> property AllowDelete ?
>
> aksan kurdin
>
>
>
> On 1/26/2013 11:03 PM, HARI wrote:
> >
> > Permisi para agan Access semua
> >
> > saya punya kendala pada list subform di dalam form saya...
> > untuk mencegah perubahan data yang sudah diinput pada subform, saya
> > menggunakan macro:
> >
> > Private Sub Form_Current()
> > If Me.NewRecord Then
> > Me.AllowEdits = True
> > Me.Detail_xxxxxx_subform.Locked = False
> > Else
> > Me.AllowEdits = False
> > Me.Detail_xxxxxx_subform.Locked = True
> > End If
> > End Sub
> >
> > setelah saya coba berhasil untuk data yang sudah diinput sebelumnya
> > tidak dapat di edit ulang atau di delete.
> >
> > Tetapi ketika mouse pointer saya klik pada list kolom satu baris pada
> > item tertentu masih bisa di delete (Dihapus)
> >
> > saya sudah mencoba mencari option argumnet pada:
> >
> > Me.Detail_xxxxxx_subform.Locked = False
> >
> > ternyata tidak ada fitur list untuk "Delete = False"
> >
> > adakah informasi mengenai hal tsb???
> > thx
> >
> > regards
> >
> >
>