asp WAP获取手机终端信息的一段代码
2018-09-06 11:46
复制代码 代码如下:
<%
DimIp,number,mobiletype,loca,uri
DimConn,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)
Sql=Select*FromVisitororderByIdDESC
Rs.OpenSql,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
SetRs=Nothing
SetConn=Nothing
%>
上一篇:动态按钮生成器(下)
文章标题:asp WAP获取手机终端信息的一段代码
文章链接:http://soscw.com/index.php/essay/9705.html