1180
社区成员
- 主页
**老问题：access数据库中如何增加一个自动编号的字段!**
如何在access数据库中增加一个自动编号的字段，或者改变现有字段为自动编号型。
说明：
关于用DAO的方法我已经会了。
用alter table语句与create table的方法已经测试成功!
问题是：
1.用adodb或adox如何实现
2.或者用sql语句如何实现
谢谢!
说明：
关于用DAO的方法我已经会了。
用alter table语句与create table的方法已经测试成功!
问题是：
1.用adodb或adox如何实现
2.或者用sql语句如何实现
谢谢!
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
icy_csdn 2002-05-04
或者用ADOX.Catalog的方法创建表时，字段类型应该设置为什么？没有找到：(
footballboy 2002-05-04
标准答案来了
说明：为了access数据库DB.MDB中的表table1增加一个自动编号字段 ID
此外新建一个带自动编号字段的表的道理也是一样
关键之处："ALTER TABLE table1 ADD ID Counter"
自动编号字段用Counter
Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim cmd As ADODB.Command
Dim strsql As String
Private Sub Command1_Click()
cmd.Execute
End Sub
Private Sub Form_Load()
Set cnn = New ADODB.Connection
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\temp\db.mdb"
Set cmd = New ADODB.Command
cmd.ActiveConnection = cnn
cmd.CommandText = "ALTER TABLE table1 ADD ID Counter"
End Sub
说明：为了access数据库DB.MDB中的表table1增加一个自动编号字段 ID
此外新建一个带自动编号字段的表的道理也是一样
关键之处："ALTER TABLE table1 ADD ID Counter"
自动编号字段用Counter
Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim cmd As ADODB.Command
Dim strsql As String
Private Sub Command1_Click()
cmd.Execute
End Sub
Private Sub Form_Load()
Set cnn = New ADODB.Connection
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\temp\db.mdb"
Set cmd = New ADODB.Command
cmd.ActiveConnection = cnn
cmd.CommandText = "ALTER TABLE table1 ADD ID Counter"
End Sub
icy_csdn 2002-05-04
贴子回复次数大于跟给分次数 ？
什么意思啊，怎么给不了分？
什么意思啊，怎么给不了分？
icy_csdn 2002-05-04
to: softrain(秋雨)
你的办法我试了，但是没有成功，不知道是怎么改的？
你的办法我试了，但是没有成功，不知道是怎么改的？
icy_csdn 2002-05-04
由于不及喜欢用其它方法，(ctrea table,及alter table等方法)因此来问大家。
谢谢各位，问题已经解决!
我已经写了一个函数来得以实现，采用的是adox。
如果您需要，我可以给大家!
谢谢各位，问题已经解决!
我已经写了一个函数来得以实现，采用的是adox。
如果您需要，我可以给大家!
softrain 2002-05-04
adodb不能实现，ADOX可以，字段属性改为COUNTER就可以了，其它参数参照微软文档就可以的。
water_j 2002-05-04
您可以使用Count关键字来设置字段的自动编号属性，例如：
CREATE TABLE sTable11 (Id COUNTER , MyText TEXT (10))
您可以参考以下文章学习Access中SQL语句的使用：
ACC2000: Create and Drop Tables and Relationships Using SQL DDL (Q209037)
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q209037
CREATE TABLE sTable11 (Id COUNTER , MyText TEXT (10))
您可以参考以下文章学习Access中SQL语句的使用：
ACC2000: Create and Drop Tables and Relationships Using SQL DDL (Q209037)
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q209037
半点闲 2002-05-04
关注~
