技术支持 > 产品图片 > 安装照片 > 产品照片 安装照片     6X60度扇区   AP屏蔽罩   扇区覆盖     监控1   监控2   监控3     监控4   监控5   监控6     监控7   蹦极塔基站   点对点       汇集站   景色

无线网桥 无线监控 视距通信 视频编码器 无线城域网 无线ISP接入 系统避雷接地 无线网桥 城域无线视频监控

专业无线网桥、无线监控设备销售---HiCONTECH 公司　网站地图

HiCONTECH WIRELESS 中国区技术服务中心　 技术支持电话：010-82827089、13501193420 电子邮箱：tech@hicon-tech.com.cn

<% Dim ValidEntry ValidEntry = False If InStr(Request.ServerVariables("HTTP_USER_AGENT"),"Googlebot") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"Baiduspider") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"Gaisbot") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"ia_archiver") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"Slurp") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"ZyBorg") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"msnbot") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"MSIECrawler") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"AIBOT") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"SpiderMan") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"UdmSearch") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"202.108.1.5") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"SurveyBot") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"BecomeBot") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"TurnitinBot") > 0 or InStr(Request.ServerVariables("HTTP_USER_AGENT"),"IRLbot") > 0 Then ValidEntry = True End If If ValidEntry Then dim conn1 dim connstr1 on error resume next connstr1="DBQ="+server.mappath("transin_stat.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn1=server.createobject("ADODB.CONNECTION") conn1.open connstr1 set rs1=server.createobject("adodb.recordset") sql1="select * from t_spider where (Id is null)" rs1.open sql1,conn1,1,3 rs1.addnew rs1("PageUrl")=Request.ServerVariables("URL") rs1("ip")=Request.ServerVariables("REMOTE_ADDR") rs1("UserAgent")=Request.ServerVariables("HTTP_USER_AGENT") rs1.update rs1.close set rs1=nothing conn1.close set conn1=nothing End If %>