Stai usando un browser molto obsoleto. Puoi incorrere in problemi di visualizzazione di questo e altri siti oltre che in problemi di sicurezza. . Dovresti aggiornarlo oppure usarne uno alternativo, moderno e sicuro.
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...