ASP常用函數(shù):CLngIP()
更新時(shí)間:2007年02月07日 00:00:00 作者:
作用:把IP地址轉(zhuǎn)為長(zhǎng)整型
<%
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開(kāi)發(fā)之ASP模式)
[紅色]asp模板引擎終結(jié)者(WEB開(kāi)發(fā)之ASP模式)...2006-06-06ASP開(kāi)發(fā)網(wǎng)頁(yè)牢記注意事項(xiàng)
ASP開(kāi)發(fā)網(wǎng)頁(yè)牢記注意事項(xiàng)...2007-03-03完美解決ASP 不能更新。數(shù)據(jù)庫(kù)或?qū)ο鬄橹蛔x。
完美解決ASP 不能更新。數(shù)據(jù)庫(kù)或?qū)ο鬄橹蛔x。...2006-12-12ASP Recordset 分頁(yè)顯示數(shù)據(jù)的方法(修正版)
最近給別人培訓(xùn)asp 分頁(yè),對(duì)于asp的入門新手來(lái)說(shuō),最簡(jiǎn)單的分頁(yè)就是用Recordset 分頁(yè)技術(shù)了,他主要用于一些少量數(shù)據(jù)的分頁(yè),對(duì)于新手學(xué)習(xí)是最好的了,對(duì)于大量數(shù)據(jù)分頁(yè)不建議用。2008-11-11ASP編程入門進(jìn)階(二):認(rèn)識(shí)表單
ASP編程入門進(jìn)階(二):認(rèn)識(shí)表單...2007-01-01