asp获取当前路径语句大全
在asp开发中经常需要用到当前页面的路径，相对的，绝对的，有参数的，没有参数的，这里整理一下，个人感觉很全的asp获取页面路径语句大全，例如：request.servervariables script_name SERVER_SOFTWARE
文件ip路径：<%="http://" & request.servervariables("server_name")& request.servervariables("script_name") %> <br/>
本机ip:<%=request.servervariables("remote_addr")%> <br/>
服务器名:<%=Request.ServerVariables("SERVER_NAME")%><br/>
服务器IP:<%=Request.ServerVariables("LOCAL_ADDR")%><br/>
服务器端口:<%=Request.ServerVariables("SERVER_PORT")%><br/>
服务器时间:<%=now%><br/>
IIS版本:<%=Request.ServerVariables("SERVER_SOFTWARE")%><br/>
脚本超时时间:<%=Server.ScriptTimeout%><br/>
本文件路径:<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%><br/>
服务器CPU数量:<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%><br/>
服务器解译引擎:<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."&ScriptEngineBuildVersion %><br/>
服务器操作系统:<%=Request.ServerVariables("OS")%> <br/>
支持的文件类型：<%=Request.ServerVariables("HTTP_Accept")%> <br/>
访问的文件路径：<%=Request.ServerVariables("HTTP_url")%> <br/>
用户代理的信息：<%=Request.ServerVariables("HTTP_USER_AGENT")%> <br/>
获取url中的文件名和传过来的值:request.ServerVariables("script_name")+"?"+request.ServerVariableS("QUERY_STRING") <br/>
-----------------------------------------------------------------------------------------------------
产生的如下：
本文件ip路径：http://localhost/ceshi.asp
本机ip:127.0.0.1
服务器名:localhost
服务器IP:127.0.0.1
服务器端口:8091
服务器时间:2005-7-27 14:28:04
IIS版本:Microsoft-IIS/5.0
脚本超时时间:90
本文件路径:E:\hospital\ceshi.asp
服务器CPU数量:2
服务器解译引擎:VBScript/5.6.7426
服务器操作系统:Windows_NT
支持的文件类型：image/g
相关文档：
可以使用下面的任何ASP内置对象，而不必在ASP脚本中特别声明。
1． Request：
定义：可用来访问从浏览器发送到服务器的请求信息，可用此对象读取已输入HTML表单的信息。
集：
Cookies：含有浏览器cookies的值
Form：含有HTML表单域中的值
QueryString：含有查询字符串的值
ServerVariables：含有头和环境变量 ......
主目录,配置下别忘了启用父目录
问题症状：
ADODB.Connection 错误 '800a0ea9' 未指定提供程序，也没有指派的默认提供程序。
问题分析：
Windows 64位的系统上，运行下列32bit(位)应用程序，不能够完全兼容，需要独立操作解决。程序列表如下：
Internet服务API扩展
ISAPI过滤器
ASP应用程序
ASP.NET应用程序
� ......
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Option Explicit
Response.Buffer = True '缓存图片
Dim objXMLHTTP, XML
Set XML = Server.CreateObject("Microsoft.XMLHTTP") '建立下载对象
XML.Open "GET","http://www.google.cn/images/nav_logo7.png",False '开始获取图片,http://xxx/png这节可以改成� ......
<%
Response.Buffer = true
Response.Clear
dim url
Dim fso,fl,flsize
dim Dname
Dim objStream,ContentType,flName,isre,url1
Dim strFileName
strFileName=replace(replace(Request("file"),"\",""),"/","") '传参
strFileName="/files/"&strFileName ' 改成你你文件的存 ......
