Access数据库“自动编号”字段归零

  Access数据库“自动编号”数据类型是一个非常实用的类型,它可以很方便地帮助我们完成标识不同记录ID的工作。但是由于JET引擎的特性(SQL server使用T-SQL),当我们在Access数据库某张表中执行了删除所有数据的操作后,被用来标识唯一ID的字段将不再归零(从头开始计数),而是会继续延续上次ID递增计数,我们可以用若干种方法解决这样的问题,以下结合ASP推荐两种方法(以下方法都是建立在空数据表的“自动编号”归零的前提下):

第一种:压缩数据库
用过Access的朋友应该都知道在Access的工具栏上我们可以通过:

点击“工具”=>“数据库实用工具”=>“压缩和修复数据库”来完成对数据库的压缩和修复工作,当这项工作完成时,Access各空数据表的“自动编号”字段也会做归零操作。

而我们也可以用ASP来完成这项工作,以下是压缩数据库主要SUB:

< %
Sub  CompactDB(strDBFileName)
  
Set  fso  =   CreateObject ( " Scripting.FileSystemObject " )
  
Dim  strOldDB
  strOldDB 
=  Server.MapPath(strDBFileName)
  
Dim  strNewDB
  strNewDB 
=  Server.MapPath( " New "   &  strDBFileName)
  
If  fso.FileExists(strOldDB)  Then
    
' 压缩数据库
     Set  jro =  Server.CreateObject( " JRO.JetEngine " )
    strPvd 
=   " Provider=Microsoft.Jet.OLEDB.4.0;Data Source= "
    jro.CompactDatabase strPvd 
&  strOldDB , strPvd  &  strNewDB
    
set  jro =   Nothing
    
' 删除旧的数据库文件
    fso.DeleteFile strOldDB
    
'  将压缩好的数据库文件拷贝回来
    fso.MoveFile strNewDB, strOldDB
    Response.Write 
" 数据库压缩完毕! "
  
Else
    Response.Write 
" 找不到指定的数据库文件! "
  
End   If
  
Set  fso  =   Nothing
End Sub
%
>

我们可以很轻松地使用<%Call CompactDB("yourdb.mdb")%>完成调用。

第二种:SQL语句
如果你了解SQL里ALTER TABLE的用法,这一切将变得非常简单:

ALTER TABLE — 更改表属性

ALTER TABLE table [ * ]
    ADD [ COLUMN ] column type
ALTER TABLE table [ * ]
    ALTER [ COLUMN ] column { SET DEFAULT value | DROP DEFAULT }
ALTER TABLE table [ * ]
    RENAME [ COLUMN ] column TO newcolumn
ALTER TABLE table
    RENAME TO newtable

输入

table
试图更改的现存表的名称.
column
现存或新的列名称.
type
新列的类型.
newcolumn
现存列的新名称.
newtable
表的新名称.

输出

ALTER
从被更名的列或表返回的信息.
ERROR
如果一个列或表不存在返回的信息.

我们解决Access数据库“自动编号”字段自动归零可以这样完成:

ALTER   TABLE  tableName  ALTER   COLUMN  OrderId COUNTER ( 1 1 )

其中COLUMN关键字可以省略,下面这样也是可以的:

ALTER   TABLE  tableName  ALTER  OrderId COUNTER ( 1 1 )

剩下的交给ASP执行SQL语句完成就可以了,这里不再赘述。

值得注意的一点:有些程序员喜欢保存Access数据库为其它后缀名如.asp、.asa等,当我们重命名这些数据库时有可能会出现数据库体积增大的情况,而这种情况亦有可能导致上面的ALTER TABLE语句无法正常工作,这种异常我曾经在改名后的Access数据库的SQL特定查询中遇到过,当时报错情况是:无效的字段数据类型。后来反复尝试了几遍,发现利用“压缩和修复数据库”也可以修复这个异常,大家可以自己注意一下^_^

你可能感兴趣的:(我的ASP之旅)