Dear Pakar

saya dah coba cara tersebut seperti ini
Private Sub Command19_Click()
Forms!UPDATE_BARANG.allowedit = False
DoCmd.OpenForm "UPDATE_BARANG"
Forms!UPDATE_BARANg!Store_Kode = Store_Kode
Forms!UPDATE_BARANg!Command34.SetFocus
End Sub

tetapi timbul error seperti ini
run-time error "2450"
....

trims atas pencerahannya

Kirim email ke