msgbox check_ip("1.1.1.1")
Function check_ip(ip)
Dim regEx
set regEx = new regExp
regEx.pattern = "^(([01]?[\d]{1,2})|(2[0-4][\d])|(25[0-5]))(\.(([01]?[\d]{1,2})|(2[0-4][\d])|(25[0-5]))){3}$"
check_ip = regEx.test(ip)
End Function

成都创新互联公司专注为客户提供全方位的互联网综合服务,包含不限于成都网站设计、成都做网站、迪庆州网络推广、微信平台小程序开发、迪庆州网络营销、迪庆州企业策划、迪庆州品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等,从售前售中售后,我们都将竭诚为您服务,您的肯定,是我们最大的嘉奖;成都创新互联公司为所有大学生创业者提供迪庆州建站搭建服务,24小时服务热线:13518219792,官方网址:www.cdcxhl.com

售后响应及时
7×24小时客服热线
数据备份
更安全、更高效、更稳定
价格公道精准
项目经理精准报价不弄虚作假
合作无风险
重合同讲信誉,无效全额退款