Select em ASP

Bom dia pessoal,

Tenho o seguinte código:

<%
Dim lojaDB
set lojaDB = Server.CreateObject("ADODB.Connection")
lojaDB.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:\Inetpub\wwwroot\Projetos\Lojas Adri\Projeto Lojas Adri\banco\loja.mdb"
lojaDB.open
%>

<center>
<table class=topo border=0 width="720" cellpadding=2 cellspacing=2>

	<td valign=middle align=right width="720"><p>
	<form action=listaprod.asp method=query target="principal">
	<font face="verdana" size="2" color="white"><b>
    Buscar  <input type=text size=20 name=nome>  em  <input type=text size=20 name=nome>  <input type=button value=Buscar onclick="submit();">
 <input type=hidden name=lista value=busca>
 </form></p>
	</td>
</tr>
</table>
Preciso que este código além de realizar a busca que já faz com perfeição tenha um campo select para que o usuário possa indicar no dropdown a categoria que deseja pesquisar. No banco existe uma tabela com o nome de categorias mas não é a mesma tabela onde estão os cadastrados os produtos. Não consigo nada que funcione para executar este script corretamente, será que algum dos amigos do Fórum pode me ajudar?

Obrigado e abraç oa todos!

Legionario