A. ASP 取得网址、截取字符串（含代码）
On Error Resume NextDim strTempIf LCase(Request.ServerVariables("HTTPS")) = "off" Then strTemp = "http://"Else strTemp = "https://"End IfstrTemp = strTemp & Request.ServerVariables("SERVER_NAME")If Request.ServerVariables("SERVER_PORT") <> 80 Then strTemp = strTemp & ":" & Request.ServerVariables("SERVER_PORT")strTemp = strTemp & Request.ServerVariables("URL")If Trim(Request.QueryString) <> "" Then strTemp = strTemp & "?" & Trim(Request.QueryString)strTemp = LCase(strTemp)
B. asp 读取当前页面文件名
asp 读取当前页面文件名参考代码如下:pathfilename=trim(Request.ServerVariables("SCRIPT_NAME"))for i=len(pathfilename) to 1 step -1 if mid(pathfilename,i,1)="/" then filename=right(pathfilename,len(pathfilename)-i) exit for end ifnext注意：获取文件名:(不带路径)= filename。
C. 关于asp获取当前文件名的问题
Request.ServerVariables("Url") 返回服务器地址Request.ServerVariables("Path_Info") 客户端提供的路径信息Request.ServerVariables("Appl_Physical_Path") 与应用程序元数据库路径相应的物理路径Request.ServerVariables("Path_Translated") 通过由虚拟至物理的映射后得到的路径Request.ServerVariables("Script_Name") 执行脚本的名称Request.ServerVariables("Query_String") 查询字符串内容Request.ServerVariables("Http_Referer") 请求的字符串内容Request.ServerVariables("Server_Port") 接受请求的服务器端口号Request.ServerVariables("Remote_Addr") 发出请求的远程主机的IP地址Request.ServerVariables("Remote_Host") 发出请求的远程主机名称Request.ServerVariables("Local_Addr") 返回接受请求的服务器地址Request.ServerVariables("Http_Host") 返回服务器地址Request.ServerVariables("Server_Name") 服务器的主机名、DNS地址或IP地址Request.ServerVariables("Request_Method") 提出请求的方法比如GET、HEAD、POST等等Request.ServerVariables("Server_Port_Secure")如果接受请求的服务器端口为安全端口时，则为1，否则为0Request.ServerVariables("Server_Protocol")服务器使用的协议的名称和版本Request.ServerVariables("Server_Software")应答请求并运行网关的服务器软件的名称和版本Request.ServerVariables("All_Http")客户端发送的所有HTTP标头，前缀HTTP_Request.ServerVariables("All_Raw")客户端发送的所有HTTP标头,其结果和客户端发送时一样，没有前缀HTTP_Request.ServerVariables("Appl_MD_Path")应用程序的元数据库路径Request.ServerVariables("Content_Length")客户端发出内容的长度Request.ServerVariables("Https")如果请求穿过安全通道（SSL），则返回ON如果请求来自非安全通道，则返回OFFRequest.ServerVariables("Instance_ID")IIS实例的ID号Request.ServerVariables("Instance_Meta_Path")响应请求的IIS实例的元数据库路径Request.ServerVariables("Http_Accept_Encoding")返回内容如：gzip,deflateRequest.ServerVariables("Http_Accept_Language")返回内容如：en-usRequest.ServerVariables("Http_Connection")返回内容：Keep-AliveRequest.ServerVariables("Http_Cookie")返回内容如：nVisiT%2DYum=125;ASPSESSIONIDCARTQTRA=FDOBFFABJGOECBBKHKGPFIJI;ASPSESSIONIDCAQQTSRB=LKJJPLABABILLPCOGJGAMKAM;ASPSESSIONIDACRRSSRA=DKHHHFBBJOJCCONPPHLKGHPBRequest.ServerVariables("Http_User_Agent")返回内容：Mozilla/4.0(compatible;MSIE6.0;WindowsNT5.1;SV1)Request.ServerVariables("Https_Keysize")安全套接字层连接关键字的位数，如128Request.ServerVariables("Https_Secretkeysize")服务器验证私人关键字的位数如1024Request.ServerVariables("Https_Server_Issuer")服务器证书的发行者字段Request.ServerVariables("Https_Server_Subject")服务器证书的主题字段Request.ServerVariables("Auth_Password")当使用基本验证模式时，客户在密码对话框中输入的密码Request.ServerVariables("Auth_Type")是用户访问受保护的脚本时，服务器用於检验用户的验证方法Request.ServerVariables("Auth_User")代证的用户名Request.ServerVariables("Cert_Cookie")唯一的客户证书ID号Request.ServerVariables("Cert_Flag")客户证书标志，如有客户端证书，则bit0为0如果客户端证书验证无效，bit1被设置为1Request.ServerVariables("Cert_Issuer")用户证书中的发行者字段Request.ServerVariables("Cert_Keysize")安全套接字层连接关键字的位数，如128Request.ServerVariables("Cert_Secretkeysize")服务器验证私人关键字的位数如1024Request.ServerVariables("Cert_Serialnumber")客户证书的序列号字段Request.ServerVariables("Cert_Server_Issuer")服务器证书的发行者字段Request.ServerVariables("Cert_Server_Subject")服务器证书的主题字段Request.ServerVariables("Cert_Subject")客户端证书的主题字段Request.ServerVariables("Content_Type")客户发送的form内容或HTTPPUT的数据类型
D. ASP获取地址栏地址和目录
Function GetUrl() Dim ScriptAddress,Servername,qs ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME")) Servername = CStr(Request.ServerVariables("Server_Name")) qs=Request.QueryString if qs<>"" then GetUrl ="http://"& Servername & ScriptAddress &"?"&qs else GetUrl ="http://"& Servername & ScriptAddress end if End Functionurl=geturl()url=left(url,InstrRev(url,"/"))response.Write(url)
