Baiknya anda bikin sebuah variable yg mentriger ketika ada perubahan disetiap field form anda..
Misal :
Dim flagubah as boolean
Set variable tersebut menjadi true jika ada modifikasi di form anda..
Ketika anda akan close form cek varible tsb.. Jika true keluarkan messagebox yg sebelumnya saya kasi.. Kondisi lainnya abaikan
Jadi di event onclick tombol close nya menjadi seperti ini :
If flagubah = true then
If msgbox("ada perubahan data... anda yakin akan keluar dari form ini ..?", vbinformation + vbyesno,"Perhatian")=vbyes then
End if
End if
Docmd.close
Terima kasih Kang atas pencerahannya. Smoga Allah SWT membalasNya. Amiin.
Tapi bagaimana kalau pernyataan itu muncul jika terjadi perubahan data saja. Terima kasih atas perhatiannya.
Wassalaam,
Toni Coyev
--- In belajar-access@yahoogroups.com, kuncara.arief@... wrote:
>
> Coba bantu ya..
> Jika anda membuat tombol keluar maka simpan script ini pada event onclick tombol tsb :
> If msgbox("anda yakin akan keluar dari form ini ..?", vbinformation + vbyesno,"Perhatian")=vbyes then
> Docmd.close
> End if
>
> Script diatas bisa jg anda taro di form event onclose
>
> Demikian semoga membantu ya..
> Sent from my BlackBerry® smartphone from Sinyal Bagus XL, Nyambung Teruuusss...!
>
> -----Original Message-----
> From: "Coyev" <coyev@...>
> Sender: belajar-access@yahoogroups.com
> Date: Sun, 01 Apr 2012 17:07:09
> To: <belajar-access@yahoogroups.com>
> Reply-To: belajar-access@yahoogroups.com
> Subject: [belajar-access] Tanya Simpan Data...
>
> Bagaimana caranya di Form isian (type: Unbound Form), jika data telah ada perubahan tapi belum disimpan, ketika keluar Form tampil peringatan bahwa perubahan data belum disimpan.
>
> Mohon pencerahannya dari para Suhu Access. Terima Kasih.
>
> Wassalaam,
>
> Toni Coyev
>
Tidak ada komentar:
Posting Komentar