Форум: "Базы";
Текущий архив: 2003.12.16;
Скачать: [xml.tar.bz2];

Вниз

Не удается найти %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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.007 c