Вверх ↑
Этот топик читают: Гость
Ответов: 195
Рейтинг: 7
#1: 2012-12-17 18:43:02 ЛС | профиль | цитата
Доброго времени суток, помогите пожалуйста получить ip компьютера который он имеет от провайдера или который можно увидеть на сайте http://2ip.ru/
Спасибо
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 1821
Рейтинг: 168
#2: 2012-12-17 18:48:42 ЛС | профиль | цитата
Можно через http://tools.hiasm.com/

#sha
Add(Button,12745418,126,105)
{
Left=120
Top=65
Caption="Get IP"
link(onClick,12150618:doDownload,[])
}
Add(HTTP_Get,12150618,189,105)
{
URL="http://tools.hiasm.com/ip.php"
link(onDownload,5358672:doConvert,[])
}
Add(Convertor,5358672,252,112)
{
Mode=11
link(onResult,5430226:doMessage,[])
}
Add(Message,5430226,315,112)
{
Caption="Your IP"
}
карма: 5

0
Ответов: 195
Рейтинг: 7
#3: 2012-12-17 19:39:45 ЛС | профиль | цитата
sаmakacd, спасибо, а как-то можно получит ip не закачивая страницы а не посредственно самой программой.
карма: 0

0
Ответов: 1821
Рейтинг: 168
#4: 2012-12-17 21:13:23 ЛС | профиль | цитата
hin4, без закачивания страницы, возможно, и не получится, а вот через 192.168.1.1 вполне можно. Другой вопрос -- будет ли оно работать у всех, ведь у многих разные роутеры и везде парсить страницы надо будет по-разному
карма: 5

0
Ответов: 122
Рейтинг: 2
#5: 2013-01-19 20:03:40 ЛС | профиль | цитата
если мне не изменяет память то вся интернет инфа есть если в CMD (команднлй строке) ввести "ipconfig" (без ковычек)
схему не смогу предоставить тк я с планшета
карма: 0

0
Ответов: 5446
Рейтинг: 323
#6: 2013-01-19 22:59:56 ЛС | профиль | цитата
Alex_P, судя по первому посту, топикстартера мало интересует адрес "192.168.1.123" или "172.16.1.123". Ему нужен внешний IP, а получить его ipconfig-ом --- большая удача.

hin4, UPNP. Задача не простая
карма: 1

0
Ответов: 35
Рейтинг: 4
#7: 2013-01-20 15:52:02 ЛС | профиль | цитата
hin4, попробуй так.

Make(delphi)
ver(4.04 build 185)
Add(MainForm,2953706,21,105)
{
Height=136
}
Add(MultiElementEx,15623234,217,175)
{
link(onIP,10512131:doText,[(299,181)(299,153)])
link(onFail,14873386:doData,[(261,188)(261,195)])
}
BEGIN_SDK
Add(EditMultiEx,4553721,21,21)
{
WorkCount=#10:doDownload|
EventCount=#4:onIP|6:onFail|
Width=496
Height=284
link(doDownload,12017422:doEvent1,[(39,27)(39,104)])
}
Add(StrMask,4906416,364,112)
{
Point(doMask)
link(onTrue,2458563:doStop,[(408,125)(408,113)(254,113)(254,125)])
link(Str,9472174:Var3,[(370,96)])
}
Add(StrList,2859045,252,56)
{
Strings=#7:#.#.#.#|8:#.#.#.##|9:#.#.#.###|8:#.#.##.#|9:#.#.##.##|10:#.#.##.###|9:#.#.###.#|10:#.#.###.##|11:#.#.###.###|8:#.##.#.#|9:#.##.#.##|10:#.##.#.###|9:#.##.##.#|10:#.##.##.##|11:#.##.##.###|10:#.##.###.#|11:#.##.###.##|12:#.##.###.###|9:#.###.#.#|10:#.###.#.##|11:#.###.#.###|10:#.###.##.#|11:#.###.##.##|12:#.###.##.###|11:#.###.###.#|12:#.###.###.##|13:#.###.###.###|8:##.#.#.#|9:##.#.#.##|10:##.#.#.###|9:##.#.##.#|10:##.#.##.##|11:##.#.##.###|10:##.#.###.#|11:##.#.###.##|12:##.#.###.###|9:##.##.#.#|10:##.##.#.##|11:##.##.#.###|10:##.##.##.#|11:##.##.##.##|12:##.##.##.###|11:##.##.###.#|12:##.##.###.##|13:##.##.###.###|10:##.###.#.#|11:##.###.#.##|12:##.###.#.###|11:##.###.##.#|12:##.###.##.##|13:##.###.##.###|12:##.###.###.#|13:##.###.###.##|14:##.###.###.###|9:###.#.#.#|10:###.#.#.##|11:###.#.#.###|10:###.#.##.#|11:###.#.##.##|12:###.#.##.###|11:###.#.###.#|12:###.#.###.##|13:###.#.###.###|10:###.##.#.#|11:###.##.#.##|12:###.##.#.###|11:###.##.##.#|12:###.##.##.##|13:###.##.##.###|12:###.##.###.#|13:###.##.###.##|14:###.##.###.###|11:###.###.#.#|12:###.###.#.##|13:###.###.#.###|12:###.###.##.#|13:###.###.##.##|14:###.###.##.###|13:###.###.###.#|14:###.###.###.##|15:###.###.###.###|
}
Add(ArrayEnum,2458563,266,112)
{
onBreakEnable=0
Point(onBreak)
link(onItem,10271357:doEvent1,[])
link(Array,2859045:Array,[])
link(onBreak,4940682:doData,[(331,132)(331,167)])
}
Add(Hub,10271357,336,112)
{
link(onEvent1,4906416:doMask,[(357,118)(357,125)])
link(onEvent2,4906416:doCompare,[(357,125)(357,118)])
}
Add(Memory,6435668,210,112)
{
link(onData,2458563:doEnum,[])
}
Add(DoData,4940682,364,161)
{
link(onEventData,5914417:doEvent1,[])
link(Data,9472174:Var2,[(370,131)(328,131)])
}
Add(GetDataEx,9472174,322,91)
{
Angle=3
link(Data,6435668:Value,[(293,96)(293,156)(216,156)])
}
Add(ChanelToIndex,16291526,364,203)
{
link(onIndex,7989252:doValue,[])
}
Add(IndexToChanel,15471410,406,245)
{
Point(Index)
link(onEvent1,4553721:onFail,[(478,251)(478,34)])
link(Index,7989252:Value,[])
}
Add(Hub,12017422,49,98)
{
link(onEvent1,16291526:doWork1,[(213,104)(213,209)])
link(onEvent2,3323005:doDownload,[])
}
Add(Hub,5914417,406,161)
{
link(onEvent1,16291526:doWork2,[(432,167)(432,191)(352,191)(352,216)])
link(onEvent2,4553721:onIP,[(468,174)(468,27)])
}
Add(Memory,7989252,406,203)
{
}
Add(HTTP_Get,3323005,84,105)
{
URL="http://ipsee.ru"
Wait=0
link(onDownload,8483449:doConvert,[])
}
Add(Convertor,8483449,126,112)
{
Mode=11
link(onResult,327926:doSearch,[])
}
Add(BlockFind,327926,168,112)
{
IncludeBlock=1
StartBlock="<h1>"
EndBlock="</h1>"
link(onSearch,6435668:doValue,[])
link(onEndSearch,15471410:doEvent,[(303,125)(303,251)])
}
END_SDK
Add(MultiElementEx,7142409,217,322)
{
link(onIP,9087339:doText,[(303,328)(303,293)])
link(onFail,685588:doData,[(268,335)(268,342)])
}
BEGIN_SDK
Add(EditMultiEx,11605148,21,21)
{
WorkCount=#10:doDownload|
EventCount=#4:onIP|6:onFail|
Width=496
Height=284
link(doDownload,4170115:doEvent1,[(39,27)(39,104)])
}
Add(HTTP_Get,1274869,84,105)
{
URL="http://2ip.ru"
Wait=0
link(onDownload,3237664:doConvert,[])
}
Add(Convertor,3237664,126,112)
{
Mode=11
link(onResult,3221864:doSearch,[])
}
Add(BlockFind,3221864,168,112)
{
IncludeBlock=1
StartBlock="<big id="d_clip_button">"
EndBlock="</big>"
link(onSearch,9026027:doValue,[])
link(onEndSearch,6825108:doEvent,[(303,125)(303,251)])
}
Add(StrMask,12826855,364,112)
{
Point(doMask)
link(onTrue,3806467:doStop,[(408,125)(408,113)(254,113)(254,125)])
link(Str,10114279:Var3,[(370,96)])
}
Add(StrList,16358256,252,56)
{
Strings=#7:#.#.#.#|8:#.#.#.##|9:#.#.#.###|8:#.#.##.#|9:#.#.##.##|10:#.#.##.###|9:#.#.###.#|10:#.#.###.##|11:#.#.###.###|8:#.##.#.#|9:#.##.#.##|10:#.##.#.###|9:#.##.##.#|10:#.##.##.##|11:#.##.##.###|10:#.##.###.#|11:#.##.###.##|12:#.##.###.###|9:#.###.#.#|10:#.###.#.##|11:#.###.#.###|10:#.###.##.#|11:#.###.##.##|12:#.###.##.###|11:#.###.###.#|12:#.###.###.##|13:#.###.###.###|8:##.#.#.#|9:##.#.#.##|10:##.#.#.###|9:##.#.##.#|10:##.#.##.##|11:##.#.##.###|10:##.#.###.#|11:##.#.###.##|12:##.#.###.###|9:##.##.#.#|10:##.##.#.##|11:##.##.#.###|10:##.##.##.#|11:##.##.##.##|12:##.##.##.###|11:##.##.###.#|12:##.##.###.##|13:##.##.###.###|10:##.###.#.#|11:##.###.#.##|12:##.###.#.###|11:##.###.##.#|12:##.###.##.##|13:##.###.##.###|12:##.###.###.#|13:##.###.###.##|14:##.###.###.###|9:###.#.#.#|10:###.#.#.##|11:###.#.#.###|10:###.#.##.#|11:###.#.##.##|12:###.#.##.###|11:###.#.###.#|12:###.#.###.##|13:###.#.###.###|10:###.##.#.#|11:###.##.#.##|12:###.##.#.###|11:###.##.##.#|12:###.##.##.##|13:###.##.##.###|12:###.##.###.#|13:###.##.###.##|14:###.##.###.###|11:###.###.#.#|12:###.###.#.##|13:###.###.#.###|12:###.###.##.#|13:###.###.##.##|14:###.###.##.###|13:###.###.###.#|14:###.###.###.##|15:###.###.###.###|
}
Add(ArrayEnum,3806467,266,112)
{
onBreakEnable=0
Point(onBreak)
link(onItem,14397751:doEvent1,[])
link(Array,16358256:Array,[])
link(onBreak,8405370:doData,[(331,132)(331,167)])
}
Add(Hub,14397751,336,112)
{
link(onEvent1,12826855:doMask,[(357,118)(357,125)])
link(onEvent2,12826855:doCompare,[(357,125)(357,118)])
}
Add(Memory,9026027,210,112)
{
link(onData,3806467:doEnum,[])
}
Add(DoData,8405370,364,161)
{
link(onEventData,4277539:doEvent1,[])
link(Data,10114279:Var2,[(370,131)(328,131)])
}
Add(GetDataEx,10114279,322,91)
{
Angle=3
link(Data,9026027:Value,[(293,96)(293,156)(216,156)])
}
Add(ChanelToIndex,8207122,364,203)
{
link(onIndex,2901509:doValue,[])
}
Add(IndexToChanel,6825108,406,245)
{
Point(Index)
link(onEvent1,11605148:onFail,[(478,251)(478,34)])
link(Index,2901509:Value,[])
}
Add(Hub,4170115,49,98)
{
link(onEvent1,8207122:doWork1,[(213,104)(213,209)])
link(onEvent2,1274869:doDownload,[])
}
Add(Hub,4277539,406,161)
{
link(onEvent1,8207122:doWork2,[(432,167)(432,191)(352,191)(352,216)])
link(onEvent2,11605148:onIP,[(468,174)(468,27)])
}
Add(Memory,2901509,406,203)
{
}
END_SDK
Add(Edit,10512131,350,147)
{
Left=185
Top=10
Width=155
Text=""
}
Add(Edit,9087339,357,287)
{
Left=185
Top=35
Width=155
Text=""
}
Add(Button,6162259,133,175)
{
Left=15
Top=10
Width=70
Caption="Работать!"
link(onClick,1698776:doEvent1,[])
}
Add(Label,1623635,217,126)
{
Left=125
Top=10
Width=33
Height=17
Caption="IPSee.ru"
}
Add(Label,12574870,217,266)
{
Left=125
Top=35
Width=20
Height=17
Caption="2IP.ru"
}
Add(DoData,14873386,273,189)
{
Data=String(Ошибка)
}
Add(DoData,685588,287,336)
{
Data=String(Ошибка)
link(onEventData,9087339:doText2,[(338,342)(338,300)])
}
Add(Hub,1698776,175,175)
{
link(onEvent1,15623234:doDownload,[])
link(onEvent2,7142409:doDownload,[(203,188)(203,328)])
}
карма: 0

0
Ответов: 8888
Рейтинг: 823
#8: 2013-01-20 16:47:26 ЛС | профиль | цитата
hin4, тоже схемка, выдаёт такой же адрес, "который можно увидеть на сайте" "http://forum.hiasm.com"
code_30126.txt
карма: 19

0
файлы: 1code_30126.txt [1.5KB] [321]
Разработчик
Ответов: 4697
Рейтинг: 426
#9: 2013-01-20 21:32:14 ЛС | профиль | цитата
A.Phoenix, что за ужас Почему бы не воспользоваться регуляркой?
^(d{1,3}.){3}d{1,3}$
Можно и по короче, но может выбрать с лишней оканчивающейся точкой или вовсе без них:
^(d{1,3}.?){4}$
карма: 10
0
Ответов: 5446
Рейтинг: 323
#10: 2013-01-21 00:53:10 ЛС | профиль | цитата
A.Phoenix, Леонид,
hin4 писал(а):
а как-то можно получит ip не закачивая страницы

Ы?
карма: 1

0
Ответов: 8888
Рейтинг: 823
#11: 2013-01-21 09:28:45 ЛС | профиль | цитата
iarspider, я-то вообще интернетом не занимаюсь, увидел в компьютере пример коллег, вот и выложил
(свой IP могу посмотреть в договоре с провайдером правда меняется иногда )
карма: 19

0
Гость
Ответов: 17029
Рейтинг: 0
#12: 2013-01-22 01:28:35 правка | ЛС | профиль | цитата


Редактировалось 3 раз(а), последний 2020-03-01 12:59:58
карма: 0

0
Ответов: 195
Рейтинг: 7
#13: 2013-01-22 22:57:26 ЛС | профиль | цитата
спасибо вам огромное за примеры и объяснение
карма: 0

0
Разработчик
Ответов: 4697
Рейтинг: 426
#14: 2013-01-25 03:13:52 ЛС | профиль | цитата
46-211-15-8-gprs.kyivstar, RegularExpressions, и компонент для них: RE_Search
карма: 10
0
14
Сообщение
...
Прикрепленные файлы
(файлы не залиты)