(4) + 1
присоединюсь
COMОбъект на тонком клиенте работает
&НаКлиенте
Процедура ПриОткрытии(Отказ)
MyCon = Новый COMОбъект ("ADODB.Connection");
MyCon.Open ("Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\1.MDB");
MyCat=Новый COMОбъект ("ADOX.Catalog");
MyCat.ActiveConnection = MyCon;
Для Каждого MDBТаблица Из MyCat.Tables Цикл
Если MDBТаблица.Type="TABLE" Тогда
Сообщить(MDBТаблица.Name);
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой