access怎么判别表的存在(40分)

  • 主题发起人 主题发起人 绯红之王
  • 开始时间 开始时间

绯红之王

Unregistered / Unconfirmed
GUEST, unregistred user!
在access数据库里面,要动态创建临时表
那么如果表已经存在
在创建就会出错
怎么判别表是否已经存在
 
try
drop table table1;
except
end;
这样就可以了.不用判断,
 
access没有用过了,不过查询一下这个表, 不出错就是存在了[:D]
 
举起手来!打劫!

Function TableExist(connstr,pcTable: string): boolean; overload; //参数为连接字符串和表名。表存在则函数为真
var tmpFldList: TStrings ;
nLoop: integer ;
pConn: TADOConnection;
begin
Result:= False ;
tmpFldList := TStringList.Create ;
pConn:=TADOConnection.Create(application);
try
pConn.ConnectionString:=connstr; pconn.LoginPrompt:=False; pConn.Connected:=True;
pConn.GetTableNames(tmpFldList, True); // 包含系统表
for nLoop := 0 to tmpFldList.Count-1 do
begin
if uppercase(tmpFldList[nLoop])=uppercase(pcTable) then
begin
Result:= True ; break ;
end;
end;
finally
tmpFldList.Free ;
pConn.Free;
end;
end;
 
用两个系统标关联起来,就ok了
 
我的笔记:http://www.delphibbs.com/keylife/iblog_show.asp?xid=18824
 
多人接受答案了。
 

Similar threads

回复
0
查看
886
不得闲
S
回复
0
查看
751
SUNSTONE的Delphi笔记
S
S
回复
0
查看
758
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部