网上客房预订系统(ASP+Access+系统功能结构图+文件架构图+源代码) 第9页

<%

      set rs=server.createobject("adodb.recordset")

      if request("action")="change" then

            sql="select top 1 * from admin"

            rs.open sql,conn,3,3

            rs("admin_name")=request("admin_name")  '修改用户名

            rs("admin_pass")=request("admin_pass")    '修改用户密码

            rs.update

            rs.close

            response.write "您的更改已成功"

      elseif request("action")="change2" then  '判断是否接收到表单值

            sql="select top 1 * from admin"

            rs.open sql,conn,3,3

            rs("mingcheng")=request("mingcheng")

            rs.update

            rs.close

            response.write "您的更改已成功"

      else

            sql="select top 1 * from admin"   '显示第一条记录

            rs.open sql,conn,3,3

%>

          .........

<% end if%>

更改初始信息页面的运行结果如图15所示。

图15  更改初始信息页面运行结果

6.4.3．查看服务器信息管理模块设计

查看服务器信息管理模块可以查看不同服务的相关信息，如服务器的IP地址、显示站点路径、服务器的CPU数量等。查看服务器信息管理页面的设计效果如图16所示。

图16  查看服务器信息管理页面设计效果

查看服务器信息管理模块所涉及到的程序代码如下：

      <td width="30%" valign=middle> 显示客户发出的所有HTTP标题 </td>

      <td width="70%"><%=request.ServerVariables("All_Http")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 检取ISAPIDLL的metabase路径 </td>

      <td width="70%"><%=request.ServerVariables("APPL_MD_PATH")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 显示站点物理路径 </td>

      <td width="70%"><%=request.ServerVariables("APPL_PHYSICAL_PATH")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 路径信息 </td>

      <td width="70%"><%=request.ServerVariables("PATH_INFO")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 显示请求机器IP地址 </td>

      <td width="70%"><%=request.ServerVariables("REMOTE_ADDR")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 服务器IP地址 </td>

      <td width="70%"><%=Request.ServerVariables("LOCAL_ADDR")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 显示执行SCRIPT的虚拟路径 </td>

      <td width="70%"><%=request.ServerVariables("SCRIPT_NAME")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 返回服务器的主机名，DNS别名，或IP地址 </td>

      <td width="70%"><%=request.ServerVariables("SERVER_NAME")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 返回服务器处理请求的端口 </td>

      <td width="70%"><%=request.ServerVariables("SERVER_PORT")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 协议的名称和版本 </td>

      <td width="70%"><%=request.ServerVariables("SERVER_PROTOCOL")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 服务器的名称和版本 </td>

      <td width="70%"><%=request.ServerVariables("SERVER_SOFTWARE")%></td>

    </tr>

    <tr>

      <td width="30%" valign=top> 服务器操作系统 </td>

      <td width="70%"><%=Request.ServerVariables("OS")%></td>

    </tr>

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >>