servervar.asp

诚信商店系统源代码

<%@Language="VBSCRIPT"%>
<table border="1" width="550" cellpadding="3" cellspacing="0" bgcolor="#D6D3CE" bordercolordark="#FFFFFF" bordercolorlight="#808080" align="center" >
<%
dim LoopCount
LoopCount=0
For Each ServerVariable In Request.ServerVariables
LoopCount=LoopCount+1
if LoopCount Mod 2=0 then
%>
<tr><td><%=ServerVariable%></td><td><%=Request.ServerVariables(ServerVariable)%></td></tr>
<%else%>
<tr><td><%=ServerVariable%></td><td><%=Request.ServerVariables(ServerVariable)%></td></tr>
<%end if
next%>
</table>
<a href='<%=request.ServerVariables("SCRIPT_NAME")%>?wxl=01'>dsaf</a>