Перейти до

FreeLine

Сitizens
  • Всього повідомлень

    384
  • Приєднався

  • Останній візит

Все, що було написано FreeLine

  1. FreeLine

    Нужна сеть, Полтава

    Пару лет назад, общался с человечком который живет рядом, а может это он и был... Вообще хотели они себе сеть, мы были согласны все растянуть и запустить... Очень долго все обговаривали но так ничего и не придумали... З.Ы. Если твой знакомый найдет рядом с собой несколько единомышленников нуждающихся в интернете, думаю сможем помочь и организовать небольшую локалку и интернетом...
  2. FreeLine

    Всё для сетей

    А сотрудники Вам не нужны...?
  3. FreeLine

    сетевые автонастройки

    а по топику: dhcp не вариант? а как быть если абон захочет руками прописать IP и как назло попадет на тот который уже кому то роздан конфликт айпи, абон (то чей айпишник забрал продвинутый юзер)))в шоке крик "за что я плачу!" Для этого и придумали умные свичи и привязку IP к порту... У родителей дома "Триолан", раньше по ДХЦП давал настройки с привязкой к маку! А сейчас сделали лучше, настройки все статические и на порту стоит привязка к IP, так что в квартире могу подключать любой ПК, настройки вбил и все работает и не нужно звонить и говорить что так и так поменяйте мак, а то настройки не выдает...
  4. FreeLine

    сетевые автонастройки

    В целом какбе неплохо, но вот нюанс, а что если у пользователя Виста или 7-рка? ) Так же проблема, если уже есть VPN/dialup подключение, то создается ВПН-через ВПН, т.е. один пункт не учтен Я тоже думаю про это Все будет, возможности AutoIt огромные, так что буду пробовать!!! И скрипт создания самого подключения переделаю, этот не правильный (тупой)... Сейчас разбираюсь с проверкой существующих подключений...
  5. FreeLine

    сетевые автонастройки

    #include <GUIConstants.au3> ;Opt('MustDeclareVars', 1) Opt("GUIOnEventMode", 1) $Form1 = GUICreate("Настройка сети FreeLine", 186, 266, 469, 333) $Group1 = GUICtrlCreateGroup("Мониторинг трафика:", 8, 152, 169, 105) $Label1 = GUICtrlCreateLabel("IP:", 16, 197, 20, 20) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel(@IPAddress1, 34, 197, 130, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x008000) $Label3 = GUICtrlCreateLabel("ИМЯ ПК:", 16, 176, 57, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label4 = GUICtrlCreateLabel(@ComputerName, 72, 176, 98, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x000080) GUICtrlCreateGroup("", -99, -99, 1, 1) $Button1 = GUICtrlCreateButton("Создать VPN-подключение", 8, 16, 171, 25, 0) GUICtrlSetOnEvent($Button1, "VPNcreate") $Button2 = GUICtrlCreateButton("Проверить работу сети", 8, 48, 171, 25, 0) GUICtrlSetOnEvent($Button2, "TestLocal") $Button3 = GUICtrlCreateButton("Проверить работу интернета", 8, 80, 171, 25, 0) GUICtrlSetOnEvent($Button3, "TestNet") $Button4 = GUICtrlCreateButton("Получить логин/пароль", 8, 112, 171, 25, 0) GUICtrlSetOnEvent($Button4, "GetLP") GUISetState(@SW_SHOW) GUISetOnEvent($GUI_EVENT_CLOSE, "OnExit") While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd ;--------------- Функции --------------- ;~ TestLocal Func TestLocal() $var = Ping("192.168.0.1", 5) If $var Then ; also possible: If @error = 0 Then ... Msgbox(64,"Статус","ОНЛАЙН! Время ответа: " & $var & " мс.") Else Msgbox(16,"Статус","Сеть недоступна!") EndIf EndFunc ;~ TestLocal Func TestNet() $var = Ping("google.ru", 1000) If $var Then ; also possible: If @error = 0 Then ... Msgbox(64,"Статус","ОНЛАЙН! Время ответа: " & $var & " мс.") Else Msgbox(16,"Статус","Сеть недоступна!") EndIf EndFunc ;~ Exit Func OnExit() Exit EndFunc ;~ Получение Л/П Func GetLP() MsgBox(64, "ERROR", "СКОРО БУДЕТ!") EndFunc ;~ Создание VPN Func VPNcreate() Run ( "rundll32.exe netshell.dll,StartNCW" ) WinWaitActive("Мастер новых подключений") Send("{ENTER}") Send("{DOWN}") Send("{ENTER}") Send("{DOWN}") Send("{ENTER}") Send("FreeLine") Send("{ENTER}") Send("192.168.1.1") Send("{ENTER}") Send("{SPACE}") Send("{ENTER}") Run ( "control netconnections" ) WinWaitActive("Сетевые подключения") EndFunc Вот, пре-альфа-бета скриптика
  6. Я розумний, та мене хвилює і ваша думка... AutoIT - це щось неймовірне!!!

  7. FreeLine

    сетевые автонастройки

    Autoit облегчит жизнь многим... Вчера начал писать скриптик для своих пользователей, все очень легко и работает супер... http://ru.wikipedia.org/wiki/AutoIt http://www.autoitscript.com/autoit3/ http://autoit-script.ru/
  8. FreeLine

    Свитч на 8 портов + сфп

    http://hotline.ua/tx/tp-link_tl-sl2210web/?tab=2
  9. FreeLine

    Подключение абонентов (Wi-Fi)

    Не секрет, в Полтаве...
  10. FreeLine

    Подключение абонентов (Wi-Fi)

    Видимость прямая! Деревья не мешаю! Сколько Мбит можно будет выдавить, если использовать ASP-17 у клиентов и ASP-24 на базовой точке...?
  11. День добрый!!! Нужно подключить 3-х абонентов, есть четыре Dlink 2100 и антенны ASP-17. На сколько я понимаю то для клиентов хватит таких антенн, а для базовой точки...? Посоветуйте как правильно сделать? Хочется максимум выжать на таком расстоянии... Спасибо!!!
  12. FreeLine

    Коммутаторы на линк 100м.

    Возьми Compex’ы... Хотя должен линк в сто метров нормально работать и на ДеЛинках и ТеПеЛинках...
  13. FreeLine

    Нужен транспорт

    boryspil.net
  14. FreeLine

    Samba

    А я думаю что топикастеру, стоит поменять ник...((( З.Ы. Сорри за офф.топ.
  15. прайсик на freez88 (at) bk.ru
  16. FreeLine

    Mikrotik + Free Billing

    2Sanchezz Не понял о чем ты...(
  17. FreeLine

    Mikrotik + Free Billing

    Есть: Сервер доступа – Mikrotik RouterOS 2.9.6 PPPTP-сервер – для авторизации пользователей DHCP-сервер – раздает адреса с привязкой по mac`ам Simple Queues – режет скорость Требования для биллинга: Включение и отключение пользователей при соответствующем балансе. Переадресация на страницу с сообщение об отрицательном балансе. 1 помегабайтный и 5 безлимитных тарифов. Пользовательская статистика. Отчеты по оплатам за месяца. Что можете предложить?
  18. FreeLine

    Mikrotik + Free Billing

    Сколько денег?
  19. FreeLine

    Mikrotik + Free Billing

    Неа, не сделал...( Вот на выходных снова шаманил... Но увы ничего не получается...( Не понимаю я эти иксы, обидно блин...(
  20. FreeLine

    Win2003 не выходит в интернет!

    не понял...( разве не достаточно этого 32 chain=srcnat src-address=192.168.0.10 action=masquerade Да, он отключен...
  21. FreeLine

    Win2003 не выходит в интернет!

    Ребята, ну что никто не подскажет что делать????
  22. FreeLine

    Win2003 не выходит в интернет!

    Файрвол без правил, а вот НАТ:
  23. FreeLine

    Win2003 не выходит в интернет!

    С файрволом все правильно, а вот трассировка не радует...(
  24. День добрый! Помогите разобраться с проблемой! Есть шлюз на Микротике, клиентские машины (Windows XP SP2-SP3) и сервер на котором крутится 1С и файловые шары (Windows 2003 Server R2 SP2). Клиентские машины ходят в интернет без проблем (как через маскарад, так и через прокси). А вот сервер в упор отказывается выходить в интернет, пинги на шлюз проходят, а дальше нет. Через прокси так же отказывается работать. Что делать??? Нужно обновлять и систему и антивирус! Ну с антивирусом ещё куда не шло, можно и с локальном машины обновить, а вот с обновлениями системы решить ничего не могу… Помогите!!!
  25. А фізична особа підприємець З.Ы. Сорри за офф-топ....
×
×
  • Створити нове...