codice:
dim strhotel1dim strhotel1
	
	set rs2=server.createobject("ADODB.recordset")
	qry2 = "select top 1 * from  richieste WHERE stato = '"&stato&"' ORDER BY id desc"
 		
	rs2.Open qry2,conn
	
	if rs2.eof then
	response.write "nessun dato"
	
	do until rs2.eof 
	rs2.movenext 
	loop
	end if 
	'response.end()
	
	strhotel1 = ""if Trim(rs2.fields("hotel1")& "[]") <> "[]"   then 
	response.write "Hotel:"rs2.fields("hotel1")&" dal "&rs2.fields("datarrhtl1")&"al " &rs2.fields("dataparthtl1")&" notti : "& rs2.fields("pernhotel1")&
		end if ""
mi da l'errore prevista fine istruzione alla riga con caratteri in rosso ma