如何使用ADO显示数据库中已存在“查询”的SQL代码

tower6 2001-05-21 04:14:00
在DAO中可以使用
DB.QueryDefs(“QueryName").SQL
可以显示一个查询对象的SQL代码

到了ADO中可有实现相似功能的办法
以及添加、修改、删除查询的方法

谢谢
...全文
54 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
tower6 2001-05-21
非常感谢
回复
zhengsb 2001-05-21
关注
回复
playyuer 2001-05-21
adoCatalog.Tables.Delete "tablename"
adoCatalog.Views.Delete "ViewName"
回复
playyuer 2001-05-21
'引用 ADOX:
'Microsoft ADO Ext. 2.6 for DDL and Security
Dim adoConnection As New Connection
Dim adoCatalog As New ADOX.Catalog

adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\northwind.mdb"
'adoConnection.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Data Source=billgate"
'adoCatalog.Create "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=ADOXCreate;Data Source=billgate"
Set adoCatalog.ActiveConnection = adoConnection

For i = 0 To adoCatalog.Tables.Count - 1
Debug.Print adoCatalog.Tables.Item(i).Type & ": " & adoCatalog.Tables.Item(i).Name
Next
For i = 0 To adoCatalog.Views.Count - 1
Debug.Print adoCatalog.Views.Item(i).Name
Next
回复
BrentIvan 2001-05-21
RecordSet.AddNew
RecordSet.Update
RecordSet.Delete
RecordSet.Filter
RecordSet.Find
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2001-05-21 04:14
社区公告
暂无公告