Fwd: Re: [belajar-access] input data

Mas Faudzy,
Saya tetap forward ke milis ya, supaya kalau saya tidak bisa jawab, masih ada member lain yang berkemungkinan lebih bisa menyelesaikannya.



#name biasanya memberikan isi field yang salah nama. coba periksa lagi.





kalau yang defaultvaluenya tidak berubah2, pastikan di property field tsb kosong:




aksan kurdin

Dear Mas Aksan terima kasih atas masukannya.. intruksinya sudah saya coba.. sejauh ini berhasil dan sangat membantu..tinggal ke step selanjutnya.. oh ya ada masalah sedikit.. ketika saya selesai input di form kemudian ingin tambah ada kolom yang bertuliskan #name (No_Size) apa penyebabnya padahal sudah sama penulisan codingnya. dan pada kolom tgl_masuk_finishing afterupdatenya kembali ke tahun 1989 bukan tanggal yang saya input sebelumnya. mohon sarannya,,terimakasih faudzy --- Pada Kam, 28/3/13, aksan kurdin <aksan.kurdin@gmail.com> menulis: Dari: aksan kurdin <aksan.kurdin@gmail.com> Judul: Re: [belajar-access] input data Kepada: belajar-access@yahoogroups.com Tanggal: Kamis, 28 Maret, 2013, 7:24 PM   coba berlatih dengan vba. setiap field di form selalu punya property defaultvalue, sebagai nilai inisialisasi saat add data baru. jika faudzy bisa set di setiap event after update setiap field yang dimaksudkan harus mewarisi data sebelumnya, maka keinginannya sudah terpenuhi. berikut potongan kodenya : Private Sub CmdTambah_Click()     DoCmd.RunCommand acCmdRecordsGoToNew End Sub Private Sub Line_AfterUpdate()     Me.Line.DefaultValue = Me.Line End Sub Private Sub No_Carton_AfterUpdate()     Me.No_Carton.DefaultValue = Me.No_Carton End Sub Private Sub No_PO_AfterUpdate()     Me.No_PO.DefaultValue = Me.No_PO End Sub Private Sub No_Size_AfterUpdate()     Me.No_Size.DefaultValue = Me.No_Size End Sub Private Sub No_Style_AfterUpdate()     Me.No_Style.DefaultValue = Me.No_Style End Sub Private Sub Quantity_AfterUpdate()     Me.Quantity.DefaultValue = Me.Quantity End Sub Private Sub Tgl_Masuk_Finishing_AfterUpdate()     Me.Tgl_Masuk_Finishing.DefaultValue = Me.Tgl_Masuk_Finishing End Sub sedangkan untuk menghandel agar penekanan tombol buat baru semua field jadi kosong, set defaultvaluenya jadi kososng juga: Private Sub CmdBuatBaru_Click()     Me.No_Style.DefaultValue = ""     Me.No_PO.DefaultValue = ""     Me.No_Size.DefaultValue = ""     Me.Quantity.DefaultValue = ""     Me.No_Carton.DefaultValue = ""     Me.Line.DefaultValue = ""     Me.Tgl_Masuk_Finishing.DefaultValue = ""     DoCmd.RunCommand acCmdRecordsGoToNew End Sub selamat berjuang aksan kurdin On 3/27/2013 11:32 AM, Faudzy wrote:   Dear MASTER ACCESS   Tolong dong saya bener-bener newbe banget di access… Saya butuh pertolongan untuk masalah input data dalam form…   Penjelasan terlampir…     Oh ya sekalian Tanya buat para master berapa sich KAPASITAS MAksimal database Access… Gimana cara memperiritnya…     Salam Hangat,.   faudzy