这样是否可行?
dim db as ADODB.Connection
db.Open ...
dim rs as Recordset
Set rs=db.OpenSchema(adSchemaTables)
Do Until rs.EOF
if rs!TABLE_NAME="your table name" then
......
end if
Loop
如果可行请告知我。谢谢!
dim db as ADODB.Connection
db.Open ...
dim rs as Recordset
Set rs=db.OpenSchema(adSchemaTables)
Do Until rs.EOF
if rs!TABLE_NAME="your table name" then
......
end if
Loop
如果可行请告知我。谢谢!
解决方案 »
- 无闪烁画图?在线
- 请教高手,怎样获得系统及用户的所有进程,包括每个进程占用的cpu和内存,以及进程id和进程名
- 请问在MSHFLEXGRID中,怎样使游标只选择一行记录,而不是选择多行!
- 求救:请问各位大侠一个开发网页编辑器的问题?
- 非常适合入门朋友学习的宝贵资料
- 请教如何恢复屏幕参数?谢谢
- 请问关于ado中edit 的问题,是否ado有edit这功能
- 什么对象可以执行用来调用并执行DTS数据包?
- 利用CDONTS组件发一封带附件的Email,附件出现乱码问题,高手请进!
- 有什么好办法快速读入大容量的文本文件?
- 送分啦!要分得过来.vb中操作长字符串(大于255字节的字符串如何操作)
- 通过那个函数或API能调出“选择目录”的windows框?
drop table ........
create table ..............
go