在用pb开发信息管理系统时，为了安全期间，我们希望记录每个登录用户的信息，并生成日志，其中最重要的是知道是哪个机器运行程序的？这样，只要获取运行程序的机器ip问题就解决了，然而，pb中没有象delphi中有现成的函数可以很方便的获的机器的ip，我们只好利用外部函数来实现了。首先声明外部函数functionintWSAStartup(uintUIVersionRequested,refs_WSADatalpWSAData)library"wsock32.dll"functionintWSACleanup()library"wsock32.dll"function