ho 4 elenchi
Ho creato 1 tabelle con il nome da assegnare all'elenco ed id_nomeelenco
ed un altra tabella (elenco) con il nome degli elementi dell'elenco, un campo id_elenco ed un altro campo id_nomeelenco


La domanda è come faccio ad incrementare id_nome_elenco?
codice:
Set objRs = Server.CreateObject("ADODB.Recordset")
		Sql = "SELECT * FROM elenco WHERE id_nomeelenco="& id_nomeelenco &" ORDER BY Id_elenco"
		objRs.Open Sql, objConn, adOpenDynamic, adLockOptimistic
		do until objRs.EOF
		elenco = elenco +1 %>
				<div id="lista<%=elenco%>">
					<% select case id_nomeelenco
					case 1: Response.Write("<h3>1</h3>")
					case 2: Response.Write("<h3>2</h3>")
					case 3: Response.Write("<h3>3</h3>")
					case 4: Response.Write("<h3>4</h3>")
					End select %>
					<ul>
					[*]<%=objRs("Elenco")%>
					<%	objRs.MoveNext 
						loop 
						objRs.Close
						set objRS = Nothing
						objConn.Close
						set objConn = Nothing%>