P. Darsono pasang event itu di main form ?
jangan, pasangnya di event sub form ....
Kan yang mau dicegah hapus data sub form , bukan main form.

Aksan Kurdin

2008/6/26 Darsono <[EMAIL PROTECTED]>:

>   Terima kasih sebelumnya atas masukannya,
>
>
>
> permasalahannya,
>
> subForm yang saya miliki ada beberapa record.
>
> kalau itu dilakukan, maka keseluruhan record dalam sub-Form tersebut akan
> ter-kunci.
>
>
>
> gambarannya begini,
>
> misal:
>
>
>
> Form :
>
>      NIK      : 012
>
>      Nama   : Sintya
>
>      dll.....
>
>
>
> SubForm
>
>      NIK        Tanggal         Keterangan       Lock
>
>    001          20-1-08       Sakit Gigi          -1
>
>    001          10-5-08       Ngurus STNK    -1
>
>
>
> pada saat menambah data (record) baru lock = 0 (False)
>
> begitu semua data terisi Lock akan berubah menjadi = -1(True)
>
>
>
> keinginannya simple,
>
> user bisa melihat data sebelumnya, tanpa bisa mengubahnya,
>
> tapi bisa menambah data baru.
>
>
>
> apa ada cara yang lebih mudah,
>
>
>
> terima kasih
>
>
>
> darsono
>
>
> --- On *Wed, 6/25/08, budi laksamana <[EMAIL PROTECTED]>* wrote:
>
> From: budi laksamana <[EMAIL PROTECTED]>
> Subject: [belajar-access] Re: Lock Record
> To: [email protected]
> Date: Wednesday, June 25, 2008, 9:00 PM
>
>  he he he....memang yang jagoan sich serba cepet.
> dan aku memang sudah lambat....
> jadi suka nya yang jelas jelas kelihatan... .
>
> seneng juga, ya....kalau sudah biasa vba, bisa main debug.
>
> kalau aku bikin vba, suka aku pasang penghentian module ditengah :
>
> msgbox "budi step-check data" & " " & Me!Checklist & " -- " &
> Me!txtSum
>
> model model seperti itu, saya taruh dimana saja saya mau check, aku
> tampilkan nilai, value, variable dll sehingga seakan tambahan trap/
> jebakan agar aku tahu vba nya mogok dimana dan kenapa.
> kalau sudah dan mau dicabut sementara, tinggal dikasih apostrophe
> saja.
> dan kalau sudah beres module nya, aku ganti jadi notes
>
> cheers,
> budilaks
>
> --- In belajar-access@ yahoogroups. com <belajar-access%40yahoogroups.com>,
> "aksan
> kurdin" <aksan.kurdin@ ...> wrote:
> >
> > Saya coba di debug window:
> >
> > ?CINT(TRUE)
> > -1
> >
> > ?CINT(FALSE)
> > 0
> >
> >
> > aksan kurdin
> >
> > 2008/6/25 budi laksamana <[EMAIL PROTECTED] .>:
> >
> > > baru aku perhatikan tuch,
> > > cancel integer,
> > > biasa nya aku pakai cancel = true atau false, habis textbox nya
> > > ajarin begitu.
> > > pas, aku periksa variable nya, iya ya,....bisa pakai angka.
> > >
> > > cheeer,
> > > budilaks
> > >
> > > --- In belajar-access@ yahoogroups. 
> > > com<belajar-access%40yahoogroups.com><belajar-
> access%40yahoogroup s.com>,
> > > "aksan
> > > kurdin" <aksan.kurdin@ > wrote:
> > > >
> > > > di event before update form bisa di cancel:
> > > >
> > > > private sub form_beforeupdate( cancel as integer)
> > > > if me.flag = true then
> > > > msgbox "ouch.... tidak boleh diedit lagi"
> > > > cancel = -1 ' <- min satu karena tipenya integer, bukan boolean
> > > > end if
> > > > end sub
> > > >
> > > > aksan kurdin
> > > >
> > > >
> > > > 2008/6/25 Darsono <darsono72@> :
> > > >
> > > > > Selamat Pagi Access mania,
> > > > >
> > > > > to the point aja,
> > > > > bagaimana caranya membatasi atau Lock record tertentu didalam
> > > suatu
> > > > > sub-form.
> > > > >
> > > > > kasusnya,
> > > > > untuk record yang sudah diberi tanda lock, (check-list = yes)
> > > tidak bisa di
> > > > > delete.
> > > > > dan untuk record yang lain (check-list = No) masih boleh.
> > > > >
> > > > > makasih sebelumnya
> > > > >
> > > > > darsono
> > > > >
> > > > >
> > > > >
> > > >
> > > >
> > > >
> > > > --
> > > > Aksan Kurdin
> > > >
> > >
> > >
> > >
> >
> >
> >
> > --
> > Aksan Kurdin
> >
>
>
>  
>



-- 
Aksan Kurdin

Kirim email ke