[求助]如何向已存在的表中增加一个字段？

loren

请指教！谢谢

在"二级生成表"中增加一个"一级ID"字段,并将字段值设定为100

[此贴子已经被作者于2006-8-23 9:33:59编辑过]

老鬼

DoCmd.RunSQL "ALTER TABLE 表1 ADD abc text NULL"

loren

再次请教!

wwwwa

是默认值？

loren

对啊,就是增加字段后,让字段值为默认值,请教!

wwwwa

只能用ADO：

TRY：

Dim dd As New ADODB.Connectiondd.ConnectionString = "rovider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\TEMP\123.MDBersist Security Info=False"
dd.Open
dd.Execute ("alter table rrrr add rr long default 100")

loren

M =100     
Set rs2 = New ADODB.Recordset
rs2.Open "二级生成表", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs2.Execute ("alter table 二级生成表 add 一级ID long default M")

Set rs2 = Nothing

以上语句为什么不对啊!请楼上指教

wwwwa

rs2.Execute ("alter table 二级生成表 add 一级ID long default "& M)

loren

楼上实在不好意思啊,还是不行啊,请帮忙.见附件

请在打开的窗体中选择组合框的值,然后点击"编辑"按钮,就可以看到错误所在.谢谢

wwwwa

必须用ADODB.Connection

Dim dd As New ADODB.Connection

dd.ConnectionString = "rovider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\TEMP\123.MDBersist Security Info=False"
dd.Open
dd.Execute ("alter table rrrr add rr long default 100")