Sto cercando di aggiungere al link del risultato della ricerca anche l'ID del prodotto per poterlo passare come variabile ma non ci riesco!

----> href='ModCons.asp?id=Rec('id')'

codice:
<%@LANGUAGE = JScript%>
<%
	Response.Buffer = true;
	var Cn = new ActiveXObject("ADODB.Connection");
		Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("/mdb-database/circuiti.mdb"));
	var testo = new String(Server.HTMLEncode(Request.Form("cerca")));
	var r_testo = testo.replace(/'/g,"''");
	var cerca = r_testo.split(" "); // Tutte le parole chiave devono essere separate da uno spazio vuoto
	var sql = "SELECT * FROM consuntivo WHERE ";
		for (var i=0; i<cerca.length; i++)
		{
			if (i > 0) sql += " AND";
			sql += " codice LIKE '%" + cerca[i] + "%'";
		}
		sql += " ORDER BY data";
	var Mostra = Cn.Execute(sql);
%>
<html>
<head>
<title>Cerca</title>
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body>
<b class="titoli">Cerca[/b]
	<form method="post" action="cerca.asp">
		<input type="text" name="cerca" size="50" value="<%cerca != "undefined" ? Response.Write(testo) : Response.Write("")%>">
		<input type="submit" value="Cerca">
	</form>
<%if (testo != "undefined") {%>


Risultati della ricerca per il termine <font color="Red"><%=testo%></font></p>
<%
	if (testo == "" || testo == "undefined" || testo.charAt(0) == " ")
	{
		Response.Write("

Inserire un termine per effettuare una ricerca</p>");
	}
	else if (Mostra.EOF)
	{
		Response.Write("

Nessun risultato</p>");
	}
	else
	{
		while (!Mostra.EOF)
		{
			with (Response)
			{
			Write("

");
			Write("" + Mostra("descrizione") + "
");
			Write(Mostra("descrizione") + "
");
			Write("" + Mostra("cliente") + "");
			Write("</p>");
			}
			Mostra.MoveNext();
		}
	}
%>
<%}%>
</body>
</html>
<%Cn.Close()%>