Kalau gitu jangan pakai cara link subform tadi.
Pada event after update combo0, masukkan code berikut:
Private Sub Combo0_AfterUpdate()
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO T_Transaksi (Nk) VALUES ('" &
Me.Combo0.Column(1) & "')"
DoCmd.SetWarnings True
Me.[T_Transaksi subform].Requery
End Sub
Haer
2009/2/18 Dri Access <[email protected]>
> Terima kasih Bang Haer,
>
>
>
> Ada pertanyaan lanjutan:
>
>
>
> 1. Bagaimana membuat setiap saya pilih data di combo0, maka data tersebut
> bertambah ke sub form tergantung banyak kita memilih data di combo0.
>
> 2. Bagaimana membuat data yang muncul di Sub form tadi (misalkan ada 5
> data) kemudian secara otomatis tersimpan di tabel T_Transaksi.
>
> 3. Bagaimana membuat ketika membuka form transaksi (pertama kali) setelah
> ditutup sebelumnya, sub formnya kembali tidak ada data/kosong (add mode)
> hingga muncul kembali ketika memilih data dari combo0, seperti No.1.
>
>
>
> Mohon maaf apabila terlalu banyak pertanyaannya.
>
> Atas bantuannya diucapkan terima kasih.
>
>
>
> Andri Kusmana
>
>
> ------------------------------
> *Dari:* Haer Talib <[email protected]>
> *Kepada:* [email protected]
> *Terkirim:* Rabu, 18 Februari, 2009 16:39:47
> *Topik:* Re: [belajar-access] Trs: Buat Copy otomatis pada Form
>
> Coba property:
> Link Child Fields isi: NK
> Link Master Fields isi: Combo0
>
> Tapi update di sub form baru akan benar2 dilakukan jika anda memasukkan
> data yang lain selain kunci link tadi.
>
> Haer
>
>
> 2009/2/17 Dri Access <dri.acc...@yahoo. co.id <[email protected]>>
>
>>
>> Dear All Access Mania,
>>
>> Saya ingin buat suatu form transaksi seperti yang saya lampirkan, seperti
>> berikut ini:
>>
>> Ketika pada "Combo box Nama" dipilih suatu text, misalkan "FDW". maka akan
>> muncul / bertambah secara otomatis text "FDW" (copy otomatis) tersebut pada
>> field NPK di T_Transaksi sub form.
>>
>> Bagaimana source code untuk melakukan hal tersebut?
>>
>> Terima kasih atas bantuannya,
>>
>> Andri K
>>
>>
>>
>> ------------------------------
>> Berselancar lebih cepat dan lebih cerdas dengan Firefox
>> 3<http://sg.rd.yahoo.com/id/search/firefox/mail/signature/*http://downloads.yahoo.com/id/firefox/>
>> !
>>
>> ------------------------------
>> Yahoo! Toolbar kini dilengkapi Anti-Virus dan Anti-Adware gratis. Download
>> Yahoo! Toolbar sekarang .
>> <http://sg.rd.yahoo.com/id/search/toolbar/mail/signature/*http://id.toolbar.yahoo.com/>
>>
>>
>
>
> --
> [Haer Talib]
> MVP Office Access
> Meet me at www.RumahAccess. com <http://www.rumahaccess.com/>
>
> =>
>
>
> ------------------------------
> Warnai pesan status dengan Emoticon.
> Sekarang bisa dengan Yahoo! Messenger baru.
> <http://sg.rd.yahoo.com/id/messenger/maxwell/*http://id.messenger.yahoo.com/>
>
>
>
--
[Haer Talib]
MVP Office Access
Meet me at www.RumahAccess.com
=>
