网店  商城  街招  黄页  地图  诗歌  友链  交友
账号密码 注册
  新圩网 >> 新圩论坛 >> 百科聚焦 >> 电脑窍门 >> 我要发贴
普通主题 
查看:1518 | 回复:0   【  】【打印】 【前贴】【后贴
crying2014-04-06 09:39:21


主题:10
回复:3
积分:23

发私信
#T= 取上一页地址
Request.ServerVariables("HTTP_REFERER")

#T= 取服务器的名称1
Request.ServerVariables("SERVER_NAME")

#T= 取服务器的名称2
Request.ServerVariables("HTTP_HOST")

#T= 取服务器IP
Request.ServerVariables("LOCAL_ADDR")

#T= 取用户IP
Request.ServerVariables("Remote_Host")

#T= 取用户真实IP1
Request.serverVariables("REMOTE_ADDR")

#T= 取用户真实IP函数
Function GetRealIP()
GetRealIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
IF(GetRealIP = "")THEN GetRealIP = Request.ServerVariables("REMOTE_ADDR")
End Function

#T= 取服务器端口
Request.ServerVariables("SERVER_PORT")

#T= 取服务器操作系统
Request.ServerVariables("OS")

#T= 取服务器的绝对路径
Request.ServerVariables("APPL_PHYSICAL_PATH")

#T= 取本文件的绝对路径1
Requet.ServerVariables("PATH_TRANSLATED")

#T= 取本文件的绝对路径2
Server.mappath(Request.ServerVariables("script_NAME"))

#T= 取本文件的相对路径1
Request.ServerVariables("URL")

#T= 取本文件的相对路径2
Request.ServerVariables("script_NAME")

#T= 取本文件的相对路径3
Request.ServerVariables("PATH_INFO")

#T= 取地址栏后的参数
Request.ServerVariables("QUERY_STRING")

#T= 取服务器系统信息
Request.ServerVariables("HTTP_USER_AGENT")

#T= 服务器组件检测
<%
Function IsObjInstalled(strClassString)
On Error Resume Next
IsObjInstalled = False
Err = 0
Dim xTestObj
SET xTestObj = Server.CreateObject(strClassString)
IF(0 = Err)THEN IsObjInstalled = True
SET xTestObj = Nothing
Err = 0
End Function
'IF(IsObjInstalled("Persits.Upload")=True)THEN
' Response.Write "支持AspUpload组件"
'ELSE
' Response.Write "不支持AspUpload组件"
'END IF
%>

#T= 取客户端语言环境
^!Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")

#T= 取客户端信息:HTTP_USER_AGENT
^!Request.ServerVariables("HTTP_USER_AGENT")

#T= 取表单(Form)值元素值
Request.Form("^!")

#T= 取URL传递的值
Request.QueryString("^!")

#T= 取完整URL地址
Function GetUrl()
GetUrl="http://"&Request.ServerVariables("SERVER_N ... .ServerVariables("URL")
IF(Request.ServerVariables("QUERY_STRING")<>"")THEN GetURL=GetUrl&"?"& Request.ServerVariables("QUERY_STRING")
End Function


 
      回复主贴
您需要登录后才能参与回复


Copyright © 2010-2014 www.537406.com 桂ICP备14003809号 www.jtdx.cn All Right Reserved
新圩网友交流聊天QQ总群 8287305 新圩交友娱乐QQ总群
 
本站是严谨而开放的信息平台,其内容为会员自行收集发布,如果您认为有关内容不适宜在本站展示,或者展示得不正确,请及时通知管理员删除或修改