如何保存數(shù)據(jù)庫連接參數(shù)代碼及步驟詳解
以Microsoft SQL Server 為例,連接串就類似于:
Provider=SQLOLEDB.1;Password=map;Persist Security Info=True;
User ID=map;Initial Catalog=SuperWorkFlow;Data Source=GTSERVER
連接串中各項(xiàng)參數(shù)由分號(hào)(;)分隔,具體含義如下:
Provider —— 驅(qū)動(dòng)類型;
Data Source —— 服務(wù)器名稱;
Initial Catalog —— 數(shù)據(jù)庫名稱;
User ID —— 用戶名;
Password —— 口令;
Persist Security Info —— 是否使用持續(xù)安全驗(yàn)證。
現(xiàn)在我們所要做的第一件工作是將各項(xiàng)參數(shù)寫入一個(gè)INI文件中。
Windows INI文件,可解釋為Windows初始化文件。它是一種專門用來保存應(yīng)用程序初始化信息和運(yùn)行環(huán)境信息的文本文件。例如Windows 3.1中兩個(gè)著名的INI文件win.ini和system.ini就在Windows啟動(dòng)時(shí)定義了Windows環(huán)境中鼠標(biāo)響應(yīng)速度、使用的外殼(shell)程序等設(shè)置,Windows系統(tǒng)附帶的許多應(yīng)用程序也都有自己的INI文件。Windows軟件初始化參數(shù)的獲取與保存是通過讀取擴(kuò)展名為INI的文本文件實(shí)現(xiàn)的,即程序運(yùn)行前先從制定的INI文件中搜索到所需的參數(shù),并反映到程序的運(yùn)行環(huán)境中,當(dāng)程序退出時(shí)又將當(dāng)前的環(huán)境參數(shù)保存到制定的INI文件中。
INI文件是文本文件,由若干section組成,在每個(gè)帶括號(hào)的標(biāo)題下面,是若干個(gè)Keyword和一個(gè)等號(hào),每個(gè)Keyword會(huì)控制應(yīng)用程序某個(gè)功能的工作方式,等號(hào)右邊的Value制定Keyword的操作方式,其一般形式如下:
以下為引用的內(nèi)容:
[section1]
keyword1=value1
keyword2=value2
[section2]
keyword1=value1
keyword2=value2
其中SectionName和KeywordName分別是段名和關(guān)鍵字明,Value為關(guān)鍵字對(duì)應(yīng)的設(shè)定值,如果等號(hào)右邊無任何內(nèi)容(value為空),表示W(wǎng)indows應(yīng)用程序已為該Keyword指定了缺省值,如果在整個(gè)文件中找不到某個(gè)Keyword,同樣表示為它們指定了缺省值,各Section所出現(xiàn)的順序是無關(guān)緊要的,在每一個(gè)Section里,各個(gè)Keyword的順序同樣也無關(guān)緊要,Keyword的值的類型多為String或Integer,應(yīng)分兩種情況讀寫。
INI文件的書寫有嚴(yán)格的要求:
1、Section的名稱必須加以“[”和“]”,且“[”必須在屏幕的第一列。
2、Keyword名稱也必須從屏幕的第一列開始書寫,且后面必須緊跟“=”
3、可以對(duì)文件加以注釋,每行注釋須以“;”開頭。
依照上述規(guī)則,我們編寫下面的INI文件存儲(chǔ)數(shù)據(jù)庫的連接信息:
以下為引用的內(nèi)容:
[dbParam]
Data Source=GTSERVER
Initial Catalog=SuperWorkFlow
User ID=map
Password=map
下面要做的工作就是編寫代碼,在程序執(zhí)行的時(shí)候從INI文件中讀取數(shù)據(jù)庫連接參數(shù),為此,我編寫了下面的代碼:
以下為引用的內(nèi)容:
//RWini.pas
{
模塊名稱:配置文件讀寫
編寫人:blue
編寫日期:2003-4-26
模塊功能:
從系統(tǒng)配置文件中讀取系統(tǒng)運(yùn)行所需的各項(xiàng)參數(shù)
將系統(tǒng)運(yùn)行所需的各項(xiàng)參數(shù)寫入系統(tǒng)配置文件
生成數(shù)據(jù)庫連接字符串
}
unit RWini;
interface
uses INIFiles;
const strINIname = 'db.ini';//INI文件的文件名,大家根據(jù)具體情況修改
var
iniParam : TINIFile;
strLocal : String;
procedure readParam(out server:String;
out database:string;out user:string;out password:string);
procedure writeParam(server:string;database:string;
user:string;password:string);
function getConnStr:string;
implementation
procedure readParam(out server:String;
out database:string;out user:string;out password:string);
begin
//從配置文件中讀取數(shù)據(jù)庫連接參數(shù)
server := iniParam.ReadString('dbParam','Data Source','');
database := iniParam.ReadString('dbParam','Initial Catalog','');
user := iniParam.ReadString('dbParam','User ID','');
password := iniParam.ReadString('dbParam','Password','');
end;
procedure writeParam(server:string;database:string;
user:string;password:string);
begin
//將數(shù)據(jù)庫連接參數(shù)寫入配置文件
iniParam.WriteString('dbParam','Data Source',server);
iniParam.WriteString('dbParam','Initial Catalog',database);
iniParam.WriteString('dbParam','User ID',user);
iniParam.WriteString('dbParam','Password',password);
end;
function getConnStr:String;
var
server,database,user,password : String;
begin
//生成數(shù)據(jù)庫連接串
readParam(server,database,user,password);
result := 'Provider=SQLOLEDB.1;
Password=' + password + ';Persist Security Info=True;
User ID=' + user + ';Initial Catalog=' + database + ';
Data Source=' + server;
end;
initialization
getDir(0,strLocal);
niParam := TINIFile.Create(strLocal + '\' + strINIname);
finalization
iniParam.Free;
end.
在程序數(shù)據(jù)模塊的Create事件中添加下面的代碼:
以下為引用的內(nèi)容:
procedure TDM.DataModuleCreate(Sender: TObject);
var
confForm : TConf;
begin
conn.ConnectionString := RWini.getConnStr;
try
conn.Open;
except
on Err : EOLEException do
begin
confForm := TConf.Create(self);
confForm.ShowModal;
end;
end;
end;
這樣,在程序執(zhí)行過程中,將自動(dòng)從INI文件中讀取數(shù)據(jù)庫連接參數(shù),連接數(shù)據(jù)庫,如果連接出現(xiàn)錯(cuò)誤,將顯示參數(shù)配置窗口,讓用戶配置數(shù)據(jù)庫連接參數(shù)。配置窗口的代碼如下:
以下為引用的內(nèi)容:
//上面的代碼省略
uses RWini;
{$R *.dfm}
procedure TConf.FormShow(Sender: TObject);
var
sServer,sDatabase,sUser,sPassword : String;
begin
readParam(sServer,sDatabase,sUser,sPassword);
self.edtServer.Text := sServer;
self.edtDatabase.Text := sDatabase;
self.edtUser.Text := sUser;
self.edtPassword.Text := sPassword;
self.ActiveControl := self.btnOK;
end;
procedure TConf.btnCancelClick(Sender: TObject);
begin
close;
end;
procedure TConf.btnOKClick(Sender: TObject);
var
sServer,sDatabase,sUser,sPassword : String;
begin
sServer := self.edtServer.Text;
sDatabase := self.edtDatabase.Text;
sUser := self.edtUser.Text;
sPassword := self.edtPassword.Text;
writeParam(sServer,sDatabase,sUser,sPassword);
close;
end;
本文關(guān)于如何保存數(shù)據(jù)庫連接參數(shù)代碼及步驟詳解的問題給大家做了詳細(xì)的總結(jié),希望對(duì)大家能夠有所幫助。
【編輯推薦】
- 學(xué)習(xí)基于SQL數(shù)據(jù)庫的算法
- 詳解SQL Server數(shù)據(jù)庫的文件恢復(fù)技術(shù)
- SQL Server數(shù)據(jù)庫連接中常見的錯(cuò)誤分析