[SQL] [ASP] - SELECT

CNN=Application("CNN")
set conn=Server.CreateObject("ADODB.Connection")
conn.open CNN
Set rs = Server.CreateObject("ADODB.Recordset")

qry="SELECT * FROM nome_tabella WHERE id = "& id &" ;"

rs.Open qry,conn

'se il db è vuoto...
if rs.eof then

'assegno 1 ad una variabile chiamata db_vuoto
db_vuoto = 1
%>

scrivo qualcosa in html...

<%
altrimenti...
else

'il db non è vuoto
db_vuoto = 0

nome_campo = rs.fields("nome_campo")

rs.MoveNext

rs.close
set rs = nothing
conn.close
set conn = nothing