itu hanya malash di sini: For i = 1 To detil_item.Rows - 2 i itukan baris, artinya yg diupdate hanya baris 1 sampai (jumlah baris - 2) (menurut kode kamu) yang perlu kamu perhatikan adalah apakah benar yg diupdate itu jumlah barisnya? atau tidak, atau konsep kamu tentang baris itu tidak sama dengan menurut program jumlahnya.
pada MSFlexGrid, dan datagrid lainnya, baris dan kolom selalu dimulai dari angka 0, dan biasanya baris 0 adalah untuk judul bukan? jika data kamu ada 10 baris (jumlah item barang) dan jumlah tersebut sama dengan jumlah baris di MSFlexGrid maka kodenya cukup kamu buat seperti : For i = 1 To detil_item.Rows tetapi, jika didalam MSFlexGrid ada jumlah sum untuk total harga barang, lihat dulu jumlah sumnya, klu hanya satu baris berarti jumlah kesuluruhan baris di MSFlexGrid adalah 11, untuk mengupdate datanya pake ini: For i = 1 To detil_item.Rows - 1 begitu seterusnya, jadi klu menurut kode kamu For i = 1 To detil_item.Rows - 2, ya jika tidak ada jumlah sum, sedangkan datanya ada 10 baris, sudah pasti yg diupdate hanya 8 item, 2 item lagi tidak diupdate. Jadi ini bukan masalah jaringan, cuman kekurang pahaman kodenya saja. Semoga membantu: =(oVo)= ==================== BaceInside Publisher Copyright @2007 Not for reproduced, republished. Thank You ==================== ----- Original Message ---- From: yudhamanik ycid <[EMAIL PROTECTED]> To: [email protected] Sent: Friday, July 13, 2007 4:32:29 AM Subject: [Programmer-VB] tulung.... mas & mbak... saya buat program kasir running di jaringan. kenapa ya! ada saja item barang yang tidak terupdate. mslnya ada 10 item di detil hanya 2 yg tidak terupdate. (gak tententu..) jd yang dua itu tidak mengupdate (mengurangi) data stock barang. saya pake MSFlexGrid sbg detilnya. trus pas waktu menyimpan saya buat script sederhana : For i = 1 To detil_item.Rows - 2 v_kode = Trim(detil_item. TextMatrix( i, 1)) v_qty = Trim(detil_item. TextMatrix( i, 3)) v_HARGA = Trim(detil_item. TextMatrix( i, 4)) db.Execute "UPDATE master SET STOCK=STOCK- " & CInt(v_qty) & " where kode= '" & v_kode & "'", , adCmdText next Apakah ini masalah jaringan ? Mohon bagi trik nya.. yg sudah pengalaman ! saya pake MYSQL sgb databasenya. trims. ____________________________________________________________________________________ Looking for earth-friendly autos? Browse Top Cars by "Green Rating" at Yahoo! Autos' Green Center. http://autos.yahoo.com/green_center/
