ASP常用函数:CStrIP()
2018-09-06 11:46
阅读:428
作用:把长整型数字转为IP地址
<%
FunctionCStrIP(ByValanNewIP)
DimlsResults
DimlnTemp
DimlnIndex
ForlnIndex=3To0Step-1
lnTemp=Int(anNewIP/(256^lnIndex))
lsResults=lsResults&lnTemp&.
anNewIP=anNewIP-(lnTemp*(256^lnIndex))
Next
lsResults=Left(lsResults,Len(lsResults)-1)
CStrIP=lsResults
EndFunction
%>
上一篇:检测函数 asp class
评论
亲,登录后才可以留言!