首页 伟德体育app下载官网 编程 必备知识 搜索引擎
站内搜索
  • 最近浏览
  • [J2EE]J2EE 应用伟德体育app下载官网技术
  • MySql替换伟德始于英国1946内容
  • IIS 7 下限制站点带宽和...
  • [伟德始于英国1946]sql serve...
  • linkd.exe目录映射工...
  • thinkphp提示PHP ...
  • [web站点]在IIS上开设...
  • [网络伟德体育app下载官网]如何保证伟德体育app下载官网...
  • dedecms网站写权限
  • MYSQL启用日志,查看日志...
  • thinkphp的设置方法
  • [伟德始于英国1946]查看sql ser...
  • VC++ 重启服务,停止服务...
  • 微软IE 7浏览器曝出第二个...
  • 微软承认系统严重漏洞 Win...
  • 推荐文章
  • [网络伟德体育app下载官网]如何保证伟德体育app下载官网...
  • [伟德始于英国1946]查看sql ser...
  • MySql替换伟德始于英国1946内容
  • thinkphp的设置方法
  • 命令行下的ip安全策略
  • 热文排行
  • API之SetWindows...
  • StartServiceCtrlDispatcher
  • [网络伟德体育app下载官网]如何保证伟德体育app下载官网...
  • 搭建eclipse+Jbos...
  • VC++ 重启服务,停止服务...
  • 远程桌面连接日志脚本bat&vbs
  • VB API 重启服务,停止...
  • 端口复用技术与实现代码(C++)
  • 获取计算机信息有关的API
  • WTS系列函数的使用
  • [web站点]在IIS上开设...
  • 将STL改成链表式
  • vc编译exe的体积最小优化
  • VB ListView的使用
  • [伟德始于英国1946]查看sql ser...
  • ADOX.Catalog使用方法(转载)


    1、ADOX 概述
    Microsoft ActiveX Data Objects Extensions for Data Definition Language and Security (ADOX) 是对 ADO 对象和编程模型的扩展。ADOX 包括用于模式创建和修改的对象,以及安全性。由于它是基于对象实现模式操作,所以用户可以编写对各种数据源都能有效运行的代码,而与它们原始语法中的差异无关。

    ADOX 是核心 ADO 对象的扩展库。它显露的其他对象可用于创建、修改和删除模式对象,如表格和过程。它还包括安全对象,可用于维护用户和组,以及授予和撤消对象的权限。

    要通过开发工具使用 ADOX,需要建立对 ADOX 类型库的引用。对 ADOX 库的说明为“Microsoft ADO Ext. for DDL and Security.”。ADOX 库文件名为“Msadox.dll”,程序 ID (ProgID) 为“ADOX”。有关建立库引用的详细信息,请参阅开发工具的文档。
    2、ADOX 对象
    Catalog        包含描述数据源模式目录的集合。
    Column         表示表、索引或关键字的列。
    Group          表示在安全伟德始于英国1946内有访问权限的组帐号。
    Index          表示伟德始于英国1946表中的索引。
    Key            表示伟德始于英国1946表中的主关键字、外部关键字或唯一关键字。
    Procedure       表示存储的过程。
    Table         表示伟德始于英国1946表,包括列、索引和关键字。
    User          表示在安全伟德始于英国1946内具有访问权限的用户帐号。
    View          表示记录或虚拟表的过滤集。
    3、ADOX 方法
    Append(Columns) 将新的 Column 对象添加到 Columns 集合。
    Append(Groups) 将新的 Group 对象添加到 Groups 集合。
    Append(Indexes) 将新的 Index 对象添加到 Indexes 集合。
    Append(Keys) 将新的 Key 对象添加到 Keys 集合。
    Append(Procedures) 将新的 Procedure 对象添加到 Procedures 集合。
    Append(Tables) 将新的 Table 对象添加到 Tables 集合。
    Append(Users) 将新的 User 对象添加到 Users 集合。
    Append(Views) 将新的 View 对象添加到 Views 集合。
    ChangePassword 更改用户帐号的密码。
    Create 创建新的目录。
    Delete 删除集合中的对象。
    GetObjectOwner 返回目录中对象的拥有者。
    GetPermissions 获得对象上组或用户的权限。
    Item 按名称或序号返回集合的指定成员。
    Refresh 更新集合中的对象,以反映针对提供者可用的和指定的对象。
    SetObjectOwner 指定目录中对象的拥有者。
    SetPermissions 设置对象上组或用户的权限。
    4、ADOX 属性
    ActiveConnection 指示目录所属的 ADO Connection 对象。
    Attributes 描述列特性。
    Clustered 指示索引是否被分簇。
    Command 指定可用于创建或执行过程的 ADO Command 对象。
    Count 指示集合中的对象数量。
    DateCreated 指示创建对象的日期。
    DateModified 指示上一次更改对象的日期。
    DefinedSize 指示列的规定最大大小。
    DeleteRule 指示主关键字被删除时将执行的操作。
    IndexNulls 指示在索引字段中有 Null 值的记录是否有索引项。
    Name 指示对象的名称。
    NumericScale 指示列中数值的范围。
    ParentCatalog 指定表或列的父目录以便访问特定提供者的属性。
    Precision 指示列中数据值的最高精度。
    PrimaryKey 指示索引是否代表表的主关键字。
    RelatedColumn 指示相关表中相关列的名称(仅关键字列)。
    RelatedTable 指示相关表的名称。
    SortOrder 指示列的排序顺序(仅索引列)。
    Type(列) 指示列的数据类型。
    Type(关键字) 指示关键字的数据类型。
    Type(表) 指示表的类型。
    Unique 指示索引关键字是否必须是唯一的。
    UpdateRule 指示主关键字被更新时会执行的操作。

    5、范例
    一、创建伟德始于英国1946范例
    如下代码显示如何通过 Create 方法创建新的 Jet 伟德始于英国1946。
    ASP代码:
    -----------------------------------------------------------
    set cat=server.createobject("ADOX.Catalog")
        cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb"

    VB代码
    --------------------------------
    Sub CreateDatabase()
                  'Dim cat As New ADOX.Catalog
           ' cat.Create ""Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb""

    End Sub
    二、创建表范例ASP代码:
    -------------<%
        set cat=server.createobject("ADOX.Catalog")
        dbpath=server.mappath("/shit/date/new.mdb")    cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&dbpath
        set    tbl=Server.createobject("ADOX.Table")
              tbl.Name     =     "MyTable"
        tbl.Columns.Append     "Column1",     3           'adInteger
              tbl.Columns.Append     "Column2",     3           'adInteger
              tbl.Columns.Append     "Column3",     202       ,50     'adVarWChar
              cat.Tables.Append     tbl
        %>
    VB代码:---------------
    Sub CreateTable()

            Dim tbl As New Table
            Dim cat As New ADOX.Catalog

    '打开目录。
            ' 打开目录。
            cat.ActiveConnection = _
               ""Provider=Microsoft.Jet.OLEDB.4.0;"" & _
               ""Data Source=c:\Program Files\Microsoft Office\"" & _
               ""Office\Samples\Northwind.mdb;""

            tbl.Name = ""MyTable""
            tbl.Columns.Append ""Column1"", adInteger
            tbl.Columns.Append ""Column2"", adInteger
            tbl.Columns.Append ""Column3"", adVarWChar, 50
            cat.Tables.Append tbl

    End Sub
    三、创建索引范例
    如下代码演示如何创建新的索引。索引针对表的两个列建立。

    Sub CreateIndex()

            Dim tbl As New Table
            Dim idx As New ADOX.Index
            Dim cat As New ADOX.Catalog

    ' 打开目录。
            ' 打开目录。
            cat.ActiveConnection = _
               ""Provider=Microsoft.Jet.OLEDB.4.0;"" & _
               ""Data Source=c:\Program Files\Microsoft Office\"" & _
               ""Office\Samples\Northwind.mdb;""

            ' 定义表并将其追加到目录
            tbl.Name = ""MyTable""
            tbl.Columns.Append ""Column1"", adInteger
            tbl.Columns.Append ""Column2"", adInteger
            tbl.Columns.Append ""Column3"", adVarWChar, 50
            cat.Tables.Append tbl

            ' 定义多列索引
            idx.Name = ""multicolidx""
            idx.Columns.Append ""Column1""
            idx.Columns.Append ""Column2""

            ' 将索引追加到表上
            tbl.Indexes.Append idx

    End Sub
    四、创建关键字范例
    如下代码演示如何创建新的外部关键字。假定已存在两个表(Customers 和 Orders)。

    Sub CreateKey()

            Dim kyForeign As New ADOX.Key
            Dim cat As New ADOX.Catalog

            cat.ActiveConnection = ""Provider=Microsoft.Jet.OLEDB.4.0;"" & _
               ""Data Source=c:\Program Files\Microsoft Office\"" & _
               ""Office\Samples\Northwind.mdb;""

            kyForeign.Name = ""CustOrder""
            kyForeign.Type = adKeyForeign
            kyForeign.RelatedTable = ""Customers""
            kyForeign.Columns.Append ""CustomerId""
            kyForeign.Columns(""CustomerId"").RelatedColumn = ""CustomerId""
            kyForeign.UpdateRule = adRICascade
            cat.Tables(""Orders"").Keys.Append kyForeign
    End Sub
           [/code]

     

    Type   属性(列)


    指示列的数据类型

    设置和返回值

    设置或返回长整型值,该值是如下常量之一:

    常量   说明
    adTinyInt   精确的数字值,精度为小数点后   3   位。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdSmallInt   精确数字值,精度为小数点后   5   位。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdInteger   精确数字值,精度为小数点后   10   位。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdBigInt   精确数字值,精度为小数点后   19   位。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdUnsignedTinyInt   无符号的   adTinyInt。
    AdUnsignedSmallInt   无符号的   adSmallInt。
    AdUnsignedInt   无符号的   adInteger。
    AdUnsignedBigInt   无符号的   adBigInt。
    AdSingle   单精度浮点数。
    AdDouble   双精度浮点数。
    AdCurrency   货币类型。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdDecimal   变体型十进制类型。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdNumeric   数值类型。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdBoolean   变体布尔类型。0   为假而   ~0   为真。
    AdUserDefined   用户定义的变量长度数据类型。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdVariant   自动变体型。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdGuid   全域唯一标识符。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdDate   自动日期。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdDBDate   伟德始于英国1946日期数据结构。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdDBTime   伟德始于英国1946时间数据结构。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdDBTimestamp   伟德始于英国1946时间戳结构。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdBSTR   BSTR   的指针。关于该类型的详细资料,请参阅“OLE   DB   程序员参考”。
    AdChar   定长字符串。
    AdVarChar   变长字符串。
    AdLongVarChar   长变长字符串。
    AdWChar   宽定长字符串。
    AdVarWChar   宽变长字符串。
    AdLongVarWChar   长、宽变长字符串。
    AdBinary   定长二进制数据。
    AdVarBinary   变长二进制数据。
    AdLongVarBinary   长变长二进制数据。


    说明

    默认值是   adVarWChar。

    在   Column   对象追加到集合或

    [wangjy17908]
    添加时间:2009-06-29
    版权所有(C)2005-2015