一個簡易可查詢MS SQL Server的表格, 欄位等資訊的小程式 |
|
Wesly
中階會員 發表:14 回覆:103 積分:53 註冊:2002-05-31 發送簡訊給我 |
透過ADO連接MS SQL Server, 可觀看表格, 欄位等資訊.
|
Wesly
中階會員 發表:14 回覆:103 積分:53 註冊:2002-05-31 發送簡訊給我 |
|
P.D.
版主 發表:603 回覆:4038 積分:3874 註冊:2006-10-31 發送簡訊給我 |
|
Wesly
中階會員 發表:14 回覆:103 積分:53 註冊:2002-05-31 發送簡訊給我 |
對不起, 不是我不想公佈Source Code, 只是內部使用到一些公用程式及特殊元件, 因為是公司的所以公佈後怕會造成一些困擾.
基本上當初我的構想是模擬BDE的部份功能, 使得在ADO時可以隨時轉換Catalog, 且去記錄其登錄MS SQL的方法, 帳號及密碼, 不必每次去記錄及設定, 所以這些設定都會存在ADOConneciton.ini內, 它是一個隱藏檔。若是有設定密碼, 程式會自動加密。
有"關資料庫相關資訊"是利用 TADOConnection.OpenSchema 去取得資料, 至於OpenSchema這個方法個人認為還不錯, 至少我不必去安裝其它元件就可以達到簡易查詢資料庫的Schema.
至於工具內的索引檔重整, 檔案壓縮, 備份, 這些是MS SQL Server的特殊指令(至少我這麼認為, 因為小弟我其它資料庫沒有試過), 所以只能給MS SQL Server使用, 我有在MS SQL Server 7.0 及 2000測過, 似乎沒有問題, 這也解決我客戶LOG檔不斷增大的問題.
我本來的另一個構想是想透過此一程式去建立SQL的建立表格, 修改表格及刪除表的語法, 但在此小弟還有些問題, 所以沒有包在內.
至於網路->廣播, 我之所以會使用, 是因為想通知網路上的芳鄰訊息, 是利用Net Send, 但又經過這幾天的測試發現似乎對Win 98無效, 我不知道為什麼, 還在查原因中. 版主, 個人有一個小問題, 若針對此程式若我有修改時, 可不可以重傳? 還是要另外開一個版面? 謝謝
|
pigbaby
初階會員 發表:2 回覆:84 積分:47 註冊:2002-09-02 發送簡訊給我 |
|
Wesly
中階會員 發表:14 回覆:103 積分:53 註冊:2002-05-31 發送簡訊給我 |
如果不透過OpenSchema, 其實TADOConnection就已提供該功能
取得表格名稱
ADOConnection1.GetTableNames(lbxTableName.Items, False);
取得欄位名稱
ADOConnection1.GetFieldNames(lbxTableName.Items[lbxTableName.ItemIndex], lbxFieldName.Items);
取得索引
ADOTable1.TableName := lbxTableName.Items[lbxTableName.ItemIndex];
ADOTable1.GetIndexNames(lbxIndexFile.Items);
至於相關參數, 請參照Online Help
本程式在Delphi 6.0下完成. 希望能對你有所幫助.
|
pigbaby
初階會員 發表:2 回覆:84 積分:47 註冊:2002-09-02 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |