SQL = "UPDATE *Tindent_status* SET DELIVERY_STATUS='Y' WHERE
INDENT_NO='" & Forms!TRECEIPT!INDENT_NO & "' AND STORE_KODE='" &
Forms!TRECEIPT!Store_Kode & "'"
'DoCmd.RunSQL SQL
debug.print SQL ' hasil SQL ini coba jalankan langsung dari query editor
SQL = "UPDATE *TPURCHASE_ORDER* SET DELIVERY_STATUS='Y' WHERE
INDENT_NO='" & Forms!TRECEIPT!INDENT_NO & "' AND STORE_KODE='" &
Forms!TRECEIPT!Store_Kode & "'"
'DoCmd.RunSQL SQL
debug.print SQL ' hasil SQL ini coba jalankan langsung dari query editor
Coba perhatikan, apakah parameter yang terisi sudah benar ? Bisakah di
jalankan manual dari query editor ?
Query Access tidak case sensitive.
aksan kurdin
On 2/17/2010 3:13 PM, Maulana wrote:
Dear All Milis
apa ada pengaruhnya jika prosedure vba untuk sql update khusus hal
penamaan tabel dalam hal prosesnya update tabel tersebut,di tabel
tersebut tidak terupdate pada kenyataannya, mohon pencerahannya
trims
berikut potongan vba nya saya sertakan
SQL = "UPDATE *Tindent_status* SET DELIVERY_STATUS='Y' WHERE
INDENT_NO='" & Forms!TRECEIPT!INDENT_NO & "' AND STORE_KODE='" &
Forms!TRECEIPT!Store_Kode & "'"
DoCmd.RunSQL SQL
SQL = "UPDATE *TPURCHASE_ORDER* SET DELIVERY_STATUS='Y' WHERE
INDENT_NO='" & Forms!TRECEIPT!INDENT_NO & "' AND STORE_KODE='" &
Forms!TRECEIPT!Store_Kode & "'"
DoCmd.RunSQL SQL
