Credo che funzioni meglio il Left secondo le sue esigenze...
Dim stringa
stringa = "Supercalifragilistichespiralidoso"
If Len(stringa) > 10 Then
Response.Write Left(stringa, 10) & "..."
Else
Response.Write stringa
End If
Non l'ho testato ma ado occhio mi pare sia corretto...