如何把这两个ASP格式化IP的函数写与SQL自定义函数
如何把这两个ASP格式化IP的函数写与SQL自定义函数
Function EcodeIP(strIP)
Dim aIP, RV
If strIP="" Or strIP="127.0.0.1" Then strIP="192.168.0.1"
aIP = Split(strIP, ".")
EcodeIP=CLng(aIP(0)) * 16777216 + CLng(aIP(1)) * 65536 + CLng(aIP(2)) * 256 + CLng(aIP(3)) - 1
End Function
Function DcodeIP(intIP)
Dim sect1, sect2, sect3, sect4
sect1 = Int(intIP / 16777216)
intIP = intIP - sect1 * 16777216
sect2 = Int(intIP / 65536)
intIP = intIP - sect2 * 65536
sect3 = Int(intIP / 256)
intIP = intIP - sect3 * 256
sect4 = intIP+1
DcodeIP = sect1 & "." & sect2 & "." & sect3 & "." & sect4
End Function
MSSQL2000版本
Function EcodeIP(strIP)
Dim aIP, RV
If strIP="" Or strIP="127.0.0.1" Then strIP="192.168.0.1"
aIP = Split(strIP, ".")
EcodeIP=CLng(aIP(0)) * 16777216 + CLng(aIP(1)) * 65536 + CLng(aIP(2)) * 256 + CLng(aIP(3)) - 1
End Function
Function DcodeIP(intIP)
Dim sect1, sect2, sect3, sect4
sect1 = Int(intIP / 16777216)
intIP = intIP - sect1 * 16777216
sect2 = Int(intIP / 65536)
intIP = intIP - sect2 * 65536
sect3 = Int(intIP / 256)
intIP = intIP - sect3 * 256
sect4 = intIP+1
DcodeIP = sect1 & "." & sect2 & "." & sect3 & "." & sect4
End Function
MSSQL2000版本
...全文
相关推荐
asp常用函数大全 学习asp必备
根据给定文件的信息,我们可以提炼出一系列与ASP相关的知识点,涵盖数据库操作、用户信息获取、字符串处理、日期时间格式化、邮件发送、文件及目录管理等多个方面。1.
经典的ASP查询IP地址代码
总之,“经典的ASP查询IP地址代码”涉及到了ASP的服务器端脚本、数据库连接、SQL查询以及前端的IP地址验证。理解这些知识点对于开发基于ASP的IP查询系统至关重要。
asp获取IP和地区接口源码
在ASP中,你需要将这个数据库集成到你的代码中,通常是通过SQL查询或者数据读取函数来实现。在处理IP地址时,需要将获取到的IP地址与数据库中的记录进行匹配,从而得到相应的地区信息。
基于ASP的IP地址登记管理系统-保证可用
**add_ips_new.asp, add_ips.asp, add_ip.asp, add_ip_new.asp**:这些文件与添加IP地址有关,可能包含不同的IP添加表单或者处理不同类型的添加操作
asp 获取ip
**:定义了一个名为`GetIp`的函数,用于获取客户端的IP地址。


疑难问题
