Sdh saya coba bang Aksan tambahan :
debug.print sSQL
Msgbox spSQL
Dan hasilnya ketika qty bernilai pecahan misal 0,3 maka coding seolah-olah :
INSERT INTO tbBarangMasuk (Kode_barang,nama_barang,qty,harga) VALUES ('0001','Obat A',0,3,2000)
Terlihat seolah-olah ada 5 parameter masukan.
Saya coba setting regionalnya dirubah untuk tanda decimal (.) dan ribuan (,) berhasil. Tapi terbentur lagi saat qty bernilai ribuan akan mengalami hal yang sama.
Oh iya saya jg sudah coba model:
With rs
.addnew
!kode_barang=me.kode_barang
!nama_barang=me.nama_barang
!qty=me.qty
!harga=me.harga
.update
.end with
Bisa tapi harus meng-coding semua yg ada form entri,updatenya dan sepertinya tidak bisa cocok untuk function bersama serta prosesnya insertnya agak lama juga.
Masih menunggu masukan dari rekan-rekan milist yang lain mungkin punya pengalaman yg lain.
saya sudah ga pake sql server express di laptop. mau nginstal agak malas lagi :)
kita review kode saja:
Function Tambah()
On Error GoTo errH
������ Dim sSQL As String
������ 'Untuk nilai qty dan harga tidak diapit petik tunggal
������ 'Jika pake koding ini error message 1
������ 'sSQL = "INSERT INTO tbBarangMasuk (kode_barang,nama_barang,qty,harga) VALUES ('" & kode_barang & "','" & nama_barang & "'," & qty & "," & harga & ")"
������
������ 'Untuk nilai qty dan harga diapit petik tunggal
������ 'Jika pakai koding ini error message 2
������ sSQL = "INSERT INTO tbBarangMasuk (kode_barang,nama_barang,qty,harga) VALUES ('" & kode_barang & "','" & nama_barang & "','" & qty & "','" & harga & "')"
debug.print sSQL
msgbox sSQL
������ cn1.Execute sSQL
Exit Function
errH:
MsgBox Err.Number & " " & Err.Description
End Function
tambahkan kode debug.print untuk menampilkan isi sSQL di immediate window.
ini berkaitan dengan error :
bandingkan antara isi insert dan values nya, jumlahnya sama ngga ?
yang kedua pastikan type quantity dan harga adalah numerik.
kalau sudah numerik, jangan diinsert text. hilangkan quotes (') untuk harga dan quantity
ini berkaitan dengan error salah type:
aksan kurdin
On 9/25/2013 5:55 PM, Tri Widodo wrote:
��Haha... Kena demam Vikinisasi jg bang Aksan.
Ini saya kirimkan sampel aplikasinya. Untuk sementara�� sekarang jadinya ada 2 koneksi ado untuk review data dan insert data non numeric, sedangkan untuk data yg numeric pake odbc yg passtrough.On Sep 25, 2013 1:30 PM, <aksan.kurdin@gmail.com> wrote:
��tipe data ?
jika masih integer / long integer, maka data pecahan tidak bisa masuk.
sql syntak ?
form data entry ?
please deskripsi apa yang menjadi labil data entrinya di perjelas, agar tidak menimbulkan kontrofersi solusi,��
:)
aksan kurdin��
---In belajar-access@yahoogroups.com, <belajar-access@yahoogroups.com> wrote:
Saya membuat aplikasi access dengan db mssql dengan koneksi odbc.
Untuk meningkatkan performa saya mengganti koneksinya dengan adodb.�� Masalah timbul saat aplikasi digunakan untuk entri data quantity yg nilainya tidak bulat (pecahan). Mohon bantuan rekan2 pemecahannya.
| Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (5) |
Tidak ada komentar:
Posting Komentar