ADO: Удалить прилинкованную таблицу

[Nicky]

Я правильно понимаю, что удалить линк на таблицу в сторонней базе можно просто дропнув таблицу (а по сути линк) в целевой? Проверил, вроде работает, линк дропает, источник нет. Но хотелось бы узнать, правильно это или есть более коррэктный способ. Линкую так (фрагмент):

Код: Выделить всё

Function ADOCreateTableLink(sLinkBase As String, sLinkTable As String, ...) As Boolean
  Dim cat As New ADOX.Catalog, tbl As New ADOX.Table
  On Error GoTo er

  cat.ActiveConnection = cn
  tbl.Name = sLinkTable
  Set tbl.ParentCatalog = cat
 
  tbl.Properties("Jet OLEDB:Link Datasource") = sLinkBase
  tbl.Properties("Jet OLEDB:Remote Table Name") = sLinkTable
  tbl.Properties("Jet OLEDB:Create Link") = True
  cat.Tables.Append tbl
 
  ADOCreateTableLink = True
  GoTo ok

er:
  sErr = Err.Description
ok:
  Set cat = Nothing
End Function


[GSerg]

Я правильно понимаю, что удалить линк на таблицу в сторонней базе можно просто дропнув таблицу (а по сути линк) в целевой? Проверил, вроде работает, линк дропает, источник нет.

По прочтении сего потерял нить желаемого автором.

[Nicky]

Что непонятного? Прилинковал таблицу, теперь хочу избавиться от линка. Дропать или не дропать - вот чем не вопрос?

[lord0n]

Что непонятного? Прилинковал таблицу, теперь хочу избавиться от линка. Дропать или не дропать - вот чем не вопрос?

Жесть, что то я не понял тебе что нужно убить линк или саму таблицу?

[VVitafresh]

Что непонятного? Прилинковал таблицу, теперь хочу избавиться от линка. Дропать или не дропать - вот чем не вопрос?

Дропать. Ничего страшного не произойдет: линк исчезнет, реальная таблица останется.

[Nicky]

Жесть, что то я не понял тебе что нужно убить линк или саму таблицу?

Что непонятного? Прилинковал таблицу, теперь хочу избавиться от линка.

[Konst_One]

если удалить исходную таблицу, то линк в другой базе на нее все равно останется, только ошибку будет давать приобращении

[Nicky]

Ок, спасибо. Дропать, так дропать!

[GSerg]

Какой же всё-таки бред в этом топике.

Nicky, прикинь, я до сих пор не понимаю, что и откуда тебе надо удалить. А совет Konst_One (который, как я сильно подозреваю, вообще не к месту) только ещё больше всё запутал.

[Konst_One]

серж, но мы то друг друга поняли, а ты это к чему

[Nicky]

Что непонятного?

Есть база c:\base1.mdb, в ней таблица t1. Есть база c:\base2.mdb, в ней таблица t2. Я прилинковал таблицу t2 к базе base1.mdb. Т.е., когда я открываю базу c:\base1.mdb в Access, я вижу в ней две таблицы: t1 и t2 (ёмаё, кому я объясняю?), при чем таблица t2 отображается с такой стрелочкой... черной... слева направо..., что указывает на то, что таблица является прилинкованной. Теперь я хочу удалить из базы c:\base1.mdb связь с таблицей t2 базы c:\base2.mdb. Внимание вопрос: cn.Execute "Drop table t2" (при условии, что cn as ADODB.Connection, и подключена к c:\base1.mdb) - необходимое и достаточное для этого действие?

[GSerg]

Я даже сомневаюсь, что вы друг друга поняли.

[Nicky]

...А совет Konst_One (который, как я сильно подозреваю, вообще не к месту) только ещё больше всё запутал...

Не, все к месту.

если удалить исходную таблицу, то линк в другой базе на нее все равно останется, только ошибку будет давать приобращении

А линк после этого убивается так же? Drop?

[GSerg]

<ненужное поскипано>
Теперь я хочу удалить из базы c:\base1.mdb связь с таблицей t2 базы c:\base2.mdb. Внимание вопрос: cn.Execute "Drop table t2" (при условии, что cn as ADODB.Connection, и подключена к c:\base1.mdb) - необходимое и достаточное для этого действие?

Ну да, всё правильно, вы не поняли друг друга.
Konst_one, вполне очевидно, говорил о дропе исходной таблицы, а тебе нужен только линк.
Не знаю, будет ли этого достаточно, т.к. и добавляю, и дропаю линкованные таблицы через ADOX. Но по логике, будет.
И нет, дропать исходник не надо.

[Konst_One]

у как заморочено, но главное теперь все разобрались

[Nicky]

GSerg, ты чего? Все мы поняли. Konst_one просто указал на возможные проблемы, я эти проблемы уже заметил, но мне они не будут мешать, если верно, что:

А линк после этого убивается так же? Drop?

А можно заценить твой способ через ADOX, т.к. думаю, что так все же более по науке?