(UTC)
(Группа Модераторов: 1c++ moderator)
‹ Предыдущая Тема | Следующая Тема ›
Переключение на Главную Страницу Страницы: 1 [2]  ОтправитьПечать
Горячая тема (более 10 ответов) Запросы к другой БД из 1С (число прочтений - 6629 )
Trasher
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 10
Зарегистрирован: 03. Мая 2007
Re: Запросы к другой БД из 1С
Ответ #15 - 04. Мая 2007 :: 08:38
Печать  
Цитата:
А не проще  Код:

RS = СоздатьОбъект("ODBCRecordSet");
ТЗ = RS.ВыполнитьИнструкцию("Select что-то from [ТвояБаза].[dbo].ТвояТаблица", , 1)

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


Arta большое спасибо.
Так я без проблем подрубился и вывел в ТЗ данные из запроса.

2 Salimbek:
С твоим вариантом такая же ситуация, т.е. я не могу подрубиться никак, такое ощущение, что где-то в строке соединения ошибка
  
Наверх
 
IP записан
 
Loko
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 13
Зарегистрирован: 01. Мая 2008
Пол: Мужской
Re: Запросы к другой БД из 1С
Ответ #16 - 27. Января 2009 :: 15:45
Печать  
здравствуйте! кто-нить подскажет где имено ошибка в коде, указанном в первом посте? та же беда.  но решение от arta не подходит.
  
Наверх
 
IP записан
 
Salimbek
God Member
*****
Отсутствует



Сообщений: 862
Зарегистрирован: 06. Июня 2006
Пол: Мужской
Re: Запросы к другой БД из 1С
Ответ #17 - 27. Января 2009 :: 16:58
Печать  
Loko писал(а) 27. Января 2009 :: 15:45:
здравствуйте! кто-нить подскажет где имено ошибка в коде, указанном в первом посте? та же беда.  но решение от arta не подходит.

Не знаю, что у Вас за проблемы... так работает:
Код
Выбрать все
	глБД = СоздатьОбъект("ODBCDataBase");
	СтрокаСоединения = "Driver={SQL ;";
	глБД.Соединение(СтрокаСоединения);
	Если глБД.ЕстьСоединение()=1 Тогда
		глРС = СоздатьОбъект("ODBCRecordSet");
		глРС.УстБД(глБД);
	Иначе
		Предупреждение("Ошибка доступа к Базе данных",7);
		Сообщить(СтрокаСоединения);
		СтатусВозврата(0);
		Возврат;
	КонецЕсли;
	ТекстЗапроса = "select * from users where Name='"+СокрЛП(глПользователь)+"'
	| and Station='"+ПользовательСКЛ+"'";
	ТЗ = СоздатьОбъект("ТаблицаЗначений");
	Попытка
		глРС.ВыполнитьИнструкцию(ТекстЗапроса,ТЗ,1);
	Исключение
		Сообщить("Получили исключене");
		СтатусВозврата(0);
		Возврат;
	КонецПопытки;

З.Ы. глБД и глРС должны быть глобальными переменными
  
Наверх
ICQ  
IP записан
 
Loko
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 13
Зарегистрирован: 01. Мая 2008
Пол: Мужской
Re: Запросы к другой БД из 1С
Ответ #18 - 28. Января 2009 :: 00:26
Печать  
Salimbek, спасибо. заработало.

p.s. в  коде из первого поста надо было поменять driver и (!) убрать все пробелы в строке соединения.
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1 [2] 
ОтправитьПечать
‹ Предыдущая Тема | Следующая Тема ›
 
  « Главная ‹ Раздел Вверх  



Valid RSS Valid XHTML Valid CSS Powered by Perl Source Forge