ASP
初次来，先送些小东西
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区以下两个函数不知道能用多久，能在IP6普及之前吧：）
我的数据库里就用整数来保存IP地址，节省空间！
Function GetIPVal(byval s)
dim v,i
v = split(s,".")
for i=0 to 3
v(i) = Hex(v(i))
if len(v(i)) = 1 then v(i) = "0" & v(i)
next
i = "&h" & v(0) & v(1) & v(2) & v(3)
GetIpVal = CLng(i)
End Function
Function GetIPString(byval v)
dim s,n(3),m
s = Hex(v)
m = 2 + len(s) - 8
n(0) = CLng("&h" & mid(s,1,m))
n(1) = CLng("&h" & mid(s,1+m,2))
n(2) = CLng("&h" & mid(s,3+m,2))
n(3) = CLng("&h" & mid(s,5+m,2))
GetIPString = join(n,".")
End Function
俺是偷偷进来的，因为CSDN没有解决俺的问题，登陆进来找不到论坛列表，只好偷偷找ID然后偷偷进来
我的数据库里就用整数来保存IP地址，节省空间！
Function GetIPVal(byval s)
dim v,i
v = split(s,".")
for i=0 to 3
v(i) = Hex(v(i))
if len(v(i)) = 1 then v(i) = "0" & v(i)
next
i = "&h" & v(0) & v(1) & v(2) & v(3)
GetIpVal = CLng(i)
End Function
Function GetIPString(byval v)
dim s,n(3),m
s = Hex(v)
m = 2 + len(s) - 8
n(0) = CLng("&h" & mid(s,1,m))
n(1) = CLng("&h" & mid(s,1+m,2))
n(2) = CLng("&h" & mid(s,3+m,2))
n(3) = CLng("&h" & mid(s,5+m,2))
GetIPString = join(n,".")
End Function
俺是偷偷进来的，因为CSDN没有解决俺的问题，登陆进来找不到论坛列表，只好偷偷找ID然后偷偷进来
...全文
相关推荐
ibatis总结的小东西
ibatis总结的小东西ibatis总结的小东西ibatis总结的小东西ibatis总结的小东西ibatis总结的小东西ibatis总结的小东西ibatis总结的小东西ibatis总结的小东西
gist:把你要表达的小东西放在一起
要旨 把你要表达的小东西放在一起 Collatz问题
小东西宝库
用asp.net 写的简单的项目，仅供参考，不能用于商业用途。
HideriAR:可爱的Live2D AR小东西
HideriAR 一个可爱的Live2D AR小东西。 视频： : watch? 如何尝试 1.打印标记。 确保保留白色边框。 2.将标记放在平面上的任何位置。 3.打开此URL，并允许访问您的摄像头（如果使用智能手机访问，则为网络摄像头或电话摄像头） 4.享受。 点击屏幕将她叫醒。
一个休闲的小东西，隐形的翅膀的歌词
一个休闲的小东西，隐形的翅膀的歌词；一个休闲的小东西，隐形的翅膀的歌词；一个休闲的小东西，隐形的翅膀的歌词；一个休闲的小东西，隐形的翅膀的歌词；
