|网页制作|网络编程|图形图象|操作系统|冲浪宝典|软件教学|网络安全|认证考试|通信技术|电子商务|业内动态|书籍教程|原码|
最近更新 文章分类 多媒体类 精品软件
远程控制篇:通过IP地址得到机器名
function iptoname(ip:string):string;var WSAData:TWSAData; p:PHostEnt; InetAddr:dword;begin WSAStartup(2, WSAData); InetAddr:= inet_addr(PChar(IP));try p:=GetHostByAddr(@InetAddr, Length(IP), PF_Inet); result:=p^.h_name; except result:='; end;end;
官本和 2001.4