Текущий архив: 2003.12.16;
Скачать: CL | DM;
Вниз
Не удается найти %1 Найти похожие ветки
← →
chtr © (2003-11-25 10:05) [0]Что это за ошибка такая (OLEException)?
Выходит в последней строке кода:
procedure TForm1.N8Click(Sender: TObject);
var
fn:string;
begin
con.Close;// con - adoconnection
con.DefaultDatabase:="";
con.Open;
fn:="c:\documents and settings\Вова\Мои документы\1.bkp";
if opendialog1.Execute then fn:=opendialog1.FileName;
runcmd("restore database garantsql from disk = "+quotedstr(fn));//Используется TADOCommand.execute
con.Close;
con.DefaultDatabase:="garantsql";
opentables;//открываются таблички
end;
Если закомментировать Opendialog, все работает. Пробовал открывать таблицы вне этой процедуры, ошибка все равно выходит. Даже не знаю где искать. Что за ошибка???
← →
Anatoly Podgoretsky © (2003-11-25 10:08) [1]А не двойные ли кавычки требуются?
← →
chtr © (2003-11-25 10:11) [2]Говорю же, без opendialog, с явным указанием имени файла, все работает на ура.
← →
Reindeer Moss Eater © (2003-11-25 10:12) [3]Твой OpenDialog меняет текущий каталог родительского процесса
← →
chtr © (2003-11-25 10:21) [4]
> Reindeer Moss Eater © (25.11.03 10:12) [3]
Где же ты вчера был? :)))
Thanks!
Страницы: 1 вся ветка
Текущий архив: 2003.12.16;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.019 c
