asp WAP获得手机终端信息的一段代码
发布时间:2023-09-04 15:26:11 所属栏目:Asp教程 来源:
导读:复制代码 代码如下:
<%
Dim Ip,number,mobiletype,loca,uri
Dim Conn,Sql,Rs
Ip=Request.ServerVariables("REMOTE_ADDR")
uri=Request.ServerVariables("PATH_INFO")
number1=Request.ServerVariab
<%
Dim Ip,number,mobiletype,loca,uri
Dim Conn,Sql,Rs
Ip=Request.ServerVariables("REMOTE_ADDR")
uri=Request.ServerVariables("PATH_INFO")
number1=Request.ServerVariab
复制代码 代码如下: <% Dim Ip,number,mobiletype,loca,uri Dim Conn,Sql,Rs Ip=Request.ServerVariables("REMOTE_ADDR") uri=Request.ServerVariables("PATH_INFO") number1=Request.ServerVariables ( "HTTP_x-up-calling-line-id" ) mobile1=Request.ServerVariables ( "HTTP_User-Agent" ) number = Right(number1,Len(number1)-2) mobile2 = Split(mobile1,"/") mobiletype=mobile2(0) loca=Request.Cookies( "CUI" ) Sql="Select * From Visitor order By Id DESC" Rs.Open Sql,Conn,1,3 Rs.Addnew Rs("SDate")=date Rs("STime")=time Rs("IP")=Ip Rs("UserNo")=number Rs("MobileType")=mobiletype Rs("CUI")=loca Rs("URI")=uri Rs.Update Rs.Close Conn.Close Set Rs=Nothing Set Conn=Nothing %> (编辑:汽车网) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |
推荐文章
站长推荐