Share this topic on FacebookShare this topic on MySpaceShare this topic on Del.icio.usShare this topic on DiggShare this topic on StumbleUponShare this topic on TwitterShare this topic on GoogleShare this topic on Yahoo

Author Topic: mohon pencerahannya..  (Read 243 times)

0 Members and 1 Guest are viewing this topic.

Offline d1t4

  • Newbie
  • *
  • Thank You
  • -Given: 5
  • -Receive: 1
  • Posts: 42
mohon pencerahannya..
« on: March 09, 2010, 10:05:28 AM »
Salam untuk kawan2 semua,

saya mau sedikit bertanya. mengenai Mysql.   :icon_study:

saya mempunyai satu form yang pada saat melakukan penyimpanan, data yang ingin disimpan tidak tersimpan ke dalam Mysqlnya..
saya sudah mengecek koneksi ke mysqlnya, baik di dalam procedure "init" maupun di tombol simpannya..

berikut kode yang ada pada tombol simpan :

** Verifikasi Koneksi Mysql **
msql="set autocommit=0;"
IF sqlexec(thisform.koneksi, msql)<= 0
   =MESSAGEBOX("Gagal", 0+16,"Pesan")
   RETURN
ENDIF


** Penyimpanan Data **
IF thisform.baru && = .f.
   msql="INSERT INTO barang1(nama,satuan,type,limit) values ("+;
   "'"+thisform.combo1.Value + "', "+;
   "'"+thisform.teXT3.Value + "', "+;
   "'"+thisform.teXT4.Value + "', "+;
   "'"+TRANSFORM(thisform.teXT8.Value, "99999999,999")+"')"
ENDIF


pada saat tombol simpan di klik, tidak ada reaksi apa2 dan data tidak tersimpan. saya jadi tambah bingung..   :icon_pale:

mohon koreksi dan pencerahannya ya..   :sad5:
Terima Kasih..  :icon_salut:
Learn By Doing..

Offline a17dh4

  • Senior Member
  • *
  • Thank You
  • -Given: 2
  • -Receive: 8
  • Posts: 434
  • Keep Trying, trying and trying....
Re: mohon pencerahannya..
« Reply #1 on: March 09, 2010, 10:17:57 AM »
coba di debug, mungkin thisform.baru = .F.
dan yg lebih penting, mana sqlexec untuk nyimpan ke sqlnya, kok gk ada..?
-=>> Go FoxPro <<=-

Offline d1t4

  • Newbie
  • *
  • Thank You
  • -Given: 5
  • -Receive: 1
  • Posts: 42
Re: mohon pencerahannya..
« Reply #2 on: March 09, 2010, 03:20:18 PM »
kode penyimpananny sudah saya ubah, menjadi seperti ini..

km_kodebaru=ALLTRIM(THISFORM.txtkode.VALUE)
km_namabaru=ALLTRIM(THISFORM.combo1.VALUE)
km_type=ALLTRIM(THISFORM.txttype.VALUE)
km_satuan=ALLTRIM(thisform.txtsatuan.Value)
km_limit=VAL(thisform.text1.Value)

SQLEXEC(SQLSTRINGCONNECT(string_koneksi),"INSERT INTO barang(kode,nama,tipe,satuan,limit1) VALUES(?km_kodebaru,?km_namabaru,?km_type,?km_satuan,?km_limit)")


reaksiny masih sama, :@: kira2 salahny dimana lagi ya?..   :icon_pale:

mohon koreksi dan pencerahannya ya..   :sad5:
Terima Kasih..  :icon_salut:
Learn By Doing..

Online foxy

  • Fox-id M.V.P
  • Hero Member
  • *
  • Thank You
  • -Given: 11
  • -Receive: 37
  • Posts: 1278
    • Foxy Land
Re: mohon pencerahannya..
« Reply #3 on: March 09, 2010, 03:55:02 PM »
reaksi sama, maksudnya tidak ada reaksi sama sekali kan? Saya rasa ada error di query Anda. Coba ambil error sqlexec dengan perintah sbb;

if SQLEXEC(SQLSTRINGCONNECT(string_koneksi),"INSERT INTO barang(kode,nama,tipe,satuan,limit1) VALUES(?km_kodebaru,?km_namabaru,?km_type,?km_satuan,?km_limit)") > 0

else
   aerror(laErr)
   messagebox(laErr(2), 64, "Insertion Gagal")
  set step on
endif

Kalau sudah muncul error message, coba evaluasi nilai variable. Kalau saya tebak sih ada data type yang mismatch.

regards,
foxy
Some new posts...

This post is provided as is. Feel free to use all the codes and information, however understand that I don't have any obligations to fix any bug(s) or follow up this subject.

Offline d1t4

  • Newbie
  • *
  • Thank You
  • -Given: 5
  • -Receive: 1
  • Posts: 42
Re: mohon pencerahannya..
« Reply #4 on: March 09, 2010, 04:20:36 PM »
@ a17dh4  dan Foxy...

makasih buaanyaakkk yaa..
udah bisa,  :happy4:

God Bless yOu aLL   :thumbsup:
Learn By Doing..

Offline ari_chandra

  • Junior Member
  • *
  • Thank You
  • -Given: 20
  • -Receive: 0
  • Posts: 220
    • www.ariechandra.blogspot.com
Re: mohon pencerahannya..
« Reply #5 on: March 10, 2010, 07:16:23 PM »
@ d1t4
lalu ada salah dimananya  ??? ??? ???

Offline d1t4

  • Newbie
  • *
  • Thank You
  • -Given: 5
  • -Receive: 1
  • Posts: 42
Re: mohon pencerahannya..
« Reply #6 on: March 11, 2010, 09:38:31 AM »
@ ari_chandra

awaLny itu kesalahan ada di koneksi ke Mysqlnya dan...
satu yg PuuaLing pentingg. kurangnya keteLitian  :toothy4:
Learn By Doing..