复制代码代码如下:
<٪
dimip ، الرقم ، 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")
رقم = يمين (رقم 1 ، لين (رقم 1) -2)
mobile2 = split (mobile1 ، "/")
mobiletype = mobile2 (0)
loca = request.cookies ("CUI")
SQL = "SELECT*FROMVISITITORDRYBYIDDESCE"
Rs.Opensql ، Conn ، 1،3
Rs.Addnew
RS ("sdate") = التاريخ
RS ("Stime") = الوقت
RS ("IP") = IP
RS ("userno") = الرقم
RS ("mobiletype") = mobiletype
RS ("CUI") = loca
RS ("uri") = URI
Rs.update
Rs.close
conn.close
setRs = لا شيء
setConn = لا شيء
٪>