小问题,如何取IP地址的前三段?

cbb30000 2003-09-20 04:48:21
我想屏蔽最后一个段的地址。

比如61.121.39.*

有没有比较简单的函数实现?
...全文
326 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
uusong 2003-09-20
  • 打赏
  • 举报
回复
strIP = StrReverse(strIP)
strIP = Mid(strIP,instr(strIP,"."),1024)
strIP = StrReverse(strIP)+"*"
uusong 2003-09-20
  • 打赏
  • 举报
回复
dim mystr
mystr=""
for i =1 to 3
mystr=mystr+left(ipstr,instr(ipstr,"."))
ipstr=mid(ipstr,instr(ipstr,".")+1,len(ipstr))
next
mystr=mystr+"*"

不知行不行,一个思路,没测试
ChinaOk 2003-09-20
  • 打赏
  • 举报
回复
去google搜索 Script56 chm 找中文简体就可以了。下载 script56.chm这个.
非常有用。
ChinaOk 2003-09-20
  • 打赏
  • 举报
回复
获得ip的字符串后,用
strIP = StrReverse(strIP)
strIP = Mid(instr(strIP,".")+1,1024) '1024可是够长了吧.,,,+1 就不要那个点了
strIP = StrReverse(strIP)




28,406

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧