| hongbin
30390
|
2007/7/14 22:05:24 |
| SQLDMORestoreSink 控件是什么，那个大哥有传一份给我。谢谢。ecoming@sina.com |
| fly_hong_924
20385
|
2005/12/27 16:19:13 |
| 为什么这个文件 SQLDMO.dll 我都加载不上去的？？？ |
| onlysword
15330
|
2005/6/1 20:22:14 |
| SQLDMORestoreSink 控件的安装文件在那那啊?????????? |
| lj520
14379
|
2005/4/27 11:12:53 |
| 为什么我愎复的时候出错误??? |
| hotfire1258
13347
|
2005/3/19 21:45:35 |
| 收藏、研究，楼主辛苦了。 |
| piao40993470
12913
|
2005/2/28 9:19:03 |
to newyj
谢谢，加了[]后没问题了，呵呵！ |
| piao40993470
12912
|
2005/2/28 9:04:30 |
to newyj
用ShowMessage看过了，只要路径中带空格就出错，不带空格正确。
SQLDMO会自动截断到空格的部分，备份和恢复都是这样 |
| newyj
12903
|
2005/2/27 21:35:16 |
如果数据库和备份文件没错 ,估计是你没有 rt := CoRestore.create;
var
r: _Restore;
x: QueryResults;
i, j: integer;
begin
r := CoRestore.Create;
r.Database := ComboBox2.Text;
r.Files := edit4.Text;
//得到文件信息 最好放到grid里
x := r.ReadFileList(sv);
if x <> nil then
begin
for j := 1 to x.Columns do
begin
memo1.lines.Add('col'+x.ColumnName[j]);
for i := 1 to x.Rows do
memo1.Lines.Add(x.GetColumnString(i, j))
end
end;
memo1.Lines.Add(r.StandbyFiles);
memo1.Lines.Add(r.MediaName);
memo1.Lines.Add(r.Devices);
// SQLDMORestoreSink1.Connect(r);
// r.SQLRestore(sv);
memo1.Lines.Add(r.DatabaseFiles);
memo1.Lines.Add(r.DatabaseFileGroups);
end; |
| vagrant
12870
|
2005/2/26 13:41:58 |
用SQLDMORestoreSink1控件来还原数据库来出错？
RT:_Restore
try
RT.Database := 'RTRT';
RT.Action :=0;
RT.Files := edit1.Text;
SQLDMORestoreSink1.Connect((RT));
RT.SQLRestore(sv);
Forms.Application.MessageBox(PChar('恭喜，数据库还原份成功'),PChar('系统提示'),MB_OK+MB_ICONINFORMATION)
except
on E:Exception do
Forms.Application.MessageBox(PChar('还原过程出现错误，错误信息如下：'+#13+#13+E.Message),PChar('系统提示'),MB_OK+MB_ICONERROR)
end; |
| newyj
12857
|
2005/2/25 21:35:55 |
to piao40993470
加个 []
bk.Files :='['+ edit1.Text+']'; |
| piao40993470
12847
|
2005/2/25 15:26:03 |
| 路径中包含空格会出错！ |
