数据库自动编号ID复位问题!

Question

在数据库中设置了一个字段名为ID,数据类型为自动编号.当我清除完所有数据时,为什么再写入库数据时,数据编号不从1开始呢!而从原来的编号开始呢?有谁碰到过这个问题,谁能给我解答吗?

Answer 1

因为access的删除实际上没有真正的删除，只是做了一个，所以你试下看，你的数据库大小是不会变的所以你想要从新开始就在工具中间选择修复数据库，这样就可以了。

Answer 2

删完数据后，修复压缩一下数据库，可以直接在access中用工具修复，也可以用代码修复：Dim NewFileStr As String
Dim NewFileStr1 As String
Dim FileNameStr As String       'FileNameStr 被修复文件NewFileStr = "d:\new1.mdb"      '临时文件
DeleteFile NewFileStr
NewFileStr1 = "d:\new2.mdb"     '临时文件
DeleteFile NewFileStr1CopyFile FileNameStr, NewFileStr, False
RepairDatabase (NewFileStr)
If PassWord = "" Then       'PassWord 为数据库密码
   DBEngine.CompactDatabase NewFileStr, NewFileStr1
Else
   DBEngine.CompactDatabase NewFileStr, NewFileStr1, , , ";pwd=" + Trim(PassWord)
End IfDeleteFile NewFileStr
CopyFile NewFileStr1, FileNameStr, False
DeleteFile NewFileStr1