Combo box con asp

[Dromo]

Tengo un combox enlazado con una bases de datos. Necesito que al seleccionar la lista se redireccione automaticamente sin necesidad de un boton "ir"
Este es el código:

<select name="categoria" size="1" class="texto" >
<%
Dim DBName, Conexion, Tabla, Tabla2, Sql

Set Conexion = Server.CreateObject("ADOdb.connection")
Set Tabla2 = Server.CreateObject("ADOdb.recordset")

Conexion.Open "compras"

Sql="Select * From categ order by id"

Set Tabla = Conexion.Execute(Sql)

Tabla2.Open Sql, Conexion

If Tabla.BOF And Tabla.EOF Then
%>
<option>Todas</option>
<%
Else
While Not Tabla.EOF
%>
<option><%=Tabla.Fields("categoria")%></option>
<%
Tabla.MoveNext
Wend
Tabla.Close
Conexion.Close
End If
%>
</select>

Me pueden complementar el código???
Lo necesito URGEEENTTEE¡¡¡¡¡¡¡¡¡¡¡

Dromo