如何从ip address得到机器名?

kamphkb 2002-08-03 02:38:29
如何从ip address得到机器名?
...全文
54 9 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
孙亖 2002-09-06
  • 打赏
  • 举报
回复
gethostbyaddr
beholder 2002-09-06
  • 打赏
  • 举报
回复
#inlcude <winsock.h>



void __fastcall TForm1::Button1Click(TObject *Sender)
{
WSADATA wsa;
long addr;
struct hostent *host;


WSAStartup(MAKEWORD(2,2),&wsa);
addr = inet_addr("192.168.10.2");

host= gethostbyaddr((char *)&addr,4,AF_INET);
ShowMessage(host->h_name);

}
kamphkb 2002-08-03
  • 打赏
  • 举报
回复
都不行。 ;(
haode 2002-08-03
  • 打赏
  • 举报
回复
是要编程实现么?

ping -a 就可以显示了

比如:

ping -a 192.168.0.1
wistaria 2002-08-03
  • 打赏
  • 举报
回复
从主机名得到IP地址
int CGetIPDlg::GetIPAddress(const CString& sHostName, CString& sIPAddress)
{
struct hostent FAR *lpHostEnt = gethostbyname (sHostName);

if (lpHostEnt == NULL) {
// An error occurred.
sIPAddress = _T("");
return WSAGetLastError();
}

LPSTR lpAddr = lpHostEnt->h_addr_list[0];
if (lpAddr) {
struct in_addr inAddr;
memmove (&inAddr, lpAddr, 4);
sIPAddress = inet_ntoa (inAddr);
if (sIPAddress.IsEmpty())
sIPAddress = _T("Not available");
}

return 0;
}
anni 2002-08-03
  • 打赏
  • 举报
回复
HRESULT GetHostByAddr(
const char *addr,
int len,
int type,
char *buf,
int *buflen
);
查msdn
搞定
jishiping 2002-08-03
  • 打赏
  • 举报
回复
举个例子:
long NetAddr = inet_addr("100.100.100.1");
struct hostent* pht = gethostbyaddr((char*)&NetAddr, 4, AF_INET);
if (pht != NULL)
MessageBox(0, pht->h_name, "机器名", MB_OK);
javanew 2002-08-03
  • 打赏
  • 举报
回复
gethostbyname()
howtotell 2002-08-03
  • 打赏
  • 举报
回复
ping
nbtstat
在用pb开发信息管理系统时,为了安全期间,我们希望记录每个登录用户的信息,并生成日志,其中最重要的是知道是哪个机器运行程序的?这样,只要获取运行程序的机器ip问题就解决了,然而,pb中没有象delphi 中有现成的函数可以很方便的获的机器ip,我们只好利用外部函数来实现了。首先声明外部函数function int WSAStartup( uint UIVersionRequested, ref s_WSAData lpWSAData ) library "wsock32.dll"function int WSACleanup() library "wsock32.dll"function int WSAGetLastError ( ) library "wsock32.dll"function int gethostname ( ref string name, int namelen ) library "wsock32.dll"function string GetHost(string lpszhost, ref blob lpszaddress ) library "PBWS32.DLL" 然后在form的open事件中执行如下代码就可以了s_wsadata l_WSADataint li_version = 257blob{4} lb_hostaddress IF wsastartup ( li_version, l_WSAData ) = 0 THEN IF gethostname ( ls_HostName, len(ls_HostName) ) < 0 THEN messagebox("GetHostName",WSAGetLastError()) ELSE GetHost(ls_HostName, lb_HostAddress) //获得主机IP地址 ls_IpAddress = string(asc(string(blobmid(lb_HostAddress,1,1))),"000") + "." ls_IpAddress += string(asc(string(blobmid(lb_HostAddress,2,1))),"000") + "." ls_IpAddress += string(asc(string(blobmid(lb_HostAddress,3,1))),"000") + "." ls_IpAddress += string(asc(string(blobmid(lb_HostAddress,4,1))),"000") //将IP地址的ASC码形式转化为***.***.***.***字符串格式 END IF WSACleanup()ELSE messagebox("GetHostName",WSAGetLastError())END IF

16,548

社区成员

发帖
与我相关
我的任务
社区描述
VC/MFC相关问题讨论
社区管理员
  • 基础类社区
  • AIGC Browser
  • encoderlee
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

        VC/MFC社区版块或许是CSDN最“古老”的版块了,记忆之中,与CSDN的年龄几乎差不多。随着时间的推移,MFC技术渐渐的偏离了开发主流,若干年之后的今天,当我们面对着微软的这个经典之笔,内心充满着敬意,那些曾经的记忆,可以说代表着二十年前曾经的辉煌……
        向经典致敬,或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天,我们期待着MFC技术能够恢复其曾经的辉煌,或许这个期待会永远成为一种“梦想”,或许一切皆有可能……
        我们希望这个版块可以很好的适配Web时代,期待更好的互联网技术能够使得MFC技术框架得以重现活力,……

试试用AI创作助手写篇文章吧