求pbws32.dll，pb獲取ip地址
uj5u.com熱心網友回復：
檔案:http://www.allpos.cn/csdn/pbws32.zip
代碼:
winsock ws
string sHostName,ls_iplist
ulong ulAddr
pbhostent iHostent
int li_i
ws = create winsock
sHostName = space(255)
ws.GetHostName(sHostName,len(sHostName))
iHostent = ws.GetHostByName(sHostName)
if IsNull(iHostent) then
MessageBox("server","err!")
return
end if
for li_i = 1 to upperbound(iHostent.h_addr_list)
ulAddr = iHostent.h_addr_list[li_i]
ls_iplist += ws.inet_ntoa(ulAddr) + ';'
next
messagebox('iplist',ls_iplist)
destroy ws
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/68333.html
標籤：API 調用
上一篇：請問如何寫偽靜態規則
下一篇：檢測SQL服務報錯，求大俠指點