Malam ini saya coba buat trik sederhana untuk menginputkan data dari microsoft Excel ke database acces. Walaupun sederhana trik ini cukup berguna untuk load data yang tak terlalu besar karena apabila data yang diload terlalu besar maka program akan mengalami not responding, karena setiap program yang dibuat dari delphi hanya menjalankan 1 thread saja untuk mengatasi masalah ini biasanya menggunakan multi thread. Tetapi disini saya tidak akan membahas bagaimana pembuatan thread.
Dalam program nanti akan menggunakan modul ComObj untuk pemanggilan microsoft excel. Oke... Langsung saja untuk prakteknya.
Pertama siapkan data di microsoft excel, Syarat yang harus dipenuhi adalah kolom pada Excel harus sama pada table yang akan dinputkan dari excel nanti.
Misalkan saya membuat database test dengan table didalamnya table barang lihat gambar dibawah.
untuk field Id Berikan type autoIncrement, karena nanti akan otomatis mengisi secara urut.
Untuk di file excel saya contohkan seperti pada gambar dibawah.
