Set MyField = MyTable.CreateField("Num", ???????)
    MyTable.Fields.Append MyField    用DAO建库里遇到过问题,我要建 AutoNumber 类型的字段,就是自动增量字段,不知道该怎么建立??????

解决方案 »

  1.   

    实现代码如下:
    SQL = "CREATE TABLE [dbo].[DeviceType] (" & _
              "[ID] [int] IDENTITY (1, 1) NOT NULL PRIMARY KEY," & _
              "[Sort] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL ," & _
              "[Content] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL " & _
              ") ON [PRIMARY]"
    Conn.Execute SQL其中:"[ID] [int] IDENTITY (1, 1) NOT NULL PRIMARY KEY为自增长的主键
      

  2.   

    上面情况是针对SQL数据库,ACCESS数据库中实现方法如下:
    SQL = "CREATE TABLE [DeviceType] (" & _
              "[ID] COUNTER NOT NULL, " & _
              "[Sort] Text(50) NOT NULL DEFAULT 测试," & _
              "[Content] Text(50) NOT NULL ,PRIMARY KEY(ID)) "
      Conn.Execute SQL