Bapak,
Mungkin langkah2 ini bisa bapak lakukan untuk mengeceknya.
1. buat form kosong. Jadikan sql di bawah sebagai recordsource di form tsb.
Misalnya nama formnya adalah Form1, buat satu textbox namakan sbg Indent_No
SELECT
A.STORE_KODE,
A.NAMA_BARANG,
A.USE,
A.CL_STOCK,
B.INDENT_NO,
B.INDENT_DATE,
B.QTY,
B.AGENCY,
1, A.SATUAN,
B.TTL_DATE,
B.TTL_QTY,
B.TTL_PRICE,
C.NAMA
FROM TBARANG AS A,
TINDENT_STATUS AS B,
SUPPLIER AS C
WHERE A.STORE_KODE=B.STORE_KODE And
B.DELIVERY_STATUS='N' And
B.INDENT_NO=FORMS!TINDENT!INDENT_NO AND ---> ganti dgn
Forms!Form1!Indent_No
B.TTL_SUPPLIER=C.SUPPLIER_KODE;
Kalau error masih ada, berarti ada salah satu dari wherenya yang salah.
Silahkan periksa.
2. Jika no 1 tidak menimbulkan error, periksa apakah ada ListBox atau
ComboBox yang ada rowsource dengan subquery.
Mdh-mdhan bisa membantu.
Salam hangat dan jabat erat,
MBA
________________________________________
From: [email protected] [mailto:[email protected]]
On Behalf Of Maulana
Sent: Wednesday, 17 March, 2010 09:48
To: [email protected]
Subject: Re: [belajar-access] Run-Time error
Dear MBA
maksudnya sprti ini y mas MBA
recordsource form ini untuk membuat order pesanan Mas...
SELECT A.STORE_KODE, A.NAMA_BARANG, A.USE, A.CL_STOCK, B.INDENT_NO,
B.INDENT_DATE, B.QTY, B.AGENCY, 1, A.SATUAN, B.TTL_DATE, B.TTL_QTY,
B.TTL_PRICE, C.NAMA
FROM TBARANG AS A, TINDENT_STATUS AS B, SUPPLIER AS C
WHERE A.STORE_KODE=B.STORE_KODE And B.DELIVERY_STATUS='N' And
B.INDENT_NO=FORMS!TINDENT!INDENT_NO AND B.TTL_SUPPLIER=C.SUPPLIER_KODE;
