SQL SERVER 日志清理

2011-05-30 10:38:12 作者:闹猴在线 来源:闹猴在线 浏览次数:0 网友评论 0

SQL SERVER 日志清理函数

procedure TForm1.ClearBtnClick(Sender: TObject);
var
  Query:TAdoQuery;
begin
  try
    Query.ConnectionString:=连接字符串;
    Query.SQL.Clear;
    Query.SQL.Add('backup log ['+数据库名+'] with no_log ');
    Query.SQL.Add('dbcc shrinkdatabase(['+数据库名+'])');
    Query.ExecSQL;
    Query.Close;
    Query.Free;
  except
    Query.Close;
    Query.Free;
  end;
end;



关键词:SQLSERVER

[错误报告] [推荐] [收藏] [打印] [关闭] [返回顶部]

  • 验证码:

最新图片文章

最新文章

赞助商推荐