ASP操作Access，ADOX类的使用

核心提示：一般操作Access数据库，有Alter语句，ASP操作Access，ADOX类的使用，和MsSQL2k的基本语法差别不是太打，例如，如下是其中一个例子：可以实现很多功能：SubAddHelpColumn()DimoConn,oCat,oColumn'打开数据库SetoConn=Server.CreateObj

一般操作Access数据库，有Alter语句，和MsSQL2k的基本语法差别不是太打，例如，在某表创建新列语句：

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对象，不表。