{Форма.ФормаВыбора(41)}: Ошибка при вызове метода контекста (Execute): Произошла исключительная ситуация (ADODB.Connection): Операция не допускается, если объект закрыт.
       Выборка = Соединение.Execute(ТекстЗапроса);
по причине:
Произошла исключительная ситуация (ADODB.Connection): Операция не допускается, если объект закрыт.

Перем КлиентСоап;
Перем Ошибка;

Процедура Кнопка1Нажатие(Элемент)
   
   Статус = Инициализация(Сервер, Пользователь, Пароль);
   ТЗ = ВыполнитьЗапросКБазе(КлиентСоап, ТекстЗапроса,)
   
КонецПроцедуры

Функция Инициализация(Сервер,Пользователь,Пароль)
   
   СтатусВозврата = Истина;
   Попытка
       КлиентСоап = Новый COMObject("ADODB.Connection");
       
       СтрокаСоединение = "DRIVER={MySQL ODBC 5.1 Driver};SERVER="+Сервер+";DataBase=users;UID="+Пользователь+";PWD="+Пароль+""; //{MySQL ODBC 3.51 Driver}
       КлиентСоап.ConnectionTimeOut = 600;
       КлиентСоап.ConnectionString = (СтрокаСоединение);
       КлиентСоап.Open();
       
       Ошибка = "ОК";
       СтатусВозврата = Истина;
   Исключение
       
       Ошибка = "Ошибка подключения: "+описаниеошибки();
       СтатусВозврата = Ложь;
   КонецПопытки;
   
   Возврат СтатусВозврата;
   
КонецФункции

Функция ВыполнитьЗапросКБазе(Соединение, ТекстЗапроса, ЭтоВыборка=Истина)
   
   Если не ЭтоВыборка Тогда
       Соединение.Execute(ТекстЗапроса,80);
       Возврат Неопределено;
   Иначе
       Выборка = Соединение.Execute(ТекстЗапроса);
   КонецЕсли;
   
   ТаблицаДанных = Новый ТаблицаЗначений;
   
   СтрокаСообщения = "";
   Для каждого Поле из Выборка.Fields Цикл
       ИмяПоля = Поле.Name;
       ТаблицаДанных.Колонки.Добавить(ИмяПоля);
   КонецЦикла;
   
   Если не Выборка.EOF Тогда
       // не пустая выборка
       Выборка.MoveFirst();
       Пока не Выборка.EOF Цикл
           НС = ТаблицаДанных.Добавить();
           НомерПоля = 0;
           Для каждого Поле из ТаблицаДанных.Колонки Цикл
               НС[Поле.Имя] = Выборка.Fields.Item(НомерПоля).Value;
               НомерПоля = НомерПоля+1;
           КонецЦикла;
           Выборка.MoveNext();
       КонецЦикла;
   КонецЕсли;
   
   Возврат ТаблицаДанных;
КонецФункции

это ты хвастаешься?

При попытке Open выдает ошибку

(2) Было бы чем)

(4) ОписаниемОшибки() можешь ещё

>ConnectionTimeOut = 600
увеличь до 6000 ;)

КлиентСоап.Open(СтрокаСоединение);

Главное данные ввожу правильные

(7)Тоже самое

(6) Что оно даст?)

(10) 10 минут - это очень мало
а кому ты, кстати, возвращаешь СтатусВозврата?

(11)Позже для проверки надо будит

статус = истина?

(12) почему не сейчас? кого оно будит?

СтатусВозврата = Истина;
   Если Статус = Неопределено Тогда
       Попытка
           КлиентСоап = Новый COMObject("ADODB.Connection");
           Статус = Статусы.Создан;
           
           Пользователь = Параметры.Пользователь;
           Пароль = Параметры.Пароль;
           Сервер = Параметры.Сервер;
           СтрокаСоединение = "DRIVER={MySQL ODBC 5.1 Driver};SERVER="+Сервер+";DataBase=users;UID="+Пользователь+";PWD="+Пароль+""; //{MySQL ODBC 3.51 Driver}
           КлиентСоап.ConnectionTimeOut = 600;
           КлиентСоап.ConnectionString = (СтрокаСоединение);
           КлиентСоап.Open();
           Статус = Статусы.Подключен;
           Статус = Статусы.Авторизирован;
           
           Ошибка = "ОК";
           СтатусВозврата = Истина;
       Исключение
           
           Ошибка = "Ошибка подключения: "+описаниеошибки();
           СтатусВозврата = Ложь;
       КонецПопытки;
   КонецЕсли;
   
   Возврат СтатусВозврата;

в общем, я без описания ошибки дальше отказываюсь разговаривать

(16) --> (0)

Или еще одно описание сделать ?

(17) -> (3)

(3)--> (0) )

А не так разве надо?

Процедура Кнопка1Нажатие(Элемент)
   
   Статус = Инициализация(Сервер, Пользователь, Пароль);
   Если Статус Тогда
       ТЗ = ВыполнитьЗапросКБазе(КлиентСоап, ТекстЗапроса);
   КонецЕсли;        
       
КонецПроцедуры

(20) (3)<>(0)

и ответь на (13)

а если так: Соединение.Open(СтрокаСоединения)

Соединение = КлиентСоап

Ошибка подключения, как я поняла, но я ввожу все данные правильно

(25) смотри (7) и (9)

(25)so slow((

(13)Ложь

(29) пиши как в (21). Это раз)
а два, ройся в строке подключения. косяк только там

пользователь с пробелом, м.б.

строку подключения из отладчика в студию, пожл

(30)Сделала как в (21) Статус = Ложь

(33) ну, это понятно) теперь хоть ошибку не выдает)

http://s019.radikal.ru/i603/1209/35/486d92bd50af.jpg

мисс, хва прикалываться))) строку полностью :) и можно не скрином)

http://s05.radikal.ru/i178/1209/96/93f78cdaef52.jpg

имя сервер известно?

+(38) мож не нравится 127.0.0.1? Обратись по имени

Вот что Ошибка в отладке пишет

Ошибка подключения: {Форма.ФормаВыбора(23)}: Ошибка при вызове метода контекста (Open): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][Диспетчер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию

(40) здесь нужен Капитан О

(41) Это кто такой?)

(42) это тот, кто скажет тебе, что нужно указать правильно источник данных и драйвер

(43)А как узнать какой у меня драйвер?

(44) а что руководило тобой, когда ты писала "DRIVER={MySQL ODBC 5.1 Driver}"?

Имя Базы Test ип адрес 127.0.0.1

(45)Это не я писала, нашла готовый образей

Образец

(46) дык на кой ты писала юсерс?

(49)То есть вместо юсерса я должна имя базы писать?

(50) капитан в растерянности...

Когда подключаюсь к MeSQL WorkBench, используется ип адрес, юзер, пароль. Вот и я так использую

(50) да

(53)Та же ошибка

драйвер-то установлен, в ODBC проверка подключения прохдит?

если 8.2, юзай внешние истоники тогда лучше)

счас выяснится, что девушка притащила работу в виде базы и обработки домой и рассчитывает, что всё сразу взлетит

автор, у тебя точно база mysql?))) код в (0) где выполняется, какая-платформа

вообще имхо проще ошибки поДключения через остастку odbc ловить, потом когда там ок, уже в 1с)

всё не читал, но текста запроса как-то не увидел...

да какой там текст запроса, нам бы соединение открыть для начала))

Установила драйвер mysql-connector-odbc-5.1.11-winx64 Все та же ошибка, 1С не видит этого драйвера(

Exel тоже не видит

ось какая? 1с в каком режиме работает? версия 1с? если 8.2 УФ где код исполняется? под каким пользователем сервер?

Будут какие предложения, по поводу драйвера?

через odbc удается подключится? ааааффффтор ))

- Платформа 8.1;
- Конфигурация УПП;
- Сервер не под Администратором;

(66)Нет

(68) ну так текст ошибки какой

(69)

Ошибка подключения: {Форма.ФормаВыбора(23)}: Ошибка при вызове метода контекста (Open): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][Диспетчер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию

Сервер локальный

(70)в остнастке odbc панели управления создай источник данных с твоими параметрами и там проверь подключение, если это не работает, дальше нет смысла копать

После установки драйвера, компьютер перегружала

(72) Можно по порядку?

(72)если сервер x64 останток odbc две, 32 и 64 бита

Зашла в панель управления, что искать?

http://imgur.com/sn8tV

Администрирование - Источники данных (ОDBC)?

У меня там только один источник без разряда

odbcad32.exe 64бита и syswow64/odbcad32.exe 32бита

В два верхних поля ввода, что писать?

"Data Source Name@ and "descripion"

имя произвольное, описание необязательно

Нажала Test  - "Сonnection successful"

у тебя код из (0) выполняется на клиенте?

(85) Платформа 8.1

(86)ну фиг знает, может у тебя сервер х64 и фоновое задание

(85) Да на клиенте

(87) Обычная обработка

Драйвер установила под администратором, в 1С работаю под пользователем

(89) http://ul.to/b05r2t5k запусти обработку, там, когда окно откроется, укажи иям источника данных этого, юзваря и пароль, нажми ок - сформириурется строка, попробуй ее подсусуть в adodb в код

(91)если не увидит источник, ставить дравер x32 придется, мне кажется

Имя источника то, которое перед этим создала?

угу

который успешно проверяется)

(94)Куда код подсунуть?

(95)Строку

Там где ""?

в переменную СтрокаСоединение

"Provider=MSDASQL.1;Persist Security Info=False;User ID=root;Data Source=111" - Ошибка

Ошибка подключения: {Форма.ФормаВыбора(23)}: Ошибка при вызове метода контекста (Open): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][Диспетчер драйверов ODBC] В указанном DSN архитектура драйвера и архитектура приложения не соответствуют друг другу.

попробуй зарегистрировать соедиение в 32битной остастке syswow64/odbcad32.exe ...

(101) Мб. скачать драйвер для 32 битной системы?

(101) У меня 32 битной оснастки нет

(103) странно
(102) судя по всему да

http://danila.org.ua/otpravka-sms-iz-1s-turbosms-com-ua/
ссылка на  mysql-connector-odbc-5.1.8-win32.msi
и все работает на вин7

(105) ось 64х