Форум: "Базы";
Текущий архив: 2007.03.11;
Скачать: [xml.tar.bz2];
ВнизDBCC CHECKDB, DBCC DBREINDEX Найти похожие ветки
← →
VadimSpb (2006-12-17 11:48) [0]Добрый день!
Как вернуть всю информацию о результатах выполнения данных запросов, выполненных программно?
← →
sniknik © (2006-12-17 13:10) [1]также как результат от PRINT через коллекцию ошибок (чем сообщения и являются, только с низким приоритетом)
например такprocedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
Recordset: _Recordset;
V: OleVariant;
begin
ADOConnection1.Close;
ADOConnection1.CursorLocation:= clUseServer;
ADOConnection1.ConnectionString:= "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False";
Recordset:= ADOConnection1.Execute("DBCC CHECKDB (""tempdb"", NOINDEX)");
while not (stOpen in ADOConnection1.State) do;
while true do begin
for i:= 0 to ADOConnection1.Errors.Count-1 do
Memo1.Lines.Add(IntToStr(ADOConnection1.Errors[i].NativeError)+ ADOConnection1.Errors[i].Description);
try
if Recordset = nil then Exit
else Recordset:= Recordset.NextRecordset(V);
except
for i:= 0 to ADOConnection1.Errors.Count-1 do
Memo1.Lines.Add(IntToStr(ADOConnection1.Errors[i].NativeError)+" : "+ADOConnection1.Errors[i].Description);
Exit;
end;
end;
end;
← →
sniknik © (2006-12-17 13:13) [2]блин, не обратил внимания... а что в MySQL тоже есть DBCC CHECKDB? тогда [1] может не получится, ввиду различий (если они есть) передачи сообшений в ADO.
← →
VadimSpb (2006-12-17 13:25) [3]Сорри, я ошибся, конечно MS SQL!
Исправлять сообщения на форуме нельзя?
Спасибо за ответ, проверю.
← →
sniknik © (2006-12-17 13:30) [4]> Сорри, я ошибся, конечно MS SQL!
ну тогда считай повезло, для MySQL я обычно не отвечаю, не знаю его настолько чтобы отвечать.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2007.03.11;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.042 c