Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Программирование, связанное с MS Office > Excel&Oracle

Автор: Тиль 20.5.2008, 11:40

Конекчусь к Ораклу из Экселя

Код


Sub init()
    Set cn = New ADODB.Connection

  If cn.State = adStateClosed Then
             cn.Open "Provider=MSDAORA.1;Password=пароль;User ID=Логин;Data Source=(DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(Host = айпишник)(Port = 1521)))(CONNECT_DATA = (SID = сид из тнс-ки)))"
       End If
 
End Sub

Не коннектит пишет что операция завершена по таймауту.