MS ACCESS MAILING LIST: [belajar-access] Re: texbox sbg tempat entry data pada beberapa field yg berlainan tabel

Buat Pak Hariyanto, Bpk MBA dan Bpk Kuncara Arief terimakasih atas bantuannya... Manthab dah.. akhirnya berhasil jg...
sekali lg terimakasih.. terimakasih..

--- In belajar-access@yahoogroups.com, "Kuncara Arief" <kuncara.arief@...> wrote:
>
> Coba bantu ya Saudara Momont
>
>
>
> Pada tombol "Simpan" pada event On Click ketikan perintah sbb :
>
>
>
> docmd.SetWarnings False
>
> docmd.RunSQL "Insert Into tabelA(Fieldsatu) Values(" & Input.text & " )"
>
> docmd.RunSQL "Insert Into tabelB(Fieldsatu) Values(" & Input.text & " )"
>
> docmd.SetWarnings True
>
>
>
> `Catatan
>
> Mudah2an membantu ya Saudara Momont
>
> Salam Hangat.. J
>
>
>
> From: belajar-access@yahoogroups.com [mailto:belajar-access@yahoogroups.com]
> On Behalf Of momont
> Sent: 19 Februari 2012 11:08
> To: belajar-access@yahoogroups.com
> Subject: [belajar-access] Re: texbox sbg tempat entry data pada beberapa
> field yg berlainan tabel
>
>
> sdh coba dijalankan tp masih ngambek gak mau tersimpan di tabel.
>
> Seandainya keadaan form saya ubah seperti ini bagaimana?
> Misal saya telah membuat form dng nama "Entry"
> dalam form tersebut ada 2 objek, masing2 adl :
> 1. Textbox (unbound) dgn nama "Input"
> 2. Tombol dng nama "Simpan"
>
> Yg saya tanyakan, Bagaimana caranya agar
> disaat saya mengisi textboxt"Input" dan kemudian klik tombol Simpan
> maka nilai yg saya isikan pada textbox "Input" tersebut
> akan tersimpan di 2 field yg berlainan tabel.
> misal nilai tersebut akan tersimpan di
> 1. "Fieldsatu" pada "tabelA" dan
> 2. "Fieldsatu" pada "tabelB".
>
> Mohon Pencerahannya, terimkasih sebelumnya.
>
> --- In belajar-access@yahoogroups.com
> <mailto:belajar-access%40yahoogroups.com> , hari yanto <har_i20002000@>
> wrote:
> >
> > Ada banyak metode untuk memasukkan data ke dalam tabel. Salah satunya
> menggunakan insert into. Ini contohnya:
> > Â
> > Dim db As Database
> > Dim i As Integer
> > Â Â Â If Text1 <> "" Then
> > Â Â Â Â Â Â Â Set db = CurrentDb
> > Â Â Â Â Â Â Â For i = 1 To 3
> > Â Â Â Â Â Â Â Â Â Â Â db.Execute "insert into tabel" & i _
> > Â Â Â Â Â Â Â Â Â Â Â & " (field" & i & ") values ('" & Text1 & "')"
> > Â Â Â Â Â Â Â Next i
> > Â Â Â Â Â Â Â db.Close
> > Â Â Â Â Â Â Â Set db = Nothing
> > Â Â Â End If
> > Â
> > Script diatas jalan untuk type data fieldnya adalah text. Bila type
> datanya number maka pada valuenya harus dihilangkan tanda ' (upperstrop).
> Sehingga berubah menjadi values (" & Text1 & ")"
> > Â
> > Semoga bisa membantu dan memberi semangat.
> > Â
> > Hariyanto (Surabaya)
> > http://110.139.57.19
> >
> >
> > Â
> > Â
> > --- On Sat, 14/1/12, Nurul Mukminin <cahoraman@> wrote:
> >
> >
> > From: Nurul Mukminin <cahoraman@>
> > Subject: [belajar-access] texbox sbg tempat entry data pada beberapa field
> yg berlainan tabel
> > To: "belajar-access@yahoogroups.com
> <mailto:belajar-access%40yahoogroups.com> " <belajar-access@yahoogroups.com
> <mailto:belajar-access%40yahoogroups.com> >
> > Date: Saturday, 14 January, 2012, 4:50 PM
> >
> >
> >
> > Â
> >
> >
> >
> >
> >
> >
> >
> >
> > Salam kenal bwt semua master2 access.
> >
> > karena baru memulai beljar acces jd masih bingung.
> > yg ingin saya tanyakan :
> > bagaimana cara menjadikan satu texbox sbg tempat entry data pada beberapa
> field yg berlainan tabel sekaligus.
> > misal:
> > - nama textbox adl "text1", dengan mengisi nilai pada "text1" lalu
> "simpan" maka nilai yg tlh kita masukkan ini akan menjadi data baru di
> "field1" pada "tabel1", "field2" pada "tabel2" dan "field3" pada "tabel3".
> > mohon solusinya. terimakasih.
> >
>