Расчет подсетей из диапазона IP-адресов / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Расчет подсетей из диапазона IP-адресов

49 сообщений из 49, показаны все 2 страниц

все

Расчет подсетей из диапазона IP-адресов

#38518350

IvanC

Гость

Всех с наступившим Новым годом!
Уже второй день мучаюсь одной задачей, но решил уже спросить, когда все варианты закончились.
Есть произвольный диапазон IP-адресов, к примеру: 94.41.167.0-94.41.175.255, он может быть любой, но я пытаюсь вытащить из него все подсети и маски, что-то типа такого: 94.41.167.0/24, 94.41.168.0/21. Но ничего так и не получилось. Может, у кого-нибудь есть идеи? Прошу помочь. Заранее спасибо.

...

Рейтинг:

0 / 0

06.01.2014, 11:37

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518351

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Все - то есть включая в себя все вложенные подсети *.*.*.*/30 ?

...

Рейтинг:

0 / 0

06.01.2014, 11:47

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518352

IvanC

Гость

Нет, в данном конкретном диапазоне получилось только 2. В дальнейшем буду сопоставлять IP-адреса конкретному диапазону

...

Рейтинг:

0 / 0

06.01.2014, 11:51

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518355

qwerty112

Гость

IvanCВсех с наступившим Новым годом!
Уже второй день мучаюсь одной задачей, но решил уже спросить, когда все варианты закончились.
Есть произвольный диапазон IP-адресов, к примеру: 94.41.167.0-94.41.175.255, он может быть любой, но я пытаюсь вытащить из него все подсети и маски, что-то типа такого: 94.41.167.0/24, 94.41.168.0/21. Но ничего так и не получилось. Может, у кого-нибудь есть идеи? Прошу помочь. Заранее спасибо.
почему 24 ?
что вы хотите получить на этих входных данных :
94.41.167.0-94.41.175.255
какой результат должен быть ?

...

Рейтинг:

0 / 0

06.01.2014, 12:06

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518356

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Лично мне тогда не очень понятна задача.
То есть где-то внутри этого диапазона есть самая крупная подсеть, а ближе к краям все более мелкие, вот на это и надо разложить?

...

Рейтинг:

0 / 0

06.01.2014, 12:06

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518358

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

qwerty112почему 24 ?потому что следующую подсеть /23 /22 /21 можно получить только начиная с 94.41.168.*, а это либо фрагмент предыдущей подсети, либо самостоятельная сеть /24

...

Рейтинг:

0 / 0

06.01.2014, 12:11

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518361

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Как я понимаю, это инструмент провайдера по анализу занятых/свободных подсетей для выделения их новым клиентам.

Почти наверняка существуют уже готовые инструменты, почему бы не поискать их?

...

Рейтинг:

0 / 0

06.01.2014, 12:12

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518362

IvanC

Гость

94.41.167.0/24, 94.41.168.0/21 это мне посчитал http://ip-calculator.ru/

...

Рейтинг:

0 / 0

06.01.2014, 12:13

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518364

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Shocker.ProПочти наверняка существуют уже готовые инструменты, почему бы не поискать их?IvanC http://ip-calculator.ru/

...

Рейтинг:

0 / 0

06.01.2014, 12:15

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518365

IvanC

Гость

так мне нужно это реализовать в программе

...

Рейтинг:

0 / 0

06.01.2014, 12:16

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518367

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

IvanCтак мне нужно это реализовать в программеты гуглил алгоритмы?

...

Рейтинг:

0 / 0

06.01.2014, 12:18

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518370

IvanC

Гость

Само собой, там в основном расчет идет из условий, что известна маска. А у меня она неизвестна, и мало того, еще и переменная величина в диапазоне

...

Рейтинг:

0 / 0

06.01.2014, 12:24

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518372

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Но ведь ip-калькулятор работает без указания подсети. Значит алгоритмы существуют. Раз это клиентский сервис, доступный через веб, значит и алгоритмы наверняка опубликованы. Уж ончень не хочется изобретать велосипед, хотя и можно

...

Рейтинг:

0 / 0

06.01.2014, 12:29

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518375

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Хотя, наверное, все не так страшно
Берем твой пример

01011110 00101001 10100111 00000000

- считаем количество нулей с конца - 8
- значит маска подсети 32-8=24
- прибавляем 2^8, получаем

01011110 00101001 10101000 00000000

- считаем количество нулей с конца - 11
- значит маска подсети 32-11=21
- прибавляем 2^11, получаем

01011110 00101001 10110000 00000000

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

...

Рейтинг:

0 / 0

06.01.2014, 12:38

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518376

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

еще надо отсекать некорректные диапазоны, если требуется, то есть если получились подсети с маской /31 и /32, они могут получиться только в начале и в конце диапазона

...

Рейтинг:

0 / 0

06.01.2014, 12:39

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518382

qwerty112

Гость

тут есть какой-то веб-сервис, вроде по этой "теме" (я "не шарю", вдруг что :)) )
его, достаточно просто "дёргать"

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.

Sub haba()
    Const sURL = "http://dotnul.com/api/ip/94.41.167.0/24"
    '
    Dim sEnv As String
    Dim xmlhtp As Object 'MSXML2.XMLHTTP
    Dim XMLDoc As Object 'MSXML2.DOMDocument
    Dim xmlNode As Object 'MSXML2.IXMLDOMNode
    Dim texthttp As String
    '
    Set xmlhtp = CreateObject("MSXML2.XMLHTTP")
    Set XMLDoc = CreateObject("MSXML2.DOMDocument")
    '
    With xmlhtp
        .Open "GET", sURL, False
        .Send
        texthttp = .ResponseText
    End With
    Debug.Print texthttp
End Sub

возвращает результат, правда в JSONP, но его, достаточно просто можно в XML "переделать" и разобрать (или просто строковыми функциями)

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.

{"ipcalc":
  {"ip":"94.41.167.0",
  "ipv6":false,
  "size":256,
  "bits":"01011110001010011010011100000000",
  "network":"94.41.167.0",
  "broadcast":"94.41.167.255",
  "reverse":"0.167.41.94.in-addr.arpa"},
"error":false}

...

Рейтинг:

0 / 0

06.01.2014, 12:51

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518392

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

В общем, алгоритм такой, работаем в цикле с текущем значением IP в виде непрерывного числа, начальное значение - начало диапазона:

- цикл, пока IP<=конец_диапазона {
- N = количество нулей в двоичном представлении IP с конца
- Проверяем в цикле {
если IP + 2^N - 1 > конец_диапазона, то N = N - 1
}
- IP - найденная подсеть, (32 - N) - маска - выводим.
- IP = IP + 2^N
}

...

Рейтинг:

0 / 0

06.01.2014, 13:23

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38518397

IvanC

Гость

Спасибо всем за помощь, попробую алгоритм Shocker.Pro, по результатам отпишусь

...

Рейтинг:

0 / 0

06.01.2014, 13:31

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519798

IvanC

Гость

Кому интересно, набросал по вышепредложенному алгоритму программу:

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.

Public Sub maask()
Public Sub maask()
Dim Add1 As String
Dim Add2 As String
Dim IP As Long
Dim y As String


IPl4 = 5
IPl3 = 142
IPl2 = 18
IPl1 = 0

IPh4 = 5
IPh3 = 142
IPh2 = 145
IPh1 = 255

Add1 = Bin(IPl3) & Bin(IPl2) & Bin(IPl1)
Add2 = Bin(IPh3) & Bin(IPh2) & Bin(IPh1)
Dec1 = Bin2Dec(Add1)
Dec2 = Bin2Dec(Add2)
IP = Dec1
x = 1

Do While IP <= Dec2
    y = Bin(IP)
            If Right(y, x) = 0 Then
            Do While Right(y, x) = 0
            x = x + 1
            Loop
            Else
            n = x
            End If
            n = x - 1
    IP = Bin2Dec(y)
    If IP + 2 ^ (n - 1) > Dec2 Then
        n = n - 1
    Else
    End If
      
    IP = IP + (2 ^ n)
    Debug.Print (32 - n)
Loop

End Sub

Работает, но не все подсети выводит. Буду думать, но победа уже где-то близко.
Модератор: Учимся использовать тэги оформления кода - FAQ

...

Рейтинг:

0 / 0

08.01.2014, 19:41

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519826

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Первый серьезный косяк, бросающийся в глаза

Код: vbnet

x = 1

за пределами цикла

...

Рейтинг:

0 / 0

08.01.2014, 20:23

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519832

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

не косяк, но строкиIvanC

Код: vbnet

1.
2.
3.
4.

            If Right(y, x) = 0 Then
           
            Else
            n = x

абсолютно бессмысленны и бесполезны, так как n все равно принимает значение x-1, то есть ветка Else ничего не делает, да и не нужна она вообще

...

Рейтинг:

0 / 0

08.01.2014, 20:31

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519835

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Строка

Код: vbnet

   IP = Bin2Dec(y)

тоже абсолютно бессмысленна

...

Рейтинг:

0 / 0

08.01.2014, 20:33

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519840

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Еще один серьезный косяк

Код: vbnet

1.
2.

    If IP + 2 ^ (n - 1) > Dec2 Then
        n = n - 1

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

В общем, программа работать не должнаIvanCРаботает, но

...

Рейтинг:

0 / 0

08.01.2014, 20:35

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519850

IvanC

Гость

Shocker.Pro,

Да, косячу я много :) Ну для стажа в полгода, я думаю, позволительно :) Для того и учимся. А про цикл, я не совсем понял, должно быть так:

Код: vbnet

1.
2.
3.

Do While IP + 2 ^ (n - 1) > Dec2
n = n - 1
Loop

...

Рейтинг:

0 / 0

08.01.2014, 20:55

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519867

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Да, почти, но почему почему же в степени (n-1) -то????

Ты совершенно зря сначала не разобрал мой алгоритм "на бумажке", чтобы просто понять, как он работает.
Во-первых, я его просто набросал из головы, но не делал детальный просчет, то есть не исключено, что я мог допустить ошибку. Во-вторых, я не продумывал, как этот алгоритм будет обрабатывать граничные значения (например, если начало диапазона нечетное или конец диапазона четный). Я, правда, обычно в таких случаях, смотрю на поведение программы уже после реализации, тебе надо тоже не забыть это сделать.

Еще вопрос - ты умышленно не используешь старший байт IP-адреса?

Еще стоит объявить все переменные явно и использовать Option Explicit , а то тут возможно неожиданное поведение.

...

Рейтинг:

0 / 0

08.01.2014, 21:19

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519871

IvanC

Гость

Со старшим байтом overflow выбрасывает. За пределы Long выходит. В данном случае это не принципиально, так как таких больших диапазонов не будет. В любом случае спасибо Вам большое. Постараюсь на практике разобраться и, может, подправить. Еще раз спасибо. Если получится, напишу.

...

Рейтинг:

0 / 0

08.01.2014, 21:25

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519878

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

IvanCЗа пределы Long выходитСамо собой. Попробуй использовать Currency - у него целая часть принимает бОльшие значения, при этом - это точный тип. Правда, я не знаю, как с ней будут работать функции двоичных преобразований.

IvanCЕсли получится, напишу.если не получится - пиши тем более

...

Рейтинг:

0 / 0

08.01.2014, 21:28

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519882

IvanC

Гость

Shocker.Pro,

Пока что из всех диапазонов, которые проверил, все совпадает с интернет-калькулятором! Полет нормальный :) Спасибо!
P.S.Действительно, сначала нужно разбираться, а потом слизывать.

...

Рейтинг:

0 / 0

08.01.2014, 21:30

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519885

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Да не должно работать! По крайней мере из-за (n-1)

...

Рейтинг:

0 / 0

08.01.2014, 21:31

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519886

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

А если уже все исправил - так выложи исправленную версию

...

Рейтинг:

0 / 0

08.01.2014, 21:31

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38519888

IvanC

Гость

Да, с другим типом нужно будет и функции преобразования переделывать кардинально, поэтому проще так сделать.

...

Рейтинг:

0 / 0

08.01.2014, 21:32

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522683

IvanC

Гость

Спасибо Shocker.Pro за помощь, без него вряд ли догадался бы.
Ну и еще вопрос назрел: создал ACCESS базу данных, в которой планирую хранить IP адреса. Решил их записывать в целочисленном формате. Но проблема в том, что в дальнейшем нужно будет производить с ними логическое умножение. Возможно ли это производить прямо в SQL-запросе? Из того, что я прочитал и попробовал, почему-то понял, что с ACCESS такие фокусы не проходят или я ошибаюсь? И в каком формате хранить эти данные?

...

Рейтинг:

0 / 0

11.01.2014, 00:22

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522687

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Что такое логическое умножение? Логическое И?
Вроде бы без проблем - Поле1 & Поле2

...

Рейтинг:

0 / 0

11.01.2014, 00:26

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522722

qwerty112

Гость

имхо, ТС имеет в виду битовые операции

в Акцессе (в Jet) они есть : band, bor, bxor
но их можно использовать :
- или программно, через АДО

Код: vbnet

1.
2.

?currentProject.Connection.Execute ("SELECT 7 and 8 AS f1, 7 band 8 AS f2, 7 bor 8 AS f3, 1 bxor 9 AS f4").fields("f4")
 8

- или, если для БД включен синтаксис для ANSI 92, то и через интерфейс Акцесса

или, если клиентская часть тоже будет в Аксцессе, можно написать пользовательские функции на ВБА и использовать их в запросах

...

Рейтинг:

0 / 0

11.01.2014, 01:19

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522828

IvanC

Гость

В таблице находятся следующие записи:

Код Net Mask Provider City
6 1579791360 4294966272 UfaNet Orenburg

SQL запрос:

SELECT IP.Provider, IP.City FROM IP WHERE IP.Net = (IP.Mask & '1579791641');

Но дает пустые поля. Может что не так сделал?

...

Рейтинг:

0 / 0

11.01.2014, 11:32

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522858

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

во-первых почему число в кавычках?
во вторых попробуйте And или BAnd для наложения маски

...

Рейтинг:

0 / 0

11.01.2014, 12:21

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522871

IvanC

Гость

Кавычки убрал, попробовал с AND - результат тот же - пустые поля, а на band ругается, что пропущен оператор. А из-за типа поля может быть такая проблема? я поставил числовой тип, действительное число.

...

Рейтинг:

0 / 0

11.01.2014, 12:34

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522883

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

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

...

Рейтинг:

0 / 0

11.01.2014, 12:51

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38522887

qwerty112

Гость

IvanCВ таблице находятся следующие записи:

Код Net Mask Provider City615797913604294966272UfaNetOrenburg

SQL запрос:

SELECT IP.Provider, IP.City FROM IP WHERE IP.Net = (IP.Mask & '1579791641');

Но дает пустые поля. Может что не так сделал?
а что вот это за "приколы" (выделил), которые в 4-е байта и не влазят-то ?
ты как 4-х байтные тетрады ИП и маски переводил в целое число ?
вот это вот твоё - "Решил их записывать в целочисленном формате" - как сделал ?

...

Рейтинг:

0 / 0

11.01.2014, 13:01

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523092

IvanC

Гость

"длинное целое", как написано в access имеет предел 2 147 483 647, хоть подсеть и влезает в этот предел, но маска не укладывается.
Перевод туда и обратно осуществляется функцией, там тип Variant, поэтому проблем не встречаю.
Сейчас вставил в таблицу вместо маски и сети "1", также вместо проверяемого адреса поставил "1", 1 AND 1 = 1, но запрос все так же не отрабатывает.

...

Рейтинг:

0 / 0

11.01.2014, 18:57

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523201

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

IvanC1 AND 1 = 1,а так
(1 AND 1) = 1
приоритет операции сравнения выше, чем битовой (кажется)

...

Рейтинг:

0 / 0

11.01.2014, 22:34

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523214

IvanC

Гость

Оказывается, на самом деле в запросе Access эти фокусы не прокатывают, подключил базу в среде VBA через Microsoft.ACE.OLEDB.12.0, где и сработал BAND, но снова проблема. Не работает почему-то BAND с этими числами. Переполнение возвращает. Неужели придется разбивать IP адреса на части?

...

Рейтинг:

0 / 0

11.01.2014, 23:03

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523219

qwerty112

Гость

авторНеужели придется разбивать IP адреса на части?

ТС,

"открой мне глаза",
скажи какой ИП и какую маску ты "представил" в виде этих целых чисел - 1579791360 и 4294966272
покажи эти ИП и маску - тетрадами , потом вместе над тобой посмеёмся

...

Рейтинг:

0 / 0

11.01.2014, 23:09

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523222

IvanC

Гость

94.41.180.0 255.255.252.0

...

Рейтинг:

0 / 0

11.01.2014, 23:11

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523228

qwerty112

Гость

IvanC94.41.180.0 255.255.252.0
с первым - понятно
а для 255.255.252.0 - "левое" значение

Код: vbnet

1.
2.
3.
4.
5.

?habahaba(94,41,180,0)
dec:1579791360              hex: 5E29B400

?habahaba(255,255,252,0 )
dec: -1024    hex: FFFFFC00

соответственно их побитовое произведение

Код: vbnet

1.
2.

?currentproject.Connection.Execute ("select 1579791360 band -1024").Fields (0) 
 1579791360

...

Рейтинг:

0 / 0

11.01.2014, 23:23

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523234

IvanC

Гость

а почему маска отрицательная получилась?

...

Рейтинг:

0 / 0

11.01.2014, 23:43

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523243

qwerty112

Гость

IvanCа почему маска отрицательная получилась?
потому что эта твоя маска не количество хз чего,
а всего лишь то, как храниться число с типом Long , которое в 16-ричной форме записываеться как FFFFFC00
а у Long - первый бит - определяет знак числа

вот тебе для размышлений

Код: vbnet

1.
2.
3.
4.
5.

?CLng(&h7FFFFFFF)
 2147483647 

?CLng(&h80000000)
-2147483648

...

Рейтинг:

0 / 0

11.01.2014, 23:59

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523246

qwerty112

Гость

кстате, если "пугают" отрицательные дес.числа, то можно просто всё хранить в 16-ричных,
прийдёться, правда всё время "морочиться" с преобразованиями, но сами значения, конечно по-наглядней будут ...

Код: vbnet

1.
2.

?currentproject.Connection.Execute ("select hex(clng('&h5E29B400') band clng('&hFFFFFC00'))").Fields (0) 
5E29B400

...

Рейтинг:

0 / 0

12.01.2014, 00:05

| Ответить | Цитировать | Написать

Расчет подсетей из диапазона IP-адресов

#38523254

IvanC

Гость

короче, проще хранить каждый байт в отдельном поле, меньше проблем

...

Рейтинг:

0 / 0

12.01.2014, 00:14

| Ответить | Цитировать | Написать

49 сообщений из 49, показаны все 2 страниц

все

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Расчет подсетей из диапазона IP-адресов

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?all=1&fid=60&tid=2156583]:	0ms
get settings:	9ms
get forum list:	11ms
check forum access:	4ms
check topic access:	4ms
track hit:	42ms
get topic data:	10ms
get forum data:	2ms
get page messages:	75ms
get tp. blocked users:	2ms
others:	286ms

total:	445ms