ASP Code

ASP: Trim a String Without Cutting Any Words

This function will accept a string of any length, and trim it to the space nearest your desired trimming length.

'====
Function neatTrim( strToTrim, desiredLength )
'====
strToTrim = trim( strToTrim )

if len( strToTrim ) < desiredLength then neatTrim = strToTrim exit function else if inStrRev( strToTrim, " ", desiredLength ) = 0 then strToTrim = left( strToTrim, desiredLength - 1 ) & "…" else strToTrim = left( strToTrim, inStrRev( strToTrim, " ", desiredLength + 1 ) -1 ) & "…" 'no carriage return here end if end if neatTrim = trim( strToTrim ) End Function [/code]

Share

Leave a Reply

Your email address will not be published. Required fields are marked *

*
To prove you're a person (not a spam script), type the security word shown in the picture. Click on the picture to hear an audio file of the word.
Anti-spam image