查看: 1520|回复: 3

[已经解决] 如何用API获取自己IP?

  [复制链接]
梦石
0
星屑
50
在线时间
154 小时
注册时间
2011-7-9
回帖
378
发表于 2011-10-4 06:49:47 | 显示全部楼层 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有账号?注册会员

×
只要能获取就行,API什么什么都可以。

评分

参与人数 1星屑 -40 收起 理由
各种压力的猫君 -40 手续费

查看全部评分

New Game:  【QQ堂4.6单机版】(9月新版!【点此】)个人提供快速网盘:http://ad.jlweb.tk/upload/ --- 密码:abcdefg
激零工作室孵化中.....网游make中。。招收游戏监督一名,上线时间:5~12 小时 招收脚本员,美工数位。。
本人Q:330639889 验证:zs    ----广:愿意帮我宣传签名的,站内PM
下面的东西是什么?!请进:http://tieba.baidu.com/p/1453289014【2012最新炸弹型ARPG游戏,历时2年间断坚持制作!】
[img=646,262]http://ftp.66rpg.com/WEB_PLUS/attachment/forum/201203/28/1655578kbk8bqkfazk2
梦石
0
星屑
50
在线时间
41 小时
注册时间
2009-4-11
回帖
18
发表于 2011-10-4 10:43:16 | 显示全部楼层
本帖最后由 zjy807 于 2011-10-4 10:49 编辑

我只知道可以使用
.DLL命令 GetIpAddrTable, 整数型, "IPHLPAPI.DLL", "GetIpAddrTable",  
    .参数 pIpAddrTable, PMIB_IPADDRTABLE, ,
    .参数 pdwSize, 整数型, 传址,
    .参数 border, 整数型, ,

Public Declare Function GetIpAddrTable Lib "IPHlpApi" (pIPAdrTable As Byte, pdwSize As Long, ByVal Sort As Long) As Long

Type IPINFO
dwAddr As Long
dwIndex As Long
dwMask As Long
dwBCastAddr As Long
dwReasmSize As Long
UnUsed1 As Integer
UnUsed2 As Integer
End Type

Type MIB_IPADDRTABLE
dEntrys As Long
mIPInfo(255) As IPINFO
End Type

获得IP地址,至于RM里怎么使用就不知道了,新手。。。

另外也从注册表中获得IP

点评

你写的是vb调api?  发表于 2011-10-5 08:47
f
回复

使用道具 举报

尽头

梦石
0
星屑
119
在线时间
278 小时
注册时间
2010-6-20
回帖
1204
发表于 2011-10-4 10:58:14 | 显示全部楼层
本帖最后由 bbaugle 于 2011-10-4 11:24 编辑

我没有GetIpAddrTable函数的参数表。用外接程序来返回吧。
回复

使用道具 举报

老黄鸡

梦石
4
星屑
45782
在线时间
7954 小时
注册时间
2009-7-6
回帖
13338

MZ评测员RM创作大赛01组委会开拓者贵宾

发表于 2011-10-4 14:28:07 | 显示全部楼层
zjy807 发表于 2011-10-4 10:43
我只知道可以使用
.DLL命令 GetIpAddrTable, 整数型, "IPHLPAPI.DLL", "GetIpAddrTable",  
    .参数 pIp ...

我先告诉你这个
  1. RegOpenKeyEx = Win32API.new('advapi32', 'RegOpenKeyEx', 'lpiip', 'l')
  2. RegQueryValueEx = Win32API.new('advapi32', 'RegQueryValueExW', 'lppppp', 'l')
  3. RegCloseKey = Win32API.new('advapi32', 'RegCloseKey', 'l', 'l')
  4. hKey = '    '
  5. RegOpenKeyEx.call(-2147483646, 'adress', 0, 0x20019 | 0x0200, hKey)
  6. hKey = hKey.unpack('l')[0]
复制代码
再告诉你这个
  1. HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces
复制代码
然后告诉你遍历找DhcpIPAddress是192开头的然后我就不动了。

点评

怎么便利第二句?  发表于 2011-10-5 08:49
RGDirect - DirectX驱动的RGSS,点我了解.
(排满,暂停)RM全系列成套系统定制请联系QQ1213237796
不接受对其他插件维护的委托
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

Powered by Discuz! X5.0 © 2001-2026 Discuz! Team.

在本版发帖返回顶部