Connection = CreateObject("ADODB.Connection");

подключаюсь к базе1
Все нормально.
отконекчивась.

Connection.Close();
Connection = 0;
Connection = CreateObject("ADODB.Connection");

Если хочу отключиться и подключиться к такой же, но другой.
Ругается что база занята.

Мне в цикле нужно перебрать десяток баз.
Как реализовать ?

не убивать объект ?

Всмысле ?
//Connection = 0;
так - тоже самое.

Microsoft OLE DB Provider for ODBC Drivers: [ODBC Firebird Driver]operating system directive CreateFile failed
Процесс не может получить доступ к файлу, так как этот файл занят другим процессом.

(3)
Так может и в самом деле файл занят другим процессом?
Или вот, например, так бывает:
http://tracker.firebirdsql.org/browse/CORE-3558

(0) вот можно покурить:
про ADO http://www.askit.ru/custom/progr_admin/m13/13_01_ado_basics.htm

подключение с обходом recordset http://www.progmans.net/1s/113-1s77-soedinenie-s-sql-server-podklyuchenie-k-sql-server-adodb-connection-recordset-activeconnection-pryamoj-sql-zapros-k-baze-obxod-rekordseta.html

http://pro1c.org.ua/index.php?showtopic=2111

СПС. Это все скурено уже.
Похоже на то что  драйвер ADODB одноразовый.
Даже если вызвать обработку 2-й раз но с другой строкой подключения, то вылетает по ошибке.

(4) нет, не занят

Попробуй через "вставку" на VbScript - с ним ADODB работает достаточно стабильно, и в VbScript есть команда Erase для превращения объекта в неизвестно что.

(8) подскажи рыбу

(8) Да. Спасибо.
VBS - отработало как нужно.

Dim Connection
Dim sql_query
Dim objFSO, objOutFile
Dim intCount, i
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objOutFile = objFSO.OpenTextFile("T:\label.txt", 8, True)

sql_query = "Select id,n,cp from label where year=2013"
set Connection = CreateObject("ADODB.Connection")

Connection.ConnectionString = "Driver=Firebird/InterBase(r) driver;Dbname=T:\BD1.GDB;CHARSET=NONE;PWD=masterkey;UID=SYSDBA;Client=T:\gds32.dll"
Connection.Open
objOutFile.Write Connection.Properties.Item(0).Name & " = " & Connection.Properties.Item(0).Value & vbCrLf
Set RecordSet = Connection.execute(sql_query)
intCount = RecordSet.Fields.Count
do while not RecordSet.eof
   objOutFile.Write RecordSet.Fields(0).Value & " " & RecordSet.Fields(1).Value & " " & RecordSet.Fields(2).Value & vbCrLf
   RecordSet.MoveNext
loop
Connection.close

Connection.ConnectionString = "Driver=Firebird/InterBase(r) driver;Dbname=T:\BD2.GDB;CHARSET=NONE;PWD=masterkey;UID=SYSDBA;Client=T:\gds32.dll"
Connection.Open
objOutFile.Write Connection.Properties.Item(0).Name & " = " & Connection.Properties.Item(0).Value & vbCrLf
Set RecordSet = Connection.execute(sql_query)
intCount = RecordSet.Fields.Count        
do while not RecordSet.eof
   objOutFile.Write RecordSet.Fields(0).Value & " " & RecordSet.Fields(1).Value & " " & RecordSet.Fields(2).Value & vbCrLf
   RecordSet.MoveNext
loop
Connection.close

странно

Все понятно, не в этом дело , а в том что я вызываю библиотеку драйвера из того же каталога что и база.
Этот файл как раз и занят.
Если его вызывать из одного любого каталога то все работает штатно.
Connection.ConnectionString = "Driver=Firebird/InterBase(r) driver;Dbname=Т:\ + СокрЛП(Кат_GDB) + "\BD.GDB"  + ";CHARSET=NONE;PWD=masterkey;UID=SYSDBA;Client=T:\gds32.dll";

а так не хочет:

Connection.ConnectionString = "Driver=Firebird/InterBase(r) driver;Dbname=Т:\ + СокрЛП(Кат_GDB) + "\BD.GDB"  + ";CHARSET=NONE;PWD=masterkey;UID=SYSDBA;Client=Т:\ + СокрЛП(Кат_GDB) + "\gds32.dll";

нужно выгружать DLL
Делаю >tasklist /M gds32.dll
Вызывается окно завершения 1С.

самомо собой, причину

причина taskkill /FI "MODULES eq gds32.dll"

(16) надо найти в чем разница

к вопросу v8: Кто как "отключает" подключенную по ОЛЕ базу 1с77 ?