Prova così:

codice:
IF  sql_SCHEDA = "" then
	titolo = "NUOVA SCHEDA:" 
	else	
	Set rs2 = Server.CreateObject("ADODB.Recordset") 
	response.write sql_scheda
	RS2.Open sql_SCHEDA, MANUT 
	data = rs2("data") 
	titolo = "MODIFICA SCHEDA DEL:" & data
end if