Доброго дня всем форумчанам!!!
Сталкнулась со следующей проблемой: при переходе с 32 на 64 Ось перестал срабатывать скрипт(отсоединяющий всем полдьзователей от базы и далее выгрузка). По совету сделали http://forum.infostart.ru/forum14/topic33442/,теперь на соединение не ругается,но и ниего похоже не делает далее. И обмен данными тоже перестал срабатывать,выдает
При попытке соединения с COM-сервером произошла следующая ошибка:
{Обработка.УниверсальныйОбменДаннымиXML(13656)}: Ошибка при вызове конструктора (COMОбъект): Отказано в доступе.


Текст скрипта привожу ниже
'VBS. Cкрипт осуществляет отключение всех подключений к ИБ 1С:Предприятия v8.1.
'На сервере подразумевается наличие только одного кластера и только одного рабочего процесса
'имя пользователя 1С:Предприятия
UserName = "Администратор"
'пароль пользователя 1С:Предприятия
UserPass = "Пароль"
'имя сервера 1С
ServerName     =     "10.6.1.200"
BaseName    =    "Base"
'Удаление всех соединений заданной ИБ сервера 1С
Dim Connector
Dim AgentConnection
Dim Cluster
Dim WorkingProcess
Dim WorkingProcessConnection
Dim ibDesc
Dim connections
Dim ConnectString
Set connector = CreateObject("V81.COMConnector")
Set AgentConnection = Connector.ConnectAgent(ServerName)
Set Cluster = AgentConnection.GetClusters()(0)
AgentConnection.Authenticate Cluster, "", ""
Set WorkingProcess = AgentConnection.GetWorkingProcesses(Cluster)(0)
ConnectString = WorkingProcess.HostName & ":" & WorkingProcess.MainPort
Set WorkingProcessConnection = Connector.ConnectWorkingProcess(ConnectString)
WorkingProcessConnection.AddAuthentication UserName, UserPass
Set ibDesc = WorkingProcessConnection.CreateInfoBaseInfo()
ibDesc.Name = BaseName
Connections = WorkingProcessConnection.GetInfoBaseConnections(ibDesc)
Dim i
Dim Connection
For i = LBound(Connections) To UBound(Connections)
   set Connection = connections(i)
   If (Connection.AppID <> "COMConsole") then
       WorkingProcessConnection.Disconnect Connection
   End if
Next
Set oShell = CreateObject("WScript.Shell")
oShell.Exec("C:\Program Files (x86)\1cv81\bin\1cv8.exe  CONFIG /S10.6.1.200\Base /NАдминистратор /PПароль /DumpIB путь куда")

Обмен осуществляется одновременно в базу 8.2 и 8.1, в 8.2 срабатывает нормально,com-соединение по нему создается как и ранее. проблема именно с соединением 81,оказалось более капризной )))