| » | Казахстанский Бухгалтерский форум www.balans.kz | подключение из к внешней базе данных |
|
Показать сообщения: Начиная со старых .::. Начиная с новых |
|||
| Автор: | Сергей3 |
| Добавлено: | #1 Чт Фев 19, 2009 17:12:12 |
| Заголовок сообщения: | подключение из к внешней базе данных |
Надо подключиться к внешней базе данных (oracle), возможно ли это и где посмотреть принципы? |
|
| Автор: | сергей3 |
| Добавлено: | #2 Чт Фев 19, 2009 17:18:51 |
| Заголовок сообщения: | |
блин че за фигня Надо подключиться из 1с к oracle. как это делается и где посмотреть |
|
| Автор: | Фигня |
| Добавлено: | #3 Чт Фев 19, 2009 22:00:38 |
| Заголовок сообщения: | |
Ась, звали меня? :D |
|
| Автор: | Технический |
| Добавлено: | #4 Чт Фев 19, 2009 22:08:35 |
| Заголовок сообщения: | |
сергей3 а вы искали? |
|
| Автор: | Фигня |
| Добавлено: | #5 Чт Фев 19, 2009 23:56:13 |
| Заголовок сообщения: | |
Мне так думаеццо, что Сергею3 надо Олю искать. В смысле OLE-объект :D - и там - подключайся не хочу :lol: |
|
| Автор: | Фигня |
| Добавлено: | #6 Пт Фев 20, 2009 00:05:04 |
| Заголовок сообщения: | |
DataBaseConnection = Новый COMObject("ADODB.Connection"); Кодировка = "windows-1251"; DataBaseConnection.ConnectionString = "Provider=MSDASQL.1;Password=" + Password + ";Persist Security Info=True;CharSet=" + Кодировка + ";User ID=" + Login + ";Data Source=" + DataSourse; DataBaseConnection.Open(); И ВСЕ! Дальше пошли RecordSet-ы :) |
|
| Автор: | Фигня |
| Добавлено: | #7 Пт Фев 20, 2009 11:11:51 |
| Заголовок сообщения: | |
Эх, как обычно - просто так меня позвали :lol: ... Вчера был пожар, все срочно, а сегодня уже не надо. Ладно, пойду тогда... |
|
| Автор: | Сергей3 |
| Добавлено: | #8 Пт Фев 20, 2009 13:02:34 |
| Заголовок сообщения: | |
Фигня )) СПАСИБО а то в поиске только и нашел первую строку (создание "оли") а как дальше них ферштейн а пример RecordSet для открытия view с параметрами (дата1,дата2) и выборке всех строк из нее не подкинешь? бо я вообще в базах данных даже на delphi не програмил |
|
| Автор: | Фигняяя |
| Добавлено: | #9 Пт Фев 20, 2009 17:17:30 |
| Заголовок сообщения: | |
RecordPrice = DataBaseConnection.Execute("SELECT itg.get_prices('ЛаЛаЛа', 2, 3, '2008-12-12') FROM " + Table); If RecordPrice.Fields.Count > 0 Then ЧтоТо = RecordPrice.Fields[0].Value; EndIf; |
|