系统表sysobjects查找
if exists(select * from sysobjects where name=表名 and xtype='u')
if exists(select * from sysobjects where name=表名 and xtype='u')
解决方案 »
- DELPHI开发就这么便宜吗!
- Delphi中如何把SQL数据库中多条记录中的文件进行打包下载
- frxreport1.ShowReport出错?
- 一个关于QUERY的贼妖的问题!!!!!!!!!!!!
- 高分求能将vcd(.dat文件)转换成asf、wma等流媒体文件的控件
- 为什么会有too many actual parameters的错误信息?
- VC的数据类型和Delphi之间的相互转化问题,救命啊大虾们!
- 请教,如何在DBGrid中实现StringGrid的无源数据的添加?在线等待!!
- 系统的问题
- 如何截获Ctrl+Alt+Del?
- !~# 兄弟们! 帮帮忙! 来的都有分!
- 关于改变默认打印机的问题!
l_query.Close;
l_query.DatabaseName := dm.Database1.DatabaseName;
l_query.SQL.clear;
l_str := 'SELECT * FROM sysobjects WHERE name = '''+ FTableName + '''';
//FTableName为要查找是否存在的表名
l_query.SQL.Add(l_str);
l_query.Active := True;
IF l_query.RecordCount = 1 then
begin
//存在该表
end;
Tabel1.TableName:=...;
if Tabel1.Exists then ........
SELECT * FROM User_tab_Comments where TABLE_NAME='*****'
*****代表表名。
给分了!