/* */

Monday, October 25, 2010

[belajar-access] Simpan data Lambat



Saya sedang mengaplikasikan Access untuk aplikasi penjualan, dengan Access 2003 dan Database SQL 2000 koneksi pakai ODBC. tapi baru baru ini untuk proses simpan sangat lama (sampai 10 detik).

Koding simpannya :
Function SimpanData()
        Dim db As Database
        Dim rst2 As Recordset
        Set db = CurrentDb
        Set rst2 = db.OpenRecordset("tbPenjualanFarmasiDetail")
        With rst2
       .AddNew
       ........
       ........
       .Update             ' Save changes.
       .Close
       '.Bookmark = rs.LastModified   ' Go to new record
    End With
End Function

Akhirnya saya coba pakai Append Query, dan dijalankan lewat
Docmd.openquery "Nama_AppendQuery"

ternyata sangat lancar, proses simpan kurang dari 1 detik.
Saat saya cek database record baru sampai 250.000an, yang jadi pertanyaan saya apakah memang penambahan data lewat append Query lebih cepat dibanding lewat yang pertama?
Mohon pengalaman dari rekan-rekan. Terima kasih.


__._,_.___


SPAM IS PROHIBITED



Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___

No comments:

Post a Comment