coba pake ini mas :
dim con as new adodb.connection
...
.....
Private sub cmd_Simpan_Click()
for i= 1 to 1000
con .execute "Insert into nama_Tabel values('" & i & "')"
next i
end sub()
----- Original Message -----
From: "denkdeng" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Thursday, March 16, 2006 5:02 PM
Subject: [Programmer-VB] Update or Insert ke database secara
looping..Lambat??
> Hello vbers..
>
> Kenapa ya kalo aku update atau insert ke database semakin lama
> semakin lambat..
> misalkan codingnya seperti ini
>
> **** Start Here ******
>
> dim con as new adodb.connection
> dim as new adodb.recordset
> ...
> .....
>
> Private sub cmd_Simpan_Click()
>
> for i= 1 to 1000
> rs.open "Insert into nama_Tabel values('" & i & "')",con,1,3
> rs.close
> next
>
> end sub()
>
> ****** End ************
>
> ketika di eksekusi, proses insert/update-nya semakin lama semakin
> lambat. kenapa ya?...
> Kira-kira ada yang tahu nggak gimana caranya update atau insert
> dengan looping secara cepat..
>
> mohon pencerahannya dari teman2.. terimakasih
>
> regards
>
>
>
>
>
>
>
> Wahana Programmer Groups Links
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-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/
