在Access中向现有表添加计算字段时，有两种方法：通过TableDef.CreateField和Fields.Append，或者使用DDL的ALTER TABLE ADD COLUMN语句。作者尝试了第一种方法但遇到了3211错误，因为无法锁定表。问题可能源于在尝试添加字段的表单已经访问过表中的字段。文章提供了使用DDL创建字段的示例代码，并讨论了两种方法的优缺点。
I need to add a calculated field to an existing table. I am aware of two ways to do this and I'm wondering if anyone has any input on which is best and how to make them work:
Using TableDef.CreateField, then TableDef.Fields.Append
Using a DDL Alter Table ADD COLUMN statement
I tried using the first method, but I keep getting a 3211 error because Access could not lock the table. I don't have the table open. However, I am calling CreateField from a form that has accessed which fields currently exist in the table.
Here's the code for calling CreateField:
`
Public Sub AddFieldToTable(strTable As String, strField As String, nFieldType As Integer)
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Dim fld As DAO.Field
On Error GoTo ErrorHandler
Set db = CurrentDb
Set tdf = db.TableDefs(
最低0.47元/天 解锁文章
2927
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
