• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Получение Internet Host и Domain Names

  • Автор темы morpheus
  • Дата начала
M

morpheus

Brief Description: Get Internet Host And Domain Names Using (2) Hidden Properties Of The Notessession Class
Contributor: Andrew Jones

Код:
Sub Click(Source As Button)
Dim s As New NotesSession
Dim msg$
msg$ = msg$ & "Domain Name: " & s.InternetDomainName & Chr(13)
msg$ = msg$ & "Host Name: " & s.InternetHostName
Msgbox msg$, 0, "Undocumented NotesSession Functions"
End Sub

 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!