- 1
- 0
Что делаю не так?
(инклуд)
Делаю:
Что делаю не так?
(инклуд)
Данные не выдаются. Прошу помощи , что делаю не так?
(инклуд)
C++:
GetIpInfoRu(IP){
UrlDownloadToFile, % "http://api.2ip.ua/geo.xml?ip=" IP, ipinfo.xml
UrlDownloadToFile, % "http://api.2ip.ua/provider.xml?ip=" IP, infprov.xml
FileRead, ipinfo, *P65001 %A_ScriptDir%\ipinfo.xml
FileRead, infprov, *P65001 %A_ScriptDir%\infprov.xml
RegExMatch(ipinfo,"<country_rus>(.*)</country_rus>.*<region_rus>(.*)</region_rus>.*<city_rus>(.*)</city_rus>.*<latitude>(.*)</latitude>.*<longitude>(.*)</longitude>.*<time_zone>(.*)</time_zone>",infip)
infprov := RegExReplace(infprov,""","''")
RegExMatch(infprov,"<ip>(.*)</ip>.*<name_rus>(.*)</name_rus>.*<site>(.*)</site>",infp)
FileDelete, %A_ScriptDir%\ipinfo.xml
FileDelete, %A_ScriptDir%\infprov.xml
infip := Array(infip1,infip2,infip3,infip4,infip5,infip6,infp1,infp2,infp3)
;<< 1 - Страна 2 - Область 3 - Город 4 - latitude 5 - longitude 6 - Часовой пояс 7 - Ip Adrees с сервера 8 - Имя провайдера 9 - Сайт провайдера >>
return infip
}
Делаю:
Что делаю не так?
(инклуд)
C++:
:?*:/geoip`n::
ShowDialog(1, "Информация о IP адресе", "Введите IP адресс , о котором хотите узнать информацию", "Ок")
input, geoips, V, {enter}
GetIpInfoRu(geoips)
SendInput,{f6}%infip1% | %geoips% {enter}
return
Данные не выдаются. Прошу помощи , что делаю не так?