Sub display TableDatao Response Write <TABLE Border=I> Response. Write"<TR><TD>姓名:"&Name& /TD></TR>" Response. Write "<TR><TD>+3 " Sex&"</TD></TR>l Response. Write"<TR><TD>血型:"& Blood& </TD></TR>" Response. Write"<TR><TD>电话:"&Te&"<门D></R> Response.Wrte"<TR><TD>地址:"& Address& </TDX/TR>Response. Write < /TABLE> End Sub<% Sub DisplayTableData() Response.Write "<TABLE Border=1>" Response.Write "<TR><TD>姓名：" & Name & "</TD></TR>" Response.Write "<TR><TD>性别：" & Sex & "</TD></TR>" Response.Write "<TR><TD>血型：" & Blood & "</TD></TR>" Response.Write "<TR><TD>电话：" & Tel & "</TD></TR>" Response.Write "<TR><TD>地址：" & Address & "</TD></TR>" Response.Write "</TABLE>" End Sub %>