简单的代码转换
请问下面这部分代码用JAVASCRIPT怎么实现
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>获取系统信息</title>
</head>
<body>
<%
Response.Write("运行ASP文件的路径:" + Request.ServerVariables("SCRIPT_NAME"))
Response.Write("<br>返回content的数据长度:" + Request.ServerVariables("CONTENT_LENGTH"))
Response.Write("<br>返回客户的IP地址:" + Request.ServerVariables("REMOTE_ADDR"))
Response.Write("<br>浏览器名:" + Request.ServerVariables("HTTP_USER_AGENT"))
Response.Write("<br>返回主页实际的物理路径:" + Request.ServerVariables("APPL_PHYSICAL_PATH"))
%>
<table cols="8" cellpadding="5" border="0">
<tr>
<td align="center" bgcolor="#800000" width="109"><font style="ARIAL NARROW" color="#FFFFFF" size="2">环境变量名</font></td>
<td align="center" width="459" bgcolor="#800000"><font style="ARIAL NARROW" color="#FFFFFF" size="2">结果</font></td>
</tr>
<%
dim Sv
for each Sv in Request.ServerVariables
Response.Write"<tr>"
Response.Write"<td bgcolor='f7efde' align = center><font style='ARIAL NARROW' size='2'>"
Response.Write Sv
Response.Write"</font></td>"
Response.Write"<td bgcolor='f7efde' align = center><font style='ARIAL NARROW' size='2'>"
Response.Write Request.ServerVariables(Sv)
Response.Write"</font></td></tr>"
next
%>
</table>
</body>
</html>