[VBScript] IP Location Checker

Кирилл

Команда форума
Администратор
Ассоциация VN
Сообщения
14,054
Реакции
5,745
При использовании утилиты IP Location Checker:

http://safezone.cc/threads/funkcii-batch-cmd-katalog-poleznyx-skriptov-i-tvikov-v-sfere-bezopasnosti-i-analiza-sistemy.22373/#post-169941
upload_2014-1-14_6-58-24.png



Что не так?
Есть возможность парсить просто ip?
 
Значит Internet Explorer вырезан из системы или некорректно зарегистрирован.
IP парсится через него.

Попробуй просто запустить браузер, посмотри, что с ним не так.
Нужно добиться, чтобы такой скрипт работал без ошибок:
Код:
set ie = createobject("InternetExplorer.Application")
Потом скажешь, что не так было.
Можно конечно парсить по-глупому через скачивание страницы и сигнатурный поиск, но это не наш метод (с)
 
Последнее редактирование:
Виртуалка? Хочешь посмотреть, как я буду лечить? :)
8.1. - может оно там и не работает )) Буду дома - проверю.
 
SNS-amigo, у Кирилла ослик не слушается :)
точнее не слушается моей программы.
 
Напиши какую именно из защит, если не сложно. Я сейчас без подопытного.
 
Напиши какую именно из защит, если не сложно.
Elementary, Watson!
Ту, которую Microsoft впервые добавили в IE. Сначала добавили, но потом дали попятного.
Если её не выключить, то выходит сообщение об ошибке с вариантами "Искать решение в Интернет" и "Закрыть программу".
Или посмотреть подробности. Они на скриншоте.



А выключить нужно "расширенный защищённый режим".
IE11 -> меню Сервис -> Свойства браузера -> вкладка Дополнительно:
Снять галочку на "Включить защищенный расширенный режим*", если она там стоит. Применить. ОК.

См. скриншот.


После этого нужно просто закрыть IE и снова запустить твой скрипт. И тогда сразу выходит окошечко с определённой локацией, не хуже тех, что имеются в онлайн-определителях, в том числе и Яндексе. Но сервис 2ip.ru поточнее определяет моё местоположение, хотя сейчас он споткнулся на браузере, приняв IE11 за Chrome 31. :D
 
Последнее редактирование:
Dragokas, строка 11 символ 9 - IE.Visible = False
Что это ?
eureka - IE.Visible = false //данный параметр позволяет не показывать окно Internet Explorer
А выключить нужно "расширенный защищённый режим".
cmd->inetcpl.cpl
всё равно работает
Код:
IP Location Checker

IP or WEB site - to check IP Location
Blank line - to check your own IP
q - to quit

Enter IP or WEB: safezone.cc
Please wait...
IP........................................... 108.162.199.63
Country...................................... [US] United States
City......................................... San Francisco
Belongs to IP RANGE.......................... UnKnown
Network mask of the IP RANGE (bits/decimal).. -
Network mask to ban SUB NETWORK (bits)....... 16 (recommended)
Так и думал.. заграница нам поможет :)
 
Последнее редактирование:
Enter IP or WEB: safezone.cc
Домен .CC является официальным доменом Кокосовых островов (Индийский океан). Кокосовые Острова представляют собой группу из 27 коралловых островов, расположенных в восточной части Индийского Океана.
Кокосовые острова представляют собой лакомый кусок для развития бизнеса. Доменная зона .CC за более чем 15-летнюю историю доказала свою востребованность и актуальность. Находясь в Индийском океане, Кокосовые острова имеют развитую инфраструктуру, они привлекательны для туристов и предпринимателей. Вы можете купить домены в зоне .CC для создания информационного портала, туристического сайта, бизнес-проекта, ресурса для некоммерческой организации. Может быть использована в качестве альтернативы доменной зоны .com, расшифровывается как коммерческая компания (Commercial Company), для сайтов-зеркал (Corban Copy), компаний закрытого типа (Close Company) и закрытых акционерных обществ (Close Corporation). Мы рекомендуем зону для следующих сокращений: общественный перевозчик (Common Carrier), загородный клуб (Country Club) или для средних учебных заведений, колледжей (Community College).

:ROFLMAO:
cmd->inetcpl.cpl
всё равно работает
Что работает?
 
Последнее редактирование:
cmd->inetcpl.cpl - так проще вызвать настройки Свойства браузера. Включил "расширенный защищённый режим" - скрипт не вызвал ошибок..
 
Phoenix, с включением *-опций в IE нужен перезапуск системы или Проводника Windows, чтобы защита стала работать, а с отключением - достаточно простого перезапуска IE.

Я же показал на скриншотах, как в Windows 8.1 x32 не работает скрипт IP Location Checker, и после чего он начинает работать. Только, разумеется, не стал показывать скриншот с IP и местонахождением, что супермодераторы и так знают. Правда, правильно определяя регионы и провайдера, эти сервисы-определители города и прочие НП всегда путают.

Подробнее о расширенном защищенном режиме (EPM)
http://msdn.microsoft.com/ru-ru/library/ie/dn265025(v=vs.85).aspx и далее там по ссылкам.
Но и эта инфа немного уже устарела, в прошлом году были вскрыты некоторые неописанные там нюансы, но Microsoft поспешила эту информацию спрятать.
 
Спасибо за информацию. И всё таки работает. Ну, действительно - если усиленная защита, то почему обязательно ошибки будут ? Нет. Только лишние оповещения при работе с IE.
А вот в журнале обнаружил кое что ! С каких пор ослик картинки смотрит ?
iespy.png
 
то почему обязательно ошибки будут
Это не ошибки Windows, этот её способ защиты от того, что там не должно быть изначально. В данном случае скрипта Dragokas.
Т.к. в 8-ке реализована доп. защита от эксплуатации вредоносами и хакерскими программами тех уязвимостей, что эксплуатировались в предыдущих версиях системы. Также в 8.1 имеется собственный аналог определения IP-локаций, но я пока до него не добрался.
 
Назад
Сверху Снизу