如何向一个表里添加一个字段？？？

Question

我用的是ACCESS数据库，名为info.mdb其中有一个表为：type。我想动态的添加一个字段到这个type表里，如何实现？？
谢谢！！
在线等待……
十万火急……

Answer 1

cn.execute "alter table tablename add column fieldname fieldtype"

Answer 2

此示例在员工表中增加 Currency 数据类型的一个工资字段。Sub AlterTableX1() Dim dbs As Database '在您的计算机中修改此行使其正确指到 Northwind 
'的路径。
Set dbs = OpenDatabase("Northwind.mdb") '添加工资字段至员工表中，
'并且设置为 Currency 数据类型。
dbs.Execute "ALTER TABLE Employees " _
& "ADD COLUMN Salary CURRENCY;" dbs.CloseEnd Sub此示例从员工表中删除工资字段。Sub AlterTableX2() Dim dbs  As Database '在您的计算机中修改此行使其正确指到 Northwind 
'的路径。
Set dbs = OpenDatabase("Northwind.mdb") '从员工表中删除工资字段。
dbs.Execute "ALTER TABLE Employees " _
& "DROP COLUMN Salary;" dbs.CloseEnd Sub

Answer 3

ALTER TABLE 职员表格
ADD COLUMN 薪水 CURRENCY money(8)；

Answer 4

我是初学者，不知道对不对！！
上面cn为数据库连接,""里面的语句可以到MS SQL 帮助中查-------更改表以添加新列
ALTER TABLE TYPE 想要加的字段 类型（例如：VARCHAR(20)） NULL

Answer 5

ALTER TABLE TYPE ADD 想要加的字段 类型（例如：VARCHAR(20)） NULL
差一点误人子弟！！
楼上的说的很详细了。

Answer 6

'引用Microsoft Activex Data Object2.x Library
Dim cn As New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\info.mdb "
cn.Execute "alter table [type] add column fieldname varchar(20)"
cn.Close
Set cn = Nothing

Answer 7

默认的就是允许为空的。除非加了关键字：not null

Answer 8

conn.execute "alter table youtable add column fieldname varchar(20) not null"

Answer 9

alter table tablename add column fieldname fieldtype

Answer 10

Alter Table YourTableName Add Column YourNewColumnName YourDataType NULL

Answer 11

cn.execute "alter table type add column address varchar(40)"