Привет всем.
Помогите разобраться с проблемой. Стоит задача: залесть в БД Oracle и вытащить инфу из одной таблицы.
Есть скрипт соединения

Функция СоединениеСБД()
   Соединение=Новый COMОбъект ("ADODB.Connection");
   ConnectionString = "Provider=msdaora;Data Source=Source;User Id=USER;Password=PASS;";
   Соединение.ConnectionTimeOut =600;
   Соединение.CursorLocation = 3;
   try
       Соединение.Open(ConnectionString);  
   except
       Сообщить("Невозможно установить соединение");
  endtry;
  Возврат(Соединение);
КонецФункции    

при запуске скрипта в режиме предприятие нет никаких ошибок, просто закрывается 1С.
В режиме отладки доходит до строки Соединение.Open(ConnectionString);
дальше закрывается 1С. В чем может быть проблема?

Соединение.ConnectionTimeOut =600;
   Соединение.CursorLocation = 3;

закоменти это для начала

(1)
Не помогло, выкинуло...

Попробуй аппаратное ускорение графики уменьшить.
Без шуток...

+(3) И режим поставь 800х600 SVGA в безопасном режиме.
Без шуток...

(3) Я новичек, но не до такой же степени что протереть монитор и почистить мышку чтобы соединиться с Ораклом =)

(5) Ты попробуй сначала...

(5) Ну ты может и не до такой степени, а вот Оракл знатный капризуля.

(5) попробуй (3) на всякий, в 1с есть такой глюк, тока я не вижу в этой ситуации связи...

Ребят, будут еще мнения?

(9) ты попробовал (3) ?

(9) не из 1с по этой строке подключения подключится можешь?

Тут мне еще подсказывают что в место i3 Celeron 1600 поставить ото толстый клиент возможно быстро отрабатывает этот скрипт. =)

Заведи ODBC линк на этот оракл

(0) И еще из екселя попробуй те же строчки, с какой ошибкой вывалятся

(11) А как можно проверить?

(15) В екселе набей макрос
Private Sub CommandButton1_Click()
   Dim Con1 As New ADODB.Connection
   Con1.Open "Provider=msdaora;Data Source=Source;User Id=USER;Password=PASS;"
   Con1.Close
   msgBox "Success"
End Sub

(16) ORA-12154: TNS: невозможно разрешить имя службы

Спасибо, теперь хоть понятно что строка не подключается, ото просто выкидывало...

(10)
Это шутка была серьезной?

(19) Это была не шутка.
1с на ителовском встроенном видео на максимуме аппаратного ускорения, бывает, вылетает.
Сам офигел, когда в первый раз увидел.

*интеловском

Попробуй вместо Provider=... и Data Source=...
указать Driver={Microsoft ODBC for Oracle};Server=ТвойIP;Database=ТвояБаза

(22)+ Server=IPСервера

строку вобще например так собери, вроде работало

Соединение = Новый COMОбъект("ADODB.Connection");
Соединение.ConnectionString = "Provider=MSDAORA;Password="+pwd+";User ID="+uid+";Data Source="+database+";Persist Security Info=True;CharSet=AMERICAN_AMERICA.CL8MSWIN1251;";

http://www.connectionstrings.com/sql-server

(25) ну так уж тогда, http://www.connectionstrings.com/oracle
автору оракл надо

(26) Логично. Не ту ссылку скопировал.

(17) Ну так показывай теперь фрагмен файла tnsnames.ora как у тебя там имена прописаны

(0) Выкидывай msdaora (и odbc) и ставь родной клиент. Можно Instant Client, с дополнительными телодвижениями строго по инструкции.

Говорю как ораклист со стажем.

(29) а деньги где взять на клиента родного?

(30) С каких пор он стоит денег?

(30) Инстанс клиент безплатен

(32) Полный тоже.

Рабочий код соединения:
где
-(Oracle in instantclient10_2 ) - драйвер в системных источниках данных
- VOracle - Имя драйвера

Устанавливал instantclient10_2.

----------------------------------

Соединение = Новый COMОбъект("ADODB.Connection");
Соединение.ConnectionString = "DRIVER={Oracle in instantclient10_2};Data Source=VOracle;User ID="+ЛогинSiebel+";Password="+ПарольSiebel+";";
Соединение.CursorLocation = 3;
Соединение.Open();

RS = Новый COMОбъект("ADODB.Recordset");
RS.CursorType = 1;
Command = Новый COMОбъект ("ADODB.Command");
       
Command.CommandText = "ALTER SESSION SET NLS_DATE_FORMAT = 'DD-MM-YYYY HH:MI:SS'";
Command.ActiveConnection = Соединение;
Command.CommandType = 1;
Command.Execute();

Command.CommandText = "текст запроса"; // ваш запрос

Command.Execute();
RS = Command.execute();
   
RS.movefirst();

-- далее перебор
Пока НЕ RS.EOF() Цикл
    // обработка полученных данных по RS.<ИмяПоля>.name и RS.<ИмяПоля>.Value

    RS.MoveNext();                          
КонецЦикла;

(0) сделай udl файл и попробуй соединится через него, если получится скопируй строку подключения оттуда.
Если не получается - шамань с драйверами и клиентами оракла.

ЗЫ однажды мучались с такой фигней: то работает то не работает. А у нас был кластер из трех серверов. Оказалось что админы установили дрова на одном, а про остальные два забыли.

(23) Теперь выругался по другому:

{ОбщийМодуль.АвтоматизацияКиви.Модуль(25)}: Значение не является значением объектного типа (Execute)
    НаборЗаписей = Соединение.Execute(ЗапросПоДатеИСумме);

(24)
... Ошибка при вызове метода контекста (Execute)
    НаборЗаписей = Соединение.Execute(ЗапросПоДатеИСумме);
по причине:
Произошла исключительная ситуация (ADODB.Connection): Операция не допускается, если объект закрыт.

(29)
Достаточно будет если только на сервере 1С предприятия поставить клиента Oracle?

(38) если обращение будет идти только из серверных модулей

(36,37) ну так не закрывай соедининие, держи его открытым

(40) В коде нету команды на закрытие соединения, но ошибка осталась.

(39) Понял

(41)  если это соединение и ты его кладешь в хранилище, где оно например живет больше 15 минут, или какой у твоего оракла настроен таймаут, то это уже не соединение адодб, а неопределено, а у неопределено нет метода. Ехекьюте.

Понятно?

а зачем так много букв и объектов.
Там
соединение.open();
recordset=соединение.execute(sqlзапрос);
recordset.movefirst();
while not(recordset.eof)
{
val = recordset.field(fieldname).value;
  recordset.movenext();
}
и вроде как и все

М... В каком месте их много?

в 34

А, ну да