注册 登录
编程论坛 ACCESS论坛

如何有ASP 在页面 给数据库添加一个新字段???

lcchao2001 发布于 2005-08-14 09:09, 1031 次点击
如何有ASP 在页面  给数据库添加一个新字段???
有为仁兄 这样告诉我:
sql="ALTER TABLE 表名 ADD COLUMN 字段名 字段属性(如:text(20))"
 但是我不知道具体怎么用,那位高手能帮我啊 !!!!
5 回复
#2
lcchao20012005-08-14 09:10
大家快帮我啊!!!
#3
programerVB2005-08-23 15:20

Dim dbs As Database

'在您的计算机中修改此行使其正确指到 Northwind '的路径。 Set dbs = OpenDatabase("Northwind.mdb")

'添加工资字段至员工表中, '并且设置为 Currency 数据类型。 dbs.Execute "ALTER TABLE Employees " _ & "ADD COLUMN Salary CURRENCY;"

dbs.Close

End Sub

此示例从员工表中删除工资字段。

Sub AlterTableX2()

Dim dbs As Database

'在您的计算机中修改此行使其正确指到 Northwind '的路径。 Set dbs = OpenDatabase("Northwind.mdb")

'从员工表中删除工资字段。 dbs.Execute "ALTER TABLE Employees " _ & "DROP COLUMN Salary;"

dbs.Close

End Sub

此示例在订单表中增加一外部键。这个外部键是基于员工编号字段和引用至员工的表中的员工编号字段。此示例中,在 REFERENCES 子句中并没有列出员工表的员工编号字段,这是因为员工编号为员工表的主键。

Sub AlterTableX3()

Dim dbs As Database

'在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("Northwind.mdb")

'在订单表中添加外部键。 dbs.Execute "ALTER TABLE Orders " _ & "ADD CONSTRAINT OrdersRelationship " _ & "FOREIGN KEY (EmployeeID) " _ & "REFERENCES Employees (EmployeeID);"

dbs.Close

End Sub

此示例从订单表中删除外部键。

SubSub()

Dim dbs As Database

'在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("Northwind.mdb")

'由订单表中删除 OrdersRelationship 外部键。 dbs.Execute "ALTER TABLE Orders " _ & "DROP CONSTRAINT OrdersRelationship;"

dbs.Close

End Sub

#4
programerVB2005-08-23 15:22

ALTER TABLE table {ADD {COLUMN field type[(size)] [NOT NULL] [CONSTRAINT index] | CONSTRAINT multifieldindex} | DROP {COLUMN field I CONSTRAINT indexname} }

ALTER TABLE 语句分为以下几个部分:

部分 说明 table 欲修改的表之名称。 field 欲在表内增加或删除的字段的名称。 type 字段的数据类型。 size 字段的字符长度 (仅文本字段及二进制字段)。 index 字段索引。关于如何构造字段索引的详细信息,请参阅 CONSTRAINT 子句主题。 multifieldindex 欲增加至表 中的多重字段索引的定义。关于如何构造此子句的详细信息,请参阅 CONSTRAINT 子句主题。 indexname 欲删除的多重字段索引的名称。

#5
hnyboy2005-09-07 16:42
学习
#6
zenden20012005-09-18 08:54
学习了哈
1