grazie, ma la cosa è un pò complicata, ho scritto così ma anche sui record presenti, li fa vedere ma stampa che non esistono:
codice:
set rs = cmd.Execute

if not rs.eof then 
Thread  = rs("Thread")
else
response.write "record ko"
end if

if not rs.eof then 
sTopic = rs("Topic")
response.write "record ko"
end if

if sCaption <> "" then
response.write "<FONT COLOR = RED>" & sCaption & "</FONT>

"
else
response.write "record ko"
end if