ASP操作Access及ADOX类的使用 - ASP教程

Dim sqlstr
sqlstr="alter table l_info add column info_file varchar(200)default NULL"
conn.execute(sqlstr)

以上语句在l_info创建列info_file，为文本类型，长度是200，如果没有其他的设置，这时候，默认的：

必填字段：否

允许空字符创：否

这个空字符串一般可以允许的话不太满意，就有了ADOX这个空间处理。

详细请访问：微软ADOX介绍

这个Examples是多的出奇，可以访问这里查看全部的。

如下是其中一个例子：可以实现很多功能：

Sub AddHelpColumn()
    Dim oConn, oCat, oColumn
    ' 打开数据库
    Set oConn = Server.CreateObject("ADODB.Connection")
    oConn.Open MM_conn_STRING
    ' 打开表
    Set oCat = Server.CreateObject("ADOX.Catalog")
    Set oCat.ActiveConnection = oConn
    ' 创建列
    Set oColumn = Server.CreateObject("ADOX.Column")
    With oColumn
         Set .ParentCatalog = oCat ' Must set before setting properties.Name = "memHelp"
         .Type = adLongVarWChar
         .Properties("Nullable") = True
         .Properties("Jet OLEDB:Allow Zero Length") = True
    End With
    oCat.Tables("MetaExternalFields").Columns.Append oColumn
    ' 完成
    Set oColumn = Nothing
    Set oCat = Nothing
    oConn.Close()
    Set oConn = Nothing
End Sub

其中的集合Column的成员有：

Item property
Count property.
Delete method.
Refresh method.

关于column对象，详细可以参见：Column对象，不表。

（编辑：滁州站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!