makasih pak, saya emang agak anti pake resume next untuk error
traping (jadi ngga keliatan kalo error hehehehe), ato emang
maksudnya kaya gini :
on error goto errSave
with Conn
.begintrans
.execute str_insert
.committrans
end with
on error goto 0
if apakahada("tblMasterBarang", "KodeBarang", txtkodebarang.text)
=false then conn.rollbacktrans
exit sub
errSave :
ato saya salah maksud pak ?
thx
--- In [email protected], DAS mania <[EMAIL PROTECTED]>
wrote:
>
> Pertama-tama coba liat ada syntax :
>
> On Error Resume Next
>
> atau tidak. Kalau ada hilangkan kebiasaan jelek itu, kalau gak
ada tambah cek data setelah commit trans.
>
> Saran : Kalau bisa biasakan saat ngesave pake struktur sbb :
>
> On Error goto errSave
> .....
> begintrans
>
> committrans
>
> on error goto 0
> [cek data apa benar-2 sudah masuk di sini]
> .....
>
> exit sub
> errSave :
> .....
> rollbacktrans
>
> Aku gak tau brontox menginfeksi apa saja, lebih baik tanya ke
tech support antivirus aja.
>
> bart2000e <[EMAIL PROTECTED]> wrote: Saya sedang mengembangkan
program Inventory, karena lalu lintas
> datanya baru ribuan dan setelah 4 bulan ukuran Access cuman 4,5
MB-an,
> clientnya ada 6 komputer, selama 4 bulan ngga ada masalah yang
> berarti, cuman di salah satu client yang bisa akses internet
kemarin
> kena virus brontox, setelah itu ada hal yang aneh buat saya :
waktu
> ada execute query simpan, di program dikatakan udah bisa simpan
cuman
> ngga bisa masuk ke backend nya.... ada yang pernah ngalami ngga
ya ?
> saya untuk simpan dan hapus selalu pake model execute di object
> koneksinya :
> -----------------------------------------------------------------
---------------------------------------------------
> With Conn
> .BeginTrans
> .Execute str_insert
> .CommitTrans
> End With
> MsgBox "Transaksi berhasil disimpan"
> -----------------------------------------------------------------
---------------------------------------------------
> dan anehnya lagi kadang2 juga bisa tapi sering ngga bisa nya,
saya
> ngga abis pikirnya itu karena si msgbox nya itu udah keluar
beritahu
> kalo udah berhasil simpan, tapi begitu di cek lagi transaksi yang
> disimpan itu ngga masuk ke backend nya.....
> kira kira kenapa ya ?
>
> thx
> edi susanto
>
>
>
>
>
> Untuk berhenti berlangganan kirim email kosong ke : indoprog-
[EMAIL PROTECTED]
>
> Ikuti juga forum diskusi VB.net dengan
> mengirim email kosong ke [EMAIL PROTECTED]
>
>
>
>
> SPONSORED LINKS
> Computer
internet security Computer
internet business Computer
internet
access
Computer internet privacy
securities Computer
internet
help
>
> ---------------------------------
> YAHOO! GROUPS LINKS
>
>
> Visit your group "indoprog-vb" on the web.
>
> To unsubscribe from this group, send an email to:
> [EMAIL PROTECTED]
>
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of
Service.
>
>
> ---------------------------------
>
>
>
>
>
>
> ---------------------------------
> Yahoo! Autos. Looking for a sweet ride? Get pricing, reviews, &
more on new and used cars.
>
> [Non-text portions of this message have been removed]
>
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Ikuti juga forum diskusi VB.net dengan
mengirim email kosong ke [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
