Dim obj
Dim con
Set obj = CreateObject("V82.COMConnector")
Set con = obj.Connect("File=""E:\base\test""; Usr=""Администратор"";")
msgbox(con.metadata.version)
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой