Reset Autonumber di Table MS Access

Lagi kutak kutik databaseku yang pakai MS. Access eh kepentok deh. Gara-gara lagi nyobain bikin form dengan table yang menggunakan autonumber Field. Well so far the form was running properly, cieeh….. hi hi pakai bahasa inggris ni ye….

Nah, akhirnya selesailah form yang aku buat, but…..setelah mo dijalanin nih..eh kok autonumbernya ga ilang historynya. Masih nerusin nomer yang sebelumnya. Mmmm recordnya udah di delete…tapi masih nerusin nomernya… mmm ???
I got to think..think..think….
Bingung yaa… 🙂 maksudnya. Aku sempet salah input, trus aku delete aja datanya langsung dari table gak lewat form. Sama aja sih sebenernya. Then, aku coba input lagi, aku lakuin prosesnya dari awal. Tapi ternyata autonumbernya nambah dari yang terakhir aku delete. Exp : last record itu nonya adalah 10, ternyata record yang ke-10 ini aku delete. Seharusnya aku mau autonumbernya tetap ke-10 setelah aku delete. Ternyata eh ternyata tidak seperti itu kawan, si Ms. Access tetap meneruskan perhitunganya, jadilah autonumber selanjutnya adalah 11. mm kok gitu…

Trus aku delete, dan aku ulangi lagi prosesnya, dan numbernya bukan 10 juga tapi malah jadi 12. whattttt…???? hhhh mmm ggrrrr ono opo iki…kutak kutik…cura cari…

Akhirnya menemukan pencerahan setelah aku ketemu mbah google, dan aku menemukan jawabannya di Microsoft support web. Finnaly. Nah karena itu aku mo sharing sama kalian semua. Yang mungkin kalo baca webnya dia yang pakai bhs. Inggris itu ribet. Nih..aku coba terjemahin dengan bahasaku yang insyaallah mudah dimengerti.

Mereset autonumber dari table tidak bisa dengan cara delete semua recordnya dari table. tapi kita harus melakukan beberapa langkah lain terlebih dahulu. Mmm rada ribet sih, but it works..

  1. Kita delete dulu semua record yang ga kepake dari table
  2. Kita masuk ke window Query (Klik query)
  3. Lalu kita buat new Query dengan design View
  4. Kita pilih table yang tadi terdapat field autonumber kita.
  5. Selanjutnya kita pilih semua fieldnya, mm maksudnya kita buat query yang isinya semua field di table itu.
  6. Setelah itu kita pilih make-table query pada menu query, tuliskan nama table yang baru kemudian klik OK
  7. Selanjutnya kita klik run pada query menu
  8. Kemudian akan muncul dialog box seperti ini : “You are about to append # row(s) into a new table“. Klik yes
  9. Setelah itu pada menu file kita pilih menu Close, ketika muncul dialog window lagi pilih no.
  10. Setelah itu Silahkan anda rename table yang pertama alias main table yang sebelumnya autonumbernya ga mau reset itu dengan nama yang lain. Nah terus baru deh kita rename lagi table yang baru dengan nama table yang lama.
  11. Done…

He he ribet ya caranya… mmm so, how to make it easier.
Begini ada cara yang lebih mudah mudah dah dah semudah-mudahnya 😀

  1. Hapus record yang gak diperlukan dari table yang ada autonumbernya itu loh…
  2. Rename table tersebut menjadi something yang kamu mau
  3. lalu copy table .
    Caranya : Select table yang akan dicopy lalu tekan “crtl + C” untuk copy selanjutnya “ctrl + V” untuk paste.

    Selanjutnya tuliskan nama table dengan nama table sebelum di rename, pada kolom “table name”, dan pilih untuk “paste option”-nya “Structure and Data”.

  4. Done

Silahkan cek..hasilnya sama kok, begitu dirunning, yupp autonumbernya akan langsung mengikuti no. terakhirnya 🙂

Sukses Ya…Selamat Mencoba

Insert data ke table yang berbeda dalam suatu Form di Ms. Access

Lagi iseng mau buat aplikasi kecil untuk menghitung stock kok malah stuck. Gara-gara ga bisa masukin data ke table lain yang ada di MS. Access dari suatu form. Oke sebelum kita bahas soal bagaimana saya bisa input data tersebut, saya mau overview dulu ya…alias cerit-cerita sedikit soal Form.

Mungkin buat Anda sudah ga asing lagi istilah form di Ms. Access, nah dan sudah tau juga umumnya form itu terkait dengan suatu table atau wuery tertentu pada Ms. Access, iya kan….iya lahh…..iya doong….

Nah kalau udh begitu trus ketika kita mau masukin data ke table lain…gmn dunks…ga bisa kalau langsung input aja. Nah…sekarang algoritmanya gimana..?? supaya data bisa masuk, kan pintunya musti dibuka dulu doong…setelah pintunya kebuka dicari tempatnya…ketemu tempatnya trus dimasukin datanya sesuai tempatnya. Oke..ngerti ga sampe sini 😀 insyaallah ya…

So…kita musti tau doong ya cara buka pintunya. Bagaimana caranya, jangan tanya pada rumput yang bergoyang ya…karena percuma dia cuma bisa goyang-goyang ga bisa memberi jawaban, mendingan baca lagi cerita selanjutnya.

Kita harus deklarasi beberapa variable untuk membuka table lain sbb :

Dim db As DAO.Database  ‘ variable untuk open database
Dim rs As DAO.Recordset  ‘ variable untuk recordsetnya

Setelah kita deklarasi variablenya, selanjutnya kita buka database nya dulu dg code sbb :

Set db = CurrentDb  ‘ membuka database yang sedang aktif
Set rs = db.OpenRecordset(“pengiriman”)  ‘ membuka table yang kita inginkan exp: pengiriman

Setelah itu baru kita add/tambah/insert data ke dalam table tsb dg code sbb :

rs.AddNew
rs!kode = Me.Cmbkd.Value
rs!tglKirim = Me.tgl_kirim
rs!lokasi = Me.cmbKRTC.Value
rs!jumlah = Me.siswa
rs.Update

Disini saya menggunakan beberapa text box dan combo box sebagai container datanya, untuk selanjutnya dimasukan kedalam table yang kita inginkan. Setelah kita insert jangan lupa tablenya ditutup lagi ya…biar tidak ada gangguan :D, code seperti ini.

Set rs = Nothing

Setelah itu di refresh formnya. Untuk refresh bisa gunakan code :

Me.Refresh

Done.

Gampang kan…dengan cara itu kita bisa buka table manapun yang ada didatabase kita dari form manapun yang kita inginkan sesuai kebutuhan sistem kita. Mudah-mudahan tulisan ini mudah dimengerti ya…jadi bisa berguna..amiin…amiin….