Pak Indra,

Kasus ini adalah tentang tipe data (seperti kasus Pak Heru beberapa waktu
lalu).
Pada baris VBA berikut ini :
db.Execute "INSERT INTO tbl_sample(st, nam, ket) " & _
"VALUES(" & rsXL.Fields("st").Value & "," & rsXL.Fields("nam").Value & ","
& "'" & rsXL.Fields("ket").Value & "'" & ");"

bagian rsXL.Fields("nam").Value bertipe text jadi butuh didahului dan
diakhiri dengan petik satu (')
seperti bagian rsXL.Fields("ket").Value yang berbunyi  & "'" &
rsXL.Fields("ket").Value & "'"

Wassalam,
Kid.


2012/12/22 Indra Psr <indra....@gmail.com>

> **
>
>
> Dear,
>
> Saya ada liat-liat email terdahulu, eh nemu juga data spt terlampir..
> Menurut saya ini bagus untuk buat2 inputan data gitu ke access,,
> Tp setelah saya korek2 VBA yg ada,, akhirnya sharian penuh mencoba
> untuk nambahin data inputan jadi spt di access terlampir,,, gak
> berhasil bingung juga ama VBA yg udah di buat master.. hehehe..
> (piss.. maklum masih awam VBA)
> Gimana ya biar bisa masukin data yg ada di excel ke access spt file
> terlampir?
>
> Terimakasih..
>
> Indra
>
>

Kirim email ke