Scusami ma non ho capito qual'è il problema.

Il codice che hai scritto comunque è un po' pasticciato, e poi invece di accedere al recordset ogni volta dovresti usare una variabile.
Comunque il test sulla lunghezza così com'è te lo puoi anche evitare, se la stringa è più corta del limite che ti interessa, semplicemente left te la ritornerà tutta.

codice:
while not rs.eof
	Response.Write(Left(rs("info_txt"),500))
	rs.movenext
wend