<%
function cstrip(byval annewip)
dim lsresults
dim lntemp
dim lnindex
for lnindex = 3 to 0 step -1
lntemp = int(annewip / (256 ^ lnindex))
lsresults = lsresults & lntemp & "."
annewip = annewip - (lntemp * (256 ^ lnindex))
next
lsresults = left(lsresults, len(lsresults) - 1)
cstrip = lsresults
end function
%>
【说明】:本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:)!