Kod:
Dim rs as new adodb.recorset
Rs.open "tabloadi", currentproject.connection,adopenkeyset,adlockoptimistic
Rs.addnew
Rs!tabloalanadi=me.metinkutusuadi
Rs!tabloalanadi=me.metinkutusuadi
Rs.update
Rs.close: set rs=nothing
Dim rs as new adodb.recorset
Rs.open "tabloadi", currentproject.connection,adopenkeyset,adlockoptimistic
Rs.addnew
Rs!tabloalanadi=me.metinkutusuadi
Rs!tabloalanadi=me.metinkutusuadi
Rs.update
Rs.close: set rs=nothing
Alıntı:...Ürün adı Ürüncıkış tablosuna gelmiyor,...
Me.urunadı = DLookup("URUNAD", "tbl_URUNLER", "[URUNID]=" & Me.urunıd)
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Me.urunadı = DLookup("URUNAD", "tbl_URUNLER", "[URUNID]=" & Me.urunıd)
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70