首页 > 编程 > ASP > 正文

ASP常用函数:CStrIP()

2024-05-04 11:02:04

字体：大中小

来源：转载

供稿：网友

作用:把长整型数字转为IP地址

<%
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
%>

上一篇：ASP程序给上传的图片增添水印效果!

下一篇：PJblog友情链接LOGO地址失效的解决

学习交流

硬盘分区如何设置准确的分区空间

硬盘分区如何设置准确的分区空间...

热门图片

猜你喜欢的新闻

猜你喜欢的关注

新闻热点

英伟达市值一夜大涨9246亿创2023年5月以来最大单周涨幅

2024-04-27 13:35:46

雷军：小米正在申请3万件专利，以提升自身的竞争力

2024-04-27 13:33:47

人参泡酒15年后竟“复活”？网友：这酒还能喝不？

2024-04-24 22:53:44

芯片股普涨！英伟达市值一夜大涨6000亿元

2024-04-23 19:32:50

面馆老板1天卖100碗刚够交房租要卖到150碗才能实现盈利

2024-04-23 19:25:50

跌近30%！茶百道上市一小时跌没3年净利润

2024-04-23 19:13:19

疑难解答

图片精选

网友关注