Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
Добрый день! Существует некая самописная конфигурация на 1С 7.7 sql версия. Необходимо в нее закачивать данные из таблиц sql удаленного сервера. Создано VPN соединение. Нужно по данному VPN подключиться к sql серверу по локальному адресу и запустить на исполнение программу. Вся проблема в том, что не очень хорошо понимаю как сделать это подключение. Большая просьба оказать помощь. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 11:38 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
Lana_SVДобрый день! Существует некая самописная конфигурация на 1С 7.7 sql версия. Необходимо в нее закачивать данные из таблиц sql удаленного сервера. Создано VPN соединение. Нужно по данному VPN подключиться к sql серверу по локальному адресу и запустить на исполнение программу. Вся проблема в том, что не очень хорошо понимаю как сделать это подключение. Большая просьба оказать помощь. куча примеров в топике -как загрузить из/в скуль 1с. а впн для 1с прозрачна -тебе главное знать имя или айпи сервера. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 11:39 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
Zerro, Я смотрела форум, своего случая я не нашла, может что-то не так понимаю. Делаю подключение к vpn ПРоцедура УстановитьСвязьССервером() SqlSrv = CreateObject("ADODB.Connection"); SqlSrv.ConnectionTimeout = ConnectionTimeout; SqlSrv.CommandTimeout = CommandTimeout; ConnectionString = "FileDSN="+сокрЛП(DSN)+";UID="+СокрЛП(UID)+";PWD="+ СокрЛП(PWD)+";APP="+APP; SqlSrv.ConnectionString = ConnectionString; Попытка SqlSrv.Open(); сообщить("Соединение установлено"); Исключение сообщить("При соединение произошла ошибка ("+ОписаниеОшибки()+")"); КонецПопытки; КонецПроцедуры ConnectionTimeout =15 ; CommandTimeout =600 ; // DSN="\\host\d\Base.1c\1creplication_v.dsn"; UID="Product"; APP="1С"; PWD="ProductVita"; Не могу понять как теперь подключиться к локальному sql-серверу ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 11:56 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
linked may be ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 14:39 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
Last1Cmen, Весь вопрос в том, можно ли подключать VPN из 1С? Подключить, забрать данные с нужного сервера и разорвать VPN? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 16:10 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
VPN - это только тунель, его не надо вручную устанавливать, он "сам поднимается" при обращении к нужному узлу по другую сторону впна. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 16:16 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
Kreontsa, Дело в том, что нам не нужен этот VPN. Данные будут забираться не так часто, и не очень хорошо, если это соединение будет все время висеть. Настраивать его каждый раз перед очередым забором тоже не есть хорошо. Вот поэтому встал вопрос о подключении VPN через 1С ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 16:25 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
И возник еще один насущный вопрос. Подскажите ..... Подключаюсь к удаленному серверу, запускаю определенную процедуру на исполнение: RS.Open("exec sp_StoreReport1C -1, 2011, 10"), получаю ответ. Теперь вопрос: как к уже полученным данным сделать еще один select? SqlSrv = CreateObject("ADODB.Connection"); SqlSrv.ConnectionTimeout = ConnectionTimeout; SqlSrv.CommandTimeout = CommandTimeout; ConnectionString = "FileDSN="+СокрЛП(DSN)+";UID="+СокрЛП(UID)+";PWD="+ СокрЛП(PWD)+";APP="+APP; SqlSrv.ConnectionString = ConnectionString; Попытка SqlSrv.Open(); Сообщить("Соединение с сервером успешно установлено."); исключение Сообщить("При установлении соединения с сервером возникли ошибки! ("+ОписаниеОшибки()+")"); Возврат; КонецПопытки; RS = CreateObject("ADODB.Recordset"); RS.ActiveConnection = SqlSrv; RS.CursorType = 1; RS.LockType = 4; RS.Open("exec sp_StoreReport1C -1, 2011, 10"); ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.10.2011, 17:51 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
Lana_SVИ возник еще один насущный вопрос. Подскажите ..... Подключаюсь к удаленному серверу, запускаю определенную процедуру на исполнение: RS.Open("exec sp_StoreReport1C -1, 2011, 10"), получаю ответ. Теперь вопрос: как к уже полученным данным сделать еще один select? SqlSrv = CreateObject("ADODB.Connection"); SqlSrv.ConnectionTimeout = ConnectionTimeout; SqlSrv.CommandTimeout = CommandTimeout; ConnectionString = "FileDSN="+СокрЛП(DSN)+";UID="+СокрЛП(UID)+";PWD="+ СокрЛП(PWD)+";APP="+APP; SqlSrv.ConnectionString = ConnectionString; Попытка SqlSrv.Open(); Сообщить("Соединение с сервером успешно установлено."); исключение Сообщить("При установлении соединения с сервером возникли ошибки! ("+ОписаниеОшибки()+")"); Возврат; КонецПопытки; RS = CreateObject("ADODB.Recordset"); RS.ActiveConnection = SqlSrv; RS.CursorType = 1; RS.LockType = 4; RS.Open("exec sp_StoreReport1C -1, 2011, 10"); тут же не закрывая соединеения делай хоть 500селектов..или я что то не понимаю? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.10.2011, 07:05 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
не понимаешь она хочет селект из селекта ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.10.2011, 09:54 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
sWinTyz, Да, правильно, селект из селекта. Это возможно? Пока все мои попытки это воплотить не дали результата ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.10.2011, 10:13 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
Lana_SVsWinTyz, Да, правильно, селект из селекта. Это возможно? Пока все мои попытки это воплотить не дали результата это можно сделать двумя способами: 1) Сказать, что бы переписали хранимую процедуру, что бы она возвращала готовый набор. 2) Обойти набор и при обходе фильтровать уже как угодно. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.10.2011, 10:36 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
DmitriyZ, А других вариантов нет? Процедура, получает довольно сложный отчет, он необходим в другом месте именно в таком виде. Делать еще одну процедуру, никто в ближайшем будущем не будет. Обойти ее и напрямую брать данные тоже не вариант. Т.к. это не просто селект к таблице ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.10.2011, 10:45 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
DmitriyZ, Сейчас не вижу другого выхода, как запихивать результат в таблицу и уже ее обрабатывать ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.10.2011, 10:46 |
|
||
|
1С 7.7 VPN соединение
|
|||
|---|---|---|---|
|
#18+
А вчем собственно проблема то Результат EXEC вствляйте во временную таблицу или табличную переменную и делайте свой запрос. Что то типа SET NOCOUNT ON declare @t table(t1 int,t2 int,t3 int) insert into @t exec sp_StoreReport1C -1, 2011, 10 select t1 from @t where t2=123 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.10.2011, 10:50 |
|
||
|
|

start [/forum/topic.php?fid=28&msg=37481969&tid=1520934]: |
0ms |
get settings: |
8ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
57ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
54ms |
get tp. blocked users: |
1ms |
| others: | 222ms |
| total: | 375ms |

| 0 / 0 |
