wah.. maaf nih sudah merepotkan... gan jkssbma! tks atas bantuannya. btw mohon di jelaskan secara bahasa ku :
1.rs.FindFirst "[id_reservasi]= " & Me![CBSearch]
2. rs.FindFirst "[customer_name]= '" & Me![CBSearch] & "'"
selama ini hanya copast tanpa bisa memahami..
tks
--- In belajar-access@yahoogroups.com, "jkssbma" <jkssbma@...> wrote:
>
>
> silakan download [Pencarian Combo 32921.rar] di
> [Files] [jkssbma] [cobasolusi] [combobox]
>
>
> catatan menu [Files] ada di menu sisi kiri situs ini
>
> saya jadi mulai kirim ke folder [jkssbma] lagi nih , padahal saya harap
> yg nanya bisa mengetik sendiri solusi yg diberikan..... [I-)]
>
>
>
> --- In belajar-access@yahoogroups.com, "hstod" <hstudio7@> wrote:
> >
> > klo gini kan cuman rubah id_reservasi nya kan mas jkssbma. sebelumnya
> sdh sy coba dan tetap tidak bisa. bisa tolong di buatkan langsung kah di
> file nya biar kinclong sy mempastenya :)
> >
> > tks
> >
> > --- In belajar-access@yahoogroups.com, "jkssbma" jkssbma@ wrote:
> > >
> > >
> > > Event :
> > >
> > > Private Sub CBSearch_AfterUpdate()
> > > Dim rs As Object
> > > Set rs = Me.Recordset.Clone
> > > rs.FindFirst "[id_reservasi]= " & Me![CBSearch]
> > > If Not rs.EOF Then Me.Bookmark = rs.Bookmark
> > > End Sub
> > >
> > > query [QReservasi ]:
> > > SELECT T_resHeader.id_reservasi, T_resHeader.Tgl_Input,
> > > T_resHeader.Customer_Name, T_resHeader.Reservasi_Book,
> > > T_resHeader.Receptionist, T_resDetails.Rooms,
> T_resDetails.Extra_Bed,
> > > T_resHeader.Cek_In
> > > FROM T_resHeader INNER JOIN T_resDetails ON T_resHeader.id_reservasi
> =
> > > T_resDetails.id_reservasi;
> > >
> > > Property untuk CBSearch :
> > >
> > > [row source] :
> > >
> > > SELECT Qreservasi.id_reservasi, Qreservasi.Customer_Name,
> > > Qreservasi.Reservasi_Book, Qreservasi.Receptionist FROM Qreservasi;
> > >
> > > [column count] : 4
> > >
> > > [column widths] : 0";1.1806";2.1417";1.4091"
> > >
> > > [list width] : 5
> > >
> > > [width] : 4
> > >
> > >
> > >
> > > '==========
> > >
> > > --- In belajar-access@yahoogroups.com, Hstudio Tmk <hstudio7@>
> wrote:
> > > >
> > > > Opps file nya ketinggalan..
> > > > tks
> > > >
> > > >
> > > >
> > > > ________________________________
> > > > From: jkssbma jkssbma@
> > > > To: belajar-access@yahoogroups.com
> > > > Sent: Friday, October 21, 2011 6:59 PM
> > > > Subject: [belajar-access] Re: Unique Combo box field
> > > >
> > > > Data yang dicari harus memiliki korelasi dgn data yg ada pada
> > > combobox. Jadi yg mau diambil/dicari gabungan data field nama dan
> > > tgl.input ?
> > > > beberapa pertanyaan yg perlu dipertimbangkan :
> > > > 1. data Combobox diambil dari tabel/query apa ?
> > > > 2. Data yg ingin di cari memiliki field2 apa saja yg mungkin
> terkait
> > > dgn tabel/query sumber bagi combobox ?
> > > >
> > > > Kalau tak mau pusing silakan file mdb/acdb disertakan pada
> attachment
> > > email yg anda kirim ke belajar-access@yahoogroups.com
> > > >
> > > >
> > > > --- In belajar-access@yahoogroups.com, "hstod" hstudio7@ wrote:
> > > > >
> > > > > query :
> > > > >
> > > > > nama-------- tgl.input ----- chek.in
> > > > >
> > > > > master------12/10/11--------13/10/11
> > > > > mister------16/10/11--------18/10/11
> > > > > master------18/10/11--------19/10/11
> > > > >
> > > > > search : by combobox di form dengan code :
> > > > > Dim rs As Object
> > > > > Set rs = Me.Recordset.Clone
> > > > > rs.FindFirst "[nama] = '" & Me![CBSearch] & "'"
> > > > > If Not rs.EOF Then Me.Bookmark = rs.Bookmark
> > > > >
> > > > > untuk nama yang beda record bisa di tampilkan dengan benar,
> namun
> > > jika nama sama maka record tidak akurat (mengikuti yg paling pertama
> di
> > > input).
> > > > >
> > > > > saya coba dengan mengambil dari data id autonumber namun tidak
> bisa.
> > > gmn cara nya untuk bisa menampilkan data di form walau nama sama?
> tapi
> > > untuk tgl input dan lainnya tetap beda! (jadi record di form tetap
> > > akurat berdasarkan tgl input)
> > > > >
> > > > > tks
> > > > >
> > > >
> > > >
> > > >
> > > >
> > > > ------------------------------------
> > > >
> > > > SPAM IS PROHIBITEDYahoo! Groups Links
> > > >
> > > >
> > > >
> > > > http://docs.yahoo.com/info/terms/
> > > >
> > >
> >
>
Tidak ada komentar:
Posting Komentar