pero que es lo que te falta? solo cortar el titulo o que?
<%=(RS.Fields("Titulo"))%>
si es asi podrias usar algo asi supongo:
Código ASP:
Ver originaltitulo=rs("titulo")
if len(titulo)>100 then 'por poner un limite o cambiar por el que tu quieras
titulo_final = left(titulo,100) & "..."
else
titulo_final=titulo
end if