In PHP, you can use the str_word_count() function to take a string, and return to you the number of separate words within the string. Here's how we could duplicate it in ASP:
'====
Function strWordCount( strToCount )
'====
Dim arWords
strToCount = Trim( strToCount & "" )
arWords = split( strToCount, " " )
strWordCount = uBound( arWords ) + 1
End Function