asp 实现显示所有的服务器变量值的函数
2018-09-06 11:55
阅读：643
<%
******************************
函数：ShowServerVar(VarName)
参数：VarName，如提供变量名，则显示该变量值，如果参数为空则显示所有变量值
作者：阿里西西
日期：2007/7/13
描述：显示所有的服务器变量值，返回值:对应值的字符串
示例：<%=ShowServerVar(VarName)%>
******************************
FunctionShowServerVar(VarName)
dimdest
ifVarName=then
foreachdestinRequest.ServerVariables
ShowServerVar=ShowServerVar&<li>Request.ServerVariables(&dest&)=&Request.ServerVariables(dest)&</li>&vbcrlf
next
else
ShowServerVar=Request.ServerVariables(VarName)
endif
Endfunction
%>
下一篇：asp复制文件夹代码
评论
亲，登录后才可以留言！