kalau "'" sbg pengapit untuk field yg bersifat karakter/string
ubah :
='" & Me![Project_Number] & "'"
menjadi
=" & Me![Project_Number]
'==== maaf , saya jarang menjawab dimilis ini karena sedang belajar C# . karena mungkin suatu saat akan muncul C# script untuk office versi Web.
--- In belajar-access@yahoogroups.com, "hstod" <hstudio7@...> wrote:
>
> Ok.. bang aksan.. , untuk yg recordset nya masih error
> di : rs.findfirst "[Project_Number] ='" & Me![Project_Number] & "'"
>
> jadi sy pakai yg sql nya.
>
> tks
>
>
> --- In belajar-access@yahoogroups.com, Aksan Kurdin <aksan.kurdin@> wrote:
> >
> > lebih ringkas dengan perintah sql:
> >
> > dim sql as string
> > sql = "update table2 "
> > sql = sql & "set id = " & me!text0 & ", nama='" & me!text1 & "',
> > alamat='" & me!text2 & "', kelas='" & me!text3 & "' "
> > sql = sql & "where project_number=" & me!project_number
> >
> > currentdb.execute sql
> >
> > jika dengan recordset operation:
> > Set db = CurrentDb
> > Set rs = db.OpenRecordset("table2")
> > rs.findfirst "[Project_Number] ='" & Me![Project_Number] & "'"
> > if not rs.nomatch then
> > rs.edit
> > rs("id") = Me![text0]
> > rs("nama") = Me![text1]
> > rs("alamat") = Me![text2]
> > rs("kelas") = Me![text3]
> >
> > rs.Update
> > end if
> >
> > rs.Close
> > set rs = nothing
> > set db=nothing
> >
> >
> > aksan kurdin
> >
> >
> > On 11/2/2011 7:26 AM, hstod wrote:
> > >
> > > gimana cara edit data pada tabel2 dengan code :
> > >
> > > Set db = CurrentDb
> > > Set rs = db.OpenRecordset("table2")
> > > rs.edit
> > > rs("id") = Me![text0]
> > > rs("nama") = Me![text1]
> > > rs("alamat") = Me![text2]
> > > rs("kelas") = Me![text3]
> > >
> > > rs.Update
> > > rs.Close
> > >
> > > -edit data berdasarkan file yang di munculkan via combobox table2 tsb.
> > > -edit di atas hanya bisa akurat jika hanya 1 record saja, tapi kalau
> > > lebih jadi ter edit semuanya
> > >
> > > SrchCrit = "[Project_Number] ='" & Me![Project_Number] & "'"
> > > rs.FindFirst SrchCrit
> > >
> > > sy coba tambahan kode ini tapi error.., atau kalau cara lain untuk
> > > update ke tabel dari form?
> > >
> > > tks
> > >
> > >
> >
>
No comments:
Post a Comment