Re: [Programmer-VB] automatic ID

Wed, 31 Aug 2005 23:39:19 -0700

Kalau saya sendiri, justru pertanyaan dasar :

Untuk kepentingan apa mengurutkan No_ID lagi setiap ada penghapusan ? Mungkin ada solusi yang lebih elegan jika tahu kepentingannya, karena seperti yang disampaikan Jenar, akan membawa beban pada database.

Salam,


Vavai
Jenar Suseno wrote: 
Kl autonumber memang nomor itu menjadi ID dari record
jadi tidak akan ngurut lagi kl ada data yang dihapus.

Mungkin bisa ditambahkan field misal NoUrut, yang akan
membuat urutan dari 1 sampai sejumlah data bila ada
proses hapus dan insert.

Dan bisa dipastikan akan memakan waktu yang lama bila
datanya sudah ribuan bahkan ratusan ribu.
Tapi logikanya begini:
1. Bikin recordset dari semua data ( rs_data )
2. bikin looping
   rs_data.movefirs
   xid=rs_data!ID
   x=1
   Do
     ' disini ada instruksi update NoUrut dengan X
     ' update <tabelny> set NoUrut=" & x & " _
       where ID= " xid & "
     x=x+1
     rs_data.movenext
   Loop Until rs_data.EOF

Itu codingnya kl gak salah...
Mungkin bisa dipikirkan lagi cara yang termudah,
karena dengan cara ini akan banyak memakan waktu dan
memory..

Rgd,


--- [EMAIL PROTECTED] wrote:

  
Dear All..

Bagaimana supaya No_ID itu kalo dihapus akan berurut
kembali...misal :

No ID           Nama            JK
1               A               L
2               B               L
3               C               P
4               D               L

Kalo saya ingin hapus No ID 2 maka otomatis No ID 3
akan menjadi 2 , 4 
jadi 3 dst....
Saya coba di Type data autonumber juga tidak bisa
...kalo pake coding 
gimana caranya ?


Haris



Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]


YAHOO! GROUPS LINKS



Kirim email ke