一般操作Access数据库,有Alter语句,和mssql(WINDOWS平台上强大的数据库平台)2k的基本语法差别不是太打,例如,在某表创建新列语句:
| Dimsqlstr sqlstr="altertablel_infoaddcolumninfo_filevarchar(200)defaultNULL" conn.execute(sqlstr) |
以上语句在l_info创建列info_file,为文本类型,长度是200,如果没有其他的设置,这时候,默认的:
必填字段:否
允许空字符创:否
这个空字符串一般可以允许的话不太满意,就有了ADOX这个空间处理。
详细请访问:微软ADOX介绍
这个Examples是多的出奇,可以访问这里查看全部的。
如下是其中一个例子:可以实现很多功能:
| SubAddHelpColumn() DimoConn,oCat,oColumn '打开数据库 SetoConn=Server.CreateObject("ADODB.Connection") oConn.OpenMM_conn_STRING '打开表 SetoCat=Server.CreateObject("ADOX.Catalog") SetoCat.ActiveConnection=oConn '创建列 SetoColumn=Server.CreateObject("ADOX.Column") WithoColumn Set.ParentCatalog=oCat'Mustsetbeforesettingproperties .Name="memHelp" .Type=adLongVarWChar .Properties("Nullable")=True .Properties("JetOLEDB:AllowZeroLength")=True EndWith oCat.Tables("MetaExternalFields").Columns.AppendoColumn '完成 SetoColumn=Nothing SetoCat=Nothing oConn.Close() SetoConn=Nothing EndSub |
其中的集合Column的成员有:
| Itemproperty Countproperty. Deletemethod. Refreshmethod. |
关于column对象,详细可以参见:Column对象,不表。