如何判斷臨時Table是否存在 |
|
答題得分者是：chumay
|
|
martinTOP
一般會員   發表：10 回覆：19 積分：5 註冊：2004-06-12 發送簡訊給我 |
我在程式中用到臨時TABLE,在創建時希望判斷其是否存在,若存在就先刪除,然後再創建.如: Select * Into #abc From Table1 普通TABLE可用如下語句
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[abc]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[abc] 但臨時TABLE如何自理呀,請老大們幫忙.
|
|
Chance36
版主  發表：31 回覆：1033 積分：792 註冊：2002-12-31 發送簡訊給我 |
試試這樣如何?
Function TableExists(TableName : String):Boolean;
Var
Sl : TStrings ;
Begin
Sl := TstringList.Create;
// 使用ADO
ADOConnection1.GetTableNames(Sl,True);
Result := Sl.IndexOf(TableName)<> -1 ;
// 使用BDE
Session.GetTableNames('dbAlias',TableName,False,True,Sl);
Result := Sl.Count>0 ;
// 擇一使用
Sl.Free;
End; // 函式應用
Begin
If TableExists('abc') Then Begin
xxx.SQL.Text := 'Drop Table [dbo].[abc]' ;
xxx.ExecSQL;
End;
xxx.SQL.Text := 'Select * Into #abc From Table1';
xxx.ExecSQL;
End; _______________________________________
深藍的魚，祝您好運..........連連
|
|
chumay
一般會員 發表：0 回覆：2 積分：5 註冊：2003-06-19 發送簡訊給我 |
|
|
martinTOP
一般會員 發表：10 回覆：19 積分：5 註冊：2004-06-12 發送簡訊給我 |
發表時間：2005-01-06 22:10:14
IP:219.130.xxx.xxx 未訂閱
系統時間：2024-07-02 2:37:42
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |