vorrei contare i commenti relativi ad un ID contenuti in una tabella!


<%
'---Dichiarazione variabili
Dim SQL, RS, Num_Commenti
%>
<% SQL = " SELECT * FROM Commenti WHERE Codice = '"& QSID &"'"
QSID = Request.QueryString("ID")
Set RS = Conn.Execute(SQL)
RS.Open SQL, Conn, 1
Num_Commenti = RS.RecordCount
%>
<%=Num_Commenti%>