⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 04_03a.asp

📁 ASPTest 网络基础网页设计
💻 ASP
字号:
<html>
<head>
<title>Form表单实例</title>
<style>
<!--
td           { font-size: 12px }
-->
</style>
</head>
<body>
<p align="center"><span lang="zh-cn"><font size="2">您</font></span><font size="2"><span lang="zh-cn">的注册信息:</span> </font>
<form method="POST" action="04_03a.asp">
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="484" height="223" align="center">
    <tr>
      <td align="right" bgcolor="#CDCDDE" width="84" height="19">注册ID:</td>
      <td bgcolor="#C0C0D6" align="center" width="400" height="19">
        <% 
        If Len(Request("txtID"))>0 Then
          Response.Write Request("txtID")
        Else
          Response.Write "未填写注册ID"
        End If
        %>
      </td>
    </tr>
    <tr>
      <td align="right" bgcolor="#CDCDDE" width="84" height="19">注册密码:</td>
      <td bgcolor="#CDCDDE" align="center" width="400" height="19">
        <% 
        If Len(Request("txtPWD"))>0 Then
          Response.Write Request("txtPWD")
        Else
          Response.Write "未填写注册密码"
        End If
        %>
      </td>
    </tr>
    <tr>
      <td align="right" bgcolor="#CDCDDE" width="84" height="19">确认密码:</td>
      <td bgcolor="#C0C0D6" align="center" width="400" height="19">
        <% 
        If Len(Request("txtRepeat"))>0 Then
          If Request("txtRepeat") = Request("txtPWD") Then
            Response.Write "确认密码一致"
          Else
            Response.Write "确认密码不一致"
          End If  
        Else
          Response.Write "未填写确认密码"
        End If
        %>
      </td>
    </tr>
    <tr>
      <td align="right" bgcolor="#CDCDDE" width="84" height="19">性别:</td>
      <td bgcolor="#CDCDDE" align="center" width="400" height="19">
        <%
        Response.Write Request.Form("rdSex")
        %>
      </td>
    </tr>
    <tr>
      <td align="right" bgcolor="#CDCDDE" width="84" height="19">爱好:</td>
      <td bgcolor="#C0C0D6" align="center" width="400" height="19">
        <%
        Response.Write Request.Form("chkInterest")
        %>
      </td>
    </tr>
    <tr>
      <td align="right" bgcolor="#CDCDDE" width="84" height="19">订阅:</td>
      <td bgcolor="#CDCDDE" align="center" width="400" height="19">
        <%
        Response.Write Request.Form("chkMark")
        %>
      </td>
    </tr>
    <tr>
      <td align="right" bgcolor="#CDCDDE" width="84" height="19">来自:</td>
      <td bgcolor="#C0C0D6" align="center" width="400" height="19">
        <%
        Response.Write Request.Form("mnFrom")
        %>
      </td>
    </tr>
    <tr>
      <td bgcolor="#CDCDDE" width="84" height="18"> </td>
      <td bgcolor="#CDCDDE" width="400" height="18"> </td>
    </tr>
    <tr>
      <td bgcolor="#CDCDDE" width="84" height="72">
      <p align="right">反馈意见:</td>
      <td bgcolor="#C0C0D6" width="400" height="72">
        <pre>        
<% 
        If Len(Request("txtrAdvice"))>0 Then
          Response.Write Request("txtrAdvice")
        Else
          Response.Write "未填写反馈意见"
        End If
        %>
        </pre> 
      </td>
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -