用select case ...可以写不同的表单吗？
我想用select case ...在一个页面根据不同的case值写不同的表单，这应该怎样才能实现呢？下面是我写的文件：
<%@LANGUAGE= "VBSCRIPT " CODEPAGE= "936 "%>
<html>
<head>
<meta http-equiv= "Content-Type " content= "text/html; charset=gb2312 ">
<title> 后台用户管理 </title>
<!--#include file= "conn1.asp "-->
</head>
<body>
<table width= "780 " border= "0 " align= "center " cellpadding= "0 " cellspacing= "1 " bgcolor= "#CCCCCC ">
<tr>
<td align= "center " valign= "top " bgcolor= "#FFFFFF ">
<%dim action
action=request.QueryString( "action ")
select case action
case edit
dim rs,sql
set rs=server.CreateObject( "adodb.recordset ")
sql= "select * from admin where name= ' "&request.QueryString( "name ")& " ' "
rs.open sql,conn,1,1
%>
<form action= "saveEditUser.asp " name= "form1 ">
<table width= "500 " border= "0 " cellspacing= "1 " cellpadding= "0 " bgcolor= "#99CCFF ">
<tr class= "kind ">
<td colspan= "2 " align= "center "> 修改后台用户 </td>
</tr>
<tr class= "kind ">
<td width= "150 " align= "center "> 用户名 </td>
<td width= "343 "> <input name= "user " type= "text " size= "20 " maxlength= "50 " value= " <%=rs( "name ")%> "> </td>
</tr>
<tr class= "kind ">
<td align= "center "> 密 码 </td>
<td> <input name= "pwd " type= "password " size= "20 " maxlength= "50 " value= " <%=rs( "pwd ")%> "> </td>
</tr>
<tr class= "kind ">
<td align= "center "> 用户级别 </td>
<td align= "left "> <select name= "jb ">
</select> </td>
</tr>
<tr class= "kind ">
<td colspan= "2 " align= "center ">
<input type= "submit " value= "保存 ">
<input type= "reset " value= "重填 "> </td>
</tr>
</table>
</form>
<%rs.close
set rs=nothing
conn.close
set rs=nothing
%>
<%case del
dim sql1
sql1= "delete from admin where name= ' "&request.QueryString( "name ")& " ' "
conn.execute(sql1)
response.write " <script language= 'javascript '> alert( '成功删除该用户! ');location= 'userManage.asp '; </script> "
response.redirect "userManage.asp "
conn.close
set conn=nothing
%>
<% case add %>
<form action= "saveAddUser.asp " name= "form2 ">
<table width= "500 " border= "0 " cellspacing= "1 " cellpadding= "0 " bgcolor= "#99CCFF ">
<tr class= "kind ">
<td colspan= "2 " align= "center "> 添加后台用户 </td>
</tr>
<tr class= "kind ">
<td width= "150 " align= "center "> 用户名 </td>
<td width= "343 "> <input name= "user " type= "text " size= "20 " maxlength= "50 "> </td>
</tr>
<tr class= "kind ">
<td align= "center "> 密 码 </td>
<td> <input name= "pwd " type= "password " size= "20 " maxlength= "50 "> </td>
</tr>
<tr class= "kind ">
<td align= "center "> 用户级别 </td>
<td align= "left "> <select name= "jb ">
</select> </td>
</tr>
<tr class= "kind ">
<td colspan= "2 " align= "center ">
<input type= "submit " value= "添加 "> <input type= "reset " value= "重填 "> </td>
</tr>
</table>
</form>
<%end select%>
</td>
</tr>
</table>
</body>
</html>
运行却不能达到我的目的：根据不同的case值，在一个页面中写出不同的表单，或实现不同的功能。
请教高手，如何才能实现上述目的？
[解决办法]
例如:
<%
select case
case edit
response.write " <form name= 'form1 '> ......... </form> "
case del
response.write " <form name= 'form2 '> ......... </form> "
....
%>