app老大来之前,我先回答一下
原理就是利用sql server的'sp_attach_db 过程
转一个帖子
------------------------------------
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2009890
SQL server2000+DELPHI5.0安装制作
procedure TInstallDbForm.OkBtnClick(Sender: TObject);
var
fName: String;
begin
fName := dName.Text;
try
ADOConnection1.Connected := True;
adodataset1.CommandText:='select db_id(''' + edDbName.Text + ''')';//数据库是否已经安装
adodataset1.Active:=true;
if adodataset1.Fields[0].AsInteger = 0 then
begin
adodataset1.Active:=false;
//将数据库安装上去.
ADOCommand1.CommandText :=
'sp_attach_db ''' + edDbName.Text + ''' , ' + '''' + dName.Text + ''' , ' + '''' + dLog.Text + '''';
ADOCommand1.Execute;
Info.Caption := '安装成功!请关闭窗口。';
end else
begin
Info.Font.Color := clRed;
Info.Caption := '数据库 ' + edDBName.Text + ' 已存在!';
end;
except
ADOConnection.Connected:=false;
adodataset1.Active:=false;
end;
end;
再状一个
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1048756
请教如何将SQL Server数据库一起打包?
再转一个
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1769449
Delphi+SQL的备份恢复问题。