Макросы и программы для Excel в категории «Сеть и оборудование»

Макросы и программы для работы с оборудованием в локальной сети (ping, telnet, smtp)
  • Поиск трасс и просмотр ресурсов оборудования
    Программный комплекс, предназначенный для автоматизации учёта и администрирования сети связи телефонной или телекоммуникационной компании. Программа позволяет хранить и редактировать базу данных объектов (в виде файлов Excel), просматривать существующие трассы и формировать новые.   Особенность программы - возможность учёта и администрирования узлов связи с нестандартными...
  • Public Function Ping(ByVal ComputerName As String) As Boolean ' возвращает TRUE, если пинг прошел Dim oPingResult As Variant For Each oPingResult In GetObject("winmgmts://./root/cimv2").ExecQuery _ ("SELECT * FROM Win32_PingStatus WHERE Address = '" & ComputerName & "'") If IsObject(oPingResult) Then If oPingResult....
  • Программа содержит 4 модуля класса, позволяющие при помощи несложного кода подключаться к различному оборудованию по протоколу Telnet, и выполнять требуемый набор команд. Команды могут включать в себя значения из диапазона ячеек листа Excel, или же загружаться из внешнего файла. Примерно так можно задать настройки подключения к конкретному оборудованию: Function UNIT() As Telnet_Equipment '...
  • Надстройка предназначена для облегчения управления сетевым оборудованием и диагностики локальной сети из Excel.   Надстройка будет полезна, если информация об оборудовании (IP-адреса, логины и пароли) хранится в книгах Excel. Вы сможете получить доступ к часто используемым действиям из контекстного меню Excel. В частности, прямо из контекстного меню ячейки можно запустить в консоли PING...
  • Самый простой способ получить IP-адрес машины, зная имя хоста, - применить функцию ResolveAddress: Function ResolveAddress(ByVal ComputerName$) As String ' выполняет ICMP запрос (ping) до адреса ComputerName ' возвращает IP-адрес ComputerName$ Dim oPingResult As Variant: On Error Resume Next For Each oPingResult In GetObject("winmgmts://./root/cimv2").ExecQuery _...
  • Отправленное макросом письмо с копией изменённого файла в архиве
    Программа предназначена для отправки копии обрабатываемого файла (в виде архива) на заданный адрес электронной почты. Особенности программы: используется отправка письма средствами Windows (без использования почтовых программ) (в качестве адреса отправителя можно использовать любой адрес почты) перед отправкой файл архивируется (создаётся архив ZIP средствами Windows, без применения...
  • Макрос определения страны и IP адреса по доменному имени
    Макрос предназначен для вывода IP адресов и названий стран, на основании столбца с доменными именами. В прикреплённом файле - 2 способа реализации: 1) по доменному имени определяется IP адрес (посредством команды PING - выполнения ICMP запроса), а затем определяется страна (по IP адресу), с использованием сервиса smart-ip.net 2) используется только сервис smart-ip.net Отправляется запрос на...