ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
18 сообщений из 43, страница 2 из 2
  2  все
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36826757
piva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
piva
Участник
проходящий.Первая попытка неудачная.
Черт - значит обознался
...
Рейтинг: 0 / 0
02.09.2010, 19:20
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36826759
P00012
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
P00012
Гость
Что-то там я интерфейсов свой VM не нашел...
...
Рейтинг: 0 / 0
02.09.2010, 19:22
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36827161
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
Питон33Есть какой нибудь простой способ узнать свой IP программным способом?
Пробовал Через winsock, но не на всех компах этот способ работает.
Можно через WMI:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
LOCAL m.loWMIService, m.loItems, m.i
LOCAL ARRAY arrIPAddresses[ 1 ]

m.loWMIService = GETOBJECT("winmgmts:\\.\root\cimv2")
m.loItems = m.loWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True",, 48 )

FOR EACH loItem IN loItems
	arrIPAddresses = loItem.IPAddress
	FOR m.i =  1  TO  ALEN(arrIPAddresses)
		? arrIPAddresses[m.i]
	ENDFOR
ENDFOR
С уважением, Алексей
...
Рейтинг: 0 / 0
03.09.2010, 07:52
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36830414
Питон33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Питон33
Гость
pivaВсеt IP адреса читаются в реестре
ключ для поиска 4D36E972-E325-11CE-BFC1-08002BE10318 далее и сами разберетесь, с учетом значения свойства "Class" конечно и понятия ROOT.

Для начала HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}

там есть перечисления всех адаптеров, далее в HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services ищите остальное - там и есть назначенные адреса, шлюзы, маски и прочее - так что даже API не надо и выполнения ipconfig
Ну вот и приведи конкретный код на фоксе чтобы получить ip, а мы посмотрим и оценим твой код.
Кстати ты Брехло... ))))
...
Рейтинг: 0 / 0
05.09.2010, 19:33
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36830421
Питон33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Питон33
Гость
Dima TПитон33То что выдаёт ipconfig.
Код: plaintext
run ipconfig > MyIp.txt
потом парси файл MyIp.txt
Выскочет чёрный экран *** и будет пугать всех вокруг.
Все подумают что это вирус и ещё долго будут вспоминать умника по кличке Dima T! )))))
...
Рейтинг: 0 / 0
05.09.2010, 19:42
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36830425
Питон33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Питон33
Гость
Aleksey-KПитон33Есть какой нибудь простой способ узнать свой IP программным способом?
Пробовал Через winsock, но не на всех компах этот способ работает.
Можно через WMI:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
LOCAL m.loWMIService, m.loItems, m.i
LOCAL ARRAY arrIPAddresses[ 1 ]

m.loWMIService = GETOBJECT("winmgmts:\\.\root\cimv2")
m.loItems = m.loWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True",, 48 )

FOR EACH loItem IN loItems
	arrIPAddresses = loItem.IPAddress
	FOR m.i =  1  TO  ALEN(arrIPAddresses)
		? arrIPAddresses[m.i]
	ENDFOR
ENDFOR
С уважением, Алексей
**** какую то выдало!
Это видимо выдало адрес в локальной сети, а надо IP адрес в интернете!
...
Рейтинг: 0 / 0
05.09.2010, 19:46
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36832919
Sea_Cat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sea_Cat
Гость
Питон33
Есть какой нибудь простой способ узнать свой IP программным способом?
...
Это видимо выдало адрес в локальной сети, а надо IP адрес в интернете!

Так бы и писали - сижу за NAT-ом, хочу узнать динамический внешний адрес шлюза. "Свой IP" - это адрес одного из сетевых интерфейсов компьютера. А протоколы TCP/IP основаны на том, что в таблицах маршрутизации компьютера прописываются только адреса подсоединенных к нему шлюзов, остальное его не должно интересовать.
Узнать внешний IP-адрес шлюза (сервера) можно только путем анализа заголовков приходящих IP-пакетов, к чему Фокс никак не приспособлен.
Для этой цели служит утилита tracert (но и там нужно поиграться с величиной таймаута), или ping с ключем -R.
Как говорится - RTFM - и будет все OK!
...
Рейтинг: 0 / 0
06.09.2010, 21:18
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36833069
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Ну или прямо к шлюзу подключиться (тем же телнетом) и просто проанализировать ответы соответствующих команд... тут уж мы не помощники - пока вы не дадите марку вашего маршрутизатора.
...
Рейтинг: 0 / 0
07.09.2010, 00:21
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36833193
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
Питон33Выскочет чёрный экран *** и будет пугать всех вокруг.
Черный экран может и не выскакивать - все зависит от кривизны рук писателя

Ты для начала определись чего тебе вообще надо:
Питон33То что выдаёт ipconfig.
Питон33Это видимо выдало адрес в локальной сети, а надо IP адрес в интернете!
Стопроцентный способ узнать свой IP в инете - воспользоваться сервисами, показывающими адрес с которого к ним обратились, типа этого или этого , или сделать свой подобный сервис.
Все остальные способы будут работать только в части случаев.
...
Рейтинг: 0 / 0
07.09.2010, 08:13
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36842164
Питон33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Питон33
Гость
Dima TПитон33Выскочет чёрный экран *** и будет пугать всех вокруг.
Черный экран может и не выскакивать - все зависит от кривизны рук писателя

Команда RUN в фоксе вызывающая ipconfig неминуемо выдаст чёрный выскакивающий экран.
Приведи пример писатель как его погасить и вопрос будет закрыт.
...
Рейтинг: 0 / 0
12.09.2010, 04:24
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36842213
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
Питон33Dima TПитон33Выскочет чёрный экран *** и будет пугать всех вокруг.
Черный экран может и не выскакивать - все зависит от кривизны рук писателя

Команда RUN в фоксе вызывающая ipconfig неминуемо выдаст чёрный выскакивающий экран.
Приведи пример писатель как его погасить и вопрос будет закрыт.
Хэлп на RUN читать не пробовал? Так только иконка в таскбаре моргнет:
Код: plaintext
RUN /N7 cmd.exe /c ipcofig > ipconfig.txt
Только тут минус один, RUN /N не дожидается завершения запущенного приложения, надо паузу выждать чтобы ipconfig.txt начать читать.
Вместо RUN можно пользовать WinAPI функцию CreateProcess() тогда окно можно вообще скрыть окно, в т.ч. и с таскбара, дождаться завершения запущенного процесса, если надо - во время ожидания повыполнять какой-нибудь другой код, убить дочерний процесс если он долго не завершается.
...
Рейтинг: 0 / 0
12.09.2010, 10:56
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36846496
Питон33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Питон33
Гость
Dima T,

И где тут готовый пример?
Приведи готовый пример или процедуру для получения ip, а мы посмотри и оценим.
RUN /N7 cmd.exe /c ipcofig > ipconfig.txt это огрызок процедуры.
...
Рейтинг: 0 / 0
14.09.2010, 21:10
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36846771
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dima T
Участник
Питон33Dima T,

И где тут готовый пример?
Приведи готовый пример или процедуру для получения ip, а мы посмотри и оценим.
RUN /N7 cmd.exe /c ipcofig > ipconfig.txt это огрызок процедуры.
Готовые решения в форуме работа за отдельную плату.

Того что я написал вполне достаточно для того чтобы самому начать чего-нибудь делать, сделай, а если не получится, покажешь код - подскажут в чем ошибки.
...
Рейтинг: 0 / 0
15.09.2010, 06:58
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36848746
Питон33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Питон33
Гость
Dima TПитон33Dima T,

И где тут готовый пример?
Приведи готовый пример или процедуру для получения ip, а мы посмотри и оценим.
RUN /N7 cmd.exe /c ipcofig > ipconfig.txt это огрызок процедуры.
Готовые решения в форуме работа за отдельную плату.

Того что я написал вполне достаточно для того чтобы самому начать чего-нибудь делать, сделай, а если не получится, покажешь код - подскажут в чем ошибки.
"Вместо RUN можно пользовать WinAPI функцию CreateProcess()"
И кто на форме поймёт что ты тут объяснил?
Ты наверно себе объяснил?
Если не знаешь как сделать - так и скажи,
а вводить людей в заблуждение не нужно блатными терминами типа WinAPI.
...
Рейтинг: 0 / 0
15.09.2010, 18:00
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36848765
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
Питон33"Вместо RUN можно пользовать WinAPI функцию CreateProcess()"
И кто на форме поймёт что ты тут объяснил?Ну я пойму. И еще многие.
Ты наверно себе объяснил?Не только.
Если не знаешь как сделать - так и скажи,Уже сказано.
а вводить людей в заблуждение не нужно блатными терминами типа WinAPI.И давно они стали блатными? И если давно, то для кого это они блатные?
А еще есть FileScriptingObject. А еще Power Shell. А еще VBScript/JScript. И т.д.
Но "свой адрес в интерене" не всегда можно узнать. Ибо не всегда он есть. А есть, в этом случае, адрес NAT/Firewall/Proxy etc., который лучше узнать у администратора.
...
Рейтинг: 0 / 0
15.09.2010, 18:08
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36849302
Kruchinin Pahan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kruchinin Pahan
Участник
проходящий.
Но "свой адрес в интерене" не всегда можно узнать. Ибо не всегда он есть. А есть, в этом случае, адрес NAT/Firewall/Proxy etc., который лучше узнать у администратора.
Как вариант для подумать. Proxy твой наружный айпишник назад тебе никогда не скажет. Зато можно воспользоваться наружными сервисами.
Куча существует, в том числе и онлайн, сервисов, которые могут вернуть тебе айпишник с которого ты подцепился.

Ну, как вариант.
...
Рейтинг: 0 / 0
16.09.2010, 07:20
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36849308
Kruchinin Pahan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kruchinin Pahan
Участник
Kruchinin Pahan,

Дабы не быть совсем голословным приведу вот такой "например":
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
DECLARE LONG Sleep IN WIN32API LONG
loIE4Show=CREATEOBJECT("InternetExplorer.Application")  
loIE4Show.Navigate("http://www.faq-howto.ru/info.php")
DO WHILE loIE4Show.Busy
	Sleep( 100 )
ENDDO
lcText = loIE4Show.Document.documentElement.InnerText && InnerText, InnerHTML
?lcText
loIE4Show.Quit
...
Рейтинг: 0 / 0
16.09.2010, 07:47
| Ответить | Цитировать | Написать  
КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
    #36852551
Sergey Ch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Ch
Участник
Модератор: Очень много ругани в топике. По совету участников топик закрыт.
...
Рейтинг: 0 / 0
17.09.2010, 16:09
| Ответить | Цитировать | Написать  
18 сообщений из 43, страница 2 из 2
  2  все
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / КАК УЗНАТЬ СВОЙ IP ИЗ ПРОГРАММЫ FOXPRO?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=36827161&tid=1584950]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 26ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 320ms
total:  437ms
созд. / загр.: 437ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]