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