如上图，我想只用一个表单做出搜索来，而不用那么多表单搜索，而只搜索相应的数据库中的项目，请问这个搜索的SQL语句该怎么写？

谢谢！

比如我如果用五个表单分别做５个页面的话，他们的SQL是这样写的：
1.num.asp
set rs=server.createobject("adodb.recordset")
sql="SELECT * FROM admin where Gnum like '%"&Gnum&"%'"
rs.open sql,conn,1,1
end if
%>

2.name.asp
set rs=server.createobject("adodb.recordset")
sql="SELECT * FROM admin where name like '%"&name&"%'"
rs.open sql,conn,1,1
end if
%>

3.mail.asp
set rs=server.createobject("adodb.recordset")
sql="SELECT * FROM admin where mail like '%"&mail&"%'"
rs.open sql,conn,1,1
end if
%>

4.mobile.asp
set rs=server.createobject("adodb.recordset")
sql="SELECT * FROM admin where mobile like '%"&mobile&"%'"
rs.open sql,conn,1,1
end if
%>

5.all.asp
set rs=server.createobject("adodb.recordset")
sql="SELECT * FROM admin where Gnum & name & mail & mobile like '%"&keyword&"%'"
rs.open sql,conn,1,1
end if
%>

可是我这样得要５个表单，五个页面来完成，虽然没有什么问题，但是感觉麻烦，所以就想问一下大家，怎么用一个表单提交该怎么做？

多谢rainic，本来我的意思就是想知道怎么用代码来判断你所谓的用隐藏域的搜索问题，因为没有想到，所以先假想用五个表单来做，幸好没有动手，请指点一下，谢谢！

多谢楼上提醒，一下子傻了，都不知道干吗了，谢谢！

不过还是有点问题，麻烦楼上兄弟帮个忙，我按照要求写的程序：
搜索页：
<table width="362" height="31" border="0" cellpadding="0" cellspacing="1">
<form action="zhao.asp" method="get" name="form1" id="form1">
<tr>
<td width="359">搜索
<select name="sea" id="sea">
<option value="Gnum">用户编号</option>
<option value="Gname">用户名称</option>
</select>
<input name="Keyword" type="text" id="Keyword" />
<input type="submit" name="Submit" value="提交" /></td>
</tr>
</form>
</table>

参数传递页面：zhao.asp

<!--#include file="Connections/Conn.asp" -->
<%
Dim Recordset1__Keyword
Recordset1__Keyword = "%"
If (Request("Keyword") <> "") Then
Recordset1__Keyword = Request("Keyword")
End If
%>
<%
Dim Recordset1
Dim Recordset1_numRows
dim sea

sea =request("sea")
Select Case sea
Case "Gnum"
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_Conn_STRING
Recordset1.Source = "SELECT * FROM admin where Gnum like '%" + Replace(Recordset1__Keyword, "'", "''") + "%' ORDER BY Gnum DESC"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0

Case "Gname"
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_Conn_STRING
Recordset1.Source = "SELECT * FROM admin where Gnum like '%" + Replace(Recordset1__Keyword, "'", "''") + "%' ORDER BY Gnum DESC"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0

end select
%>
可是提交的时候为什么总会出现乱七八糟的错误，要么就是缺少对象，要么就是记录集为真假问题，请帮忙看一下我的参数传递是否正确！

谢谢

谢谢google,不过我已经解决了，就用上面的没有问题了！