ASP常用函數(shù):CLngIP()
更新時(shí)間:2007年02月07日 00:00:00 作者:
作用:把IP地址轉(zhuǎn)為長整型
<%
Function CLngIP(ByVal asNewIP)
Dim lnResults
Dim lnIndex
Dim lnIpAry
lnIpAry = Split(asNewIP, ".", 4)
For lnIndex = 0 To 3
If Not lnIndex = 3 Then
lnIpAry(lnIndex) = lnIpAry(lnIndex) * (256 ^ (3 - lnIndex))
End If
lnResults = lnResults + lnIpAry(lnIndex)
Next
CLngIP = lnResults
End Function
%>
<%
Function CLngIP(ByVal asNewIP)
Dim lnResults
Dim lnIndex
Dim lnIpAry
lnIpAry = Split(asNewIP, ".", 4)
For lnIndex = 0 To 3
If Not lnIndex = 3 Then
lnIpAry(lnIndex) = lnIpAry(lnIndex) * (256 ^ (3 - lnIndex))
End If
lnResults = lnResults + lnIpAry(lnIndex)
Next
CLngIP = lnResults
End Function
%>
相關(guān)文章
ASP編程入門進(jìn)階(二十):ADO組件之插入數(shù)據(jù)記錄
ASP編程入門進(jìn)階(二十):ADO組件之插入數(shù)據(jù)記錄...2007-01-01asp模板引擎終結(jié)者(WEB開發(fā)之ASP模式)
[紅色]asp模板引擎終結(jié)者(WEB開發(fā)之ASP模式)...2006-06-06ASP開發(fā)網(wǎng)頁牢記注意事項(xiàng)
ASP開發(fā)網(wǎng)頁牢記注意事項(xiàng)...2007-03-03完美解決ASP 不能更新。數(shù)據(jù)庫或?qū)ο鬄橹蛔x。
完美解決ASP 不能更新。數(shù)據(jù)庫或?qū)ο鬄橹蛔x。...2006-12-12ASP Recordset 分頁顯示數(shù)據(jù)的方法(修正版)
最近給別人培訓(xùn)asp 分頁,對于asp的入門新手來說,最簡單的分頁就是用Recordset 分頁技術(shù)了,他主要用于一些少量數(shù)據(jù)的分頁,對于新手學(xué)習(xí)是最好的了,對于大量數(shù)據(jù)分頁不建議用。2008-11-11