想請教各位高手，我寫了SQL，想做到empty、delete、copy 三個table operation，這個是用在我寫的database desktop簡易版程式 之前也有問過問題，記得是ccchen先生幫忙回答的~ ~~~語法~~~ empty: table_string := 'delete from ' table_name; delete: table_string := 'drop table ' table_name; copy: table_string := 'select * into ' co_table_name ' from ' table_name; SQL.Add(table_string); ExecSQL; 這三個語法，我測試過以'select alias'方式開啟四種型態的DB，結果如下: empty delete copy ACCESS ○ ○ ○ dBASE ○ ○ X PARADOX ○ ○ X SQL ○ ○ X 小妹才疏學淺，不明白該如何完成copy table的動作，想請問copy 的SQL語法是每種DB型態都不一樣嗎??請高手們指點迷津! 還有一個問題想請教，當我以直接路徑開啟dBASE和PARADOX table時 上述三種table operation 無法work；想請問方法如何，因為找過一些資料，都沒有得到解答，只好上網來請教大家，請大家幫助我，給我點提示~ 程式我上傳了~謝謝~~麻煩大家了~~

第一次回應 ... 不知道能否解決你的問題 我想的方法不是用 SQL COMMAND 處理的 因為基本上, dBase 及 Paradox 都是檔案 所以你要用 Copy ... 可以用最簡單的 FileCopy 方式完成 SQL Server 的 Copy, 你所下的 SQL Command 我試過是可以的. 另外, 測了一下 dBase 的 copy, dBase 的 SQL Command 應該是不支援 INTO 這個字的. 希望對您有幫助

DbiQInstantiateAnswer(hStmt,hQryCur,PChar(TblName),PChar(dbtype), True,@hNewCur) 可以直接將Sql之查詢結果存成Paradox或Dbase或Text檔 查查Help看看吧

回應 FrederickPau 先生:可是我測SQLserver會出現以下錯誤... 順帶一提,我用的是 SQL 7.0    

database properties中的select into/bulk copy須勾選，才能使用select into 語法。見SQL Server 的book online，查"sp_dboption"

我也是用 SQL Server 7.0 的 依照你所看到的錯誤訊息 你可以用在 master 這個 DB 裡下 sp_option DBName, 'select into', True 這樣就把 select into 這個 option 開起來 你可以再試試

首先謝謝 FrederickPau、 ccchen、 payne 先生小姐的回答，  感恩唷~ 我已經解出點選'> >讀取連線的> > '' DBtype = 'STANDARD'>找同目錄中同名的所有類型檔案 while iFindResult = 0 do begin if copyfile(pchar(database1.Directory SearchRec.Name), pchar(database1.Directory co_table_name extractfileext(SearchRec.Name)), false) then 找到檔案就copy一份 showmessage(SearchRec.Name ' copy 成功') else showmessage(SearchRec.Name ' copy 失敗'); iFindResult := FindNext(SearchRec); end; FindClose(SearchRec); end; end; end; 發表人 - littlefactor 於 2002/11/06 16:57:34

不過我後來發現 copy: table_string := 'select * into '+ co_table_name+' from '+ table_name; SQL.Add(table_string); ExecSQL; 雖然可以複製ACCESS,SQL的table structure和data 但是index沒有複製到... 不知道有高手知道複製index的方法嗎??

引言: 不過我後來發現 copy: table_string := 'select * into ' co_table_name ' from ' table_name; SQL.Add(table_string); ExecSQL; 雖然可以複製ACCESS,SQL的table structure和data 但是index沒有複製到... 不知道有高手知道複製index的方法嗎?? < face="Verdana, Arial, Helvetica"> 您可以參考這一個範例程式: http://delphi.ktop.com.tw/topic.php?TOPIC_ID=18972 用程式取出Table的欄位與索引結構 ～～～Delphi K.Top討論區站長～～～