Доброго всем!

Создал и настроил VPN-соединение на компе. Клацаешь по ярлычку, нажимаешь подключиться и все работает.

Вопрос - можно ли выполнить это же самое подключение программно??? Т.е. заходит пользователь в 1С-ку, нажимает кнопочку и если VPN-соединение не установлено, то оно устанавливается??? Ну и разумеется, если можно, вариант как именно это реализовать!

(0) вот неймется ...

например бесплатной прогой хStarter

(1) что такое, надоел уже?

А все она - АВТОМАТИЗАЦИЯ!!!

(2) и чего она умеет?

http://www.xstarter.com/rus/

у меня по расписанию например устанавливается впн, качается файл и разрывается соединение

(6) А что служит "активацией" этих действий??? Т.е. по какому событию начинается этот алгоритм?

расписание, вход в ОС, засыпание компа и etc.

(7) ну к кнопке 1с прицепи на выполение файл запуска впн

(8) не совсем то...мне то нужно по нажатию кнопочки в 1С-ке.

Т.е. в идеале было бы просто установить соединение командой в консоли. А уж эту команду в 1С-ке выполнить проще простого.

Может знает кто как это сделать?

из 1с создаешь файл-флаг, xStarter видит файл- запускает задачу и удаляет файл

(9) как???

(12) >> Клацаешь по ярлычку, нажимаешь подключиться и все работает

трудно файл из 1це запустить? в параметрах запуска там емнип есть чтоб на кнопку не тыкать, а сразу подключение, погугли

(12) ЗапуститьПриложение()

(14) да это понятно, что "ЗапуститьПриложение()".

Что именно запускать вы мне скажите??? я не могу найти объект для запуска. НУ есть у меня ярлык ВПН-соединения, а где сам ОБЪКТ к которому он привязан??? Когда смотрю в свойствах пишет "Объект:" + шестнадцатиричная ссылка.

(15) вот поэтому я предложил вариант :)

из 1с тоже не смог понять как запустить PPTP/L2TP соединение

+ даже если я запускаю этот самый ярлык, то мне все-равно нужно еще нажать там "подключить"! А как без этого?

(16) а как ты там настроил подключение ?

(18) в настройке подключения можно и без этого сделать

(19) в "параметры набора номера" снять галку "запрашивать имя, пароль, сертификат"

(0) xstarter, autoit, automate, sikuli...

А зачем все так сложно?
Стандартная утилита rasdial из консоли отлично все запустит.

в закладку

(23) примерчик можно?!

(25) Ничего сложного
rasdial "Имя подключения" "Имя пользователя" "Пароль"

(0) ща придет smaharbA и 20 способов напишет :)

v8: Вкл. Выкл соединения VPN

(28)
отлично

"
Включить
КомандаСистемы(rasdial "ИМЯ_VPN_СОЕДИНЕНИЯ_В_WINDOWS" "ИМЯ_ПОЛЬЗОВАТЕЛЯ" "ПАРОЛЬ");
Выключить
КомандаСистемы(rasdial /disconnect);
"

а как еще перед этим проверить подключено соединение на данный момент или нет?!

(29) круто работает :)
ТАм ток при отключении вот так нужно:

КомандаСистемы(rasdial "ИМЯ_VPN_СОЕДИНЕНИЯ_В_WINDOWS" /disconnect);

остается вопрос - "а как еще перед этим проверить подключено соединение на данный момент или нет?!" ????

(31) например проверить доступность айпишника на том конце vpn соединения

(32) ну эт понятно, что проще всего "ping" пустить. И я даже из 1С могу его пустить через "КомандаСистемы()" вот только как ответ получить???

(31)а ты второй раз не подключишься, если соединение ужЕ установлено.

(34) если оно уже подключено и выполняешь эту команду, то она просто пишет "соединение уже установлено". Но пишет то в консольке...этого ответа в 1С-ке я не получу.

Ну эт конечно в идеале хорошо получать этот ответ...попробую пока без него.

(35) rasdial ... >C:\log.txt
дальше парсиш текстовик...