Html 从数据库中提取并在不同的标记中显示它们

我有一个数据库，我有这个代码，它从数据库中获取信息并将其显示在表中

   <table border="1">
   <tr><th>ID</th><th>Name</th><th>Age</th><th>Gender</th><th>City</th></tr>
   <%do until rs.EOF%>
   <tr>
 <%for each x in rs.Fields%>
 <%IF (x.value="ID") THEN%>
 <td><a href="form7.asp?id=1">
 <%Response.Write(x.value)%>
 </td>
 <%ELSE%> 
 <td>
 <%Response.Write(x.value)%><a/>
 </td>
 <%END IF%>

   <%next%>
   </tr>
   <%
   rs.MoveNext
   loop
   %>
   </table>

   <%
   rs.close
   conn.close
   %>

IDNameAgeGenderCity

这将显示所有的信息作为一个超链接，我想要的只是其中一个显示为链接，其余的假设是正常的文本

例如，我只希望id作为链接标记，其余的我希望将其显示为普通标记

---

怎么做？有人能帮忙吗？

你的代码太混乱了

这就是你需要的

<table border="1">
    <tr>
        <th>ID</th>
        <th>Name</th>
        <th>Age</th>
        <th>Gender</th>
        <th>City</th>
    </tr>

    <%do until rs.EOF%>
        <tr>
            <%for each x in rs.Fields%>
                <%IF (x.value="ID") THEN%>
                    <td>
                        <a href="form7.asp?id=<%=rs(x.value)%>">
                            <%Response.Write rs(x.value)%>
                        </a>
                    </td>
                <%ELSE%> 
                    <td>
                        <%Response.Write rs(x.value)%>
                    </td>
                <%END IF%>
            <%next%>
        </tr>
    <%
        rs.MoveNext
        loop
    %>
</table>

身份证件
名称
年龄
性别
城市

但是，如果查询返回的字段比

表头的字段多，则表将出错。

<table border='1' cellspacing='2' cellpadding='2'>
    <tr>
        <th>ID</th>
        <th>Name</th>
        <th align=right>Age</th>
        <th>Gender</th>
        <th>City</th>
    </tr>

    <%
    do until rs.EOF
        response.write("<tr>") & vbCrLf

        response.write("<td>")
        response.write("<a href='form7.asp?id=" & rs("ID") & "'>")
        response.Write rs("ID")
        response.Write ("</a>")
        response.Write ("</td>")

        '======================
        'NOTE: I'm breaking these next 4 columns down instead of using your "for" loop
        'REASON: Inevitably you will want to format these differently from each other
        'See the "age" column as an example.
        'Also: easier to understand what is going on
        '======================
        response.write("<td>")
        response.Write rs("Name")
        response.Write ("</td>")

        response.write("<td align=right>")
        response.Write rs("Age")
        response.Write ("</td>")

        response.write("<td>")
        response.Write rs("Gender")
        response.Write ("</td>")

        response.write("<td>")
        response.Write rs("City")
        response.Write ("</td>")

        response.write("</tr>") & vbCrLf

        rs.MoveNext
        loop
        rs.close
        set rs=nothing
    %>
</table>

身份证件
名称
年龄
性别
城市
如果（x.value==“id”）。。。否则…@mplungjan你能检查一下我编辑的代码吗。。你是说这样吗？这将把它全部打印为普通文本，然后x.value不是你想要的“ID”。@mplungjan好的，这是我想要的，但这是我只想要一个特定ID的时候。。我希望整个id列成为一个超链接。。怎么做？