我用ADO + datagrid打開和新建數据庫. 我如何delete指定的數据表. 和指定的field ?

解决方案 »

  1.   

    DROP 语句
    从数据库中删除已存在的表,或从表中删除已存在的索引。
    --------------------------------------------------------------------------------注意 对于非微软数据库, Microsoft Jet数据库引擎不支持DROP或 DDL 语句的使用。应采用 DAO Delete 方法。
    --------------------------------------------------------------------------------语法
    DROP {TABLE表 | INDEX索引 ON表 | PROCEDURE procedure | VIEW view}这 DROP 语句分为以下几个部分:部分 说明 
    table 欲删除的表的名称,或欲删除的索引所在的表的名称。 
    过程 欲创建的表的名称。 
    view 欲创建的表的名称。 
    index 欲从表中删除的索引的名称。 
    说明
    必须先关闭表,然后才能删除此表或此表中的索引。也可以使用 ALTER TABLE 语句 来删除表中的索引。你可以用 CREATE TABLE 建立一个表,也可以用 CREATE INDEX 或 ALTER TABLE 建立一个索引。使用 ALTER TABLE修改表。DROP 语句示例下列示例假设在 Northwind 数据库中的员工表上存在一个假设的 NewIndex 索引。 此示例从员工表中删除 MyIndex 索引。Sub DropX1()
        Dim dbs As Database
        ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。    Set dbs = OpenDatabase("Northwind.mdb")    ' 对运费超过 $100 的订单,
        ' 从员工表中删除 NewIndex。    dbs.Execute "DROP INDEX NewIndex ON Employees;"
        dbs.Close
    End Sub此示例从数据库中删除员工表。Sub DropX2()
        Dim dbs As Database
        ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。    Set dbs = OpenDatabase("Northwind.mdb")    ' 对运费超过 $100 的订单,
        ' 删除员工表。    dbs.Execute "DROP TABLE Employees;"
        dbs.Close
    End Sub
      

  2.   

    DELETE 语句 
    创建一个删除查询把记录从 FROM 子句列出并符合 WHERE 子句的一个或更多的表中清除。语法
    DELETE [表.*]
        FROM 表
        WHERE标准DELETE 语句可分为以下几个部分:部分 说明 
    table 从其中删除记录的表的可选名称。 
    table 从其中删除记录的表的名称。 
    criteria 确定删除哪个记录的表达式。 
    说明
    可以使用 DELETE 删除多个记录。可以用 Execute 方法和 DROP 语句从数据库中删除整个表。不过,若用这种方法删除表,将会失去表的结构。不同的是当使用 DELETE,只有数据会被删除;表的结构以及表的所有属性仍然保留,例如字段属性及索引。可以用 DELETE从与其他表有着 一对多关系的表中清除记录。若在一个查询中删除了关系中‘一’的一方的表的相应记录,级联删除操作将删除关系中‘多’的一方的表的记录。例如,在客户表与订单表之间的关系中,客户表是‘一’方,而订单表是‘多’方。如果指定使用级联删除,从客户数据中删除一个记录,相对应之订单记录也会被删除。删除查询不只删除指定字段之中的数据,它会删除全部的记录。如果要删除指定字段值,可创建更新查询使该值变为 Null.
    --------------------------------------------------------------------------------重点 当使用删除查询删除记录之后,不能取消此操作。如果想要知道哪些记录已被删除,首先验证使用相同条件的选定查询的结果,然后运行删除查询。 
    随时注意维护数据的复制备份。如果您误删除记录,可以从备份副本中将数据恢复。 --------------------------------------------------------------------------------
    DELETE 语句示例此示例删除所有员工其职称为 Trainee 的记录。当 FROM 子句仅包含一个表,您不必在 DELETE 语句中列出表名称。Sub DeleteX()
        Dim dbs As Database, rst As Recordset
        ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。    Set dbs = OpenDatabase("Northwind.mdb")    ' 对运费超过 $100 的订单,
        ' 删除员工职称为 Trainee 的员工记录。        dbs.Execute "DELETE * FROM " _        & "Employees WHERE Title = 'Trainee';"        dbs.Close
    End Sub
      

  3.   

    删除表的SQL语句
    con.excute ("drop table 表名")