vb 6 DataReport

1-Add a field to your table (AutoNumber). It can be used as a primary key and each record will have a unique number.

Maybe these links will help:

http://support.microsoft.com/default.aspx?scid=kb;en-us;299645

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/oledb/htm/oledbpwk_filelist.asp
(Simpdata.tlb ..\Lib IOLEDBSimpleProvider type library)

It seems as if your first problem cannot be solved with an autonumeric field. I think you should try with a numeric field, giving it the previous record value + 1, and with a private sub in which it updates all the subsequent records when you delete one.
For example:
private sub UpdateRecords (byval dummynum as integer)
with RsTable
.movefirst
do until .IndexNum = dummynum
.movenext
loop
.delete
do until .eof=true
.edit
.indexnum=indexnum-1
.update
loop
end sub

I think it should work

Nice work of Ortegahey , but if your serial number assignement order happens to have an incident on your records (maybe you are replacing record) you just have to retrieve the deleted record number and assign it to a new record that replaces the old record otherwise copy and paste Ortegahey's work.

I would create an autonumber primary key field and a second field that you use for display purposes that would satisfy your "no gaps" requirement (apply the subroutine to this field). If the application becomes multi-user, this should result in much less (not "no") record contention. The fact that you're re-numbering a field in other records could be an issue if it's multi-user and someone else (or you) has another record open. "It all depends"

Install MDAC setup of proper version for ur second problem