ProperCase
If you've used ASP for a while you'll notice that VBScript doesn't support StrConv so you can't proper case your code. Here is small function to include in your ASP that will do that for you.
Original Author: Raine Lightner
Inputs
sString, your input
Returns
Your formatted string.
Code
Function ProperCase(sString)
Dim lTemp
Dim sTemp, sTemp2
Dim x
sString = LCase(sString)
If Len(sString) Then
sTemp = Split(sString, " ")
lTemp = UBound(sTemp)
For x = 0 To lTemp
sTemp2 = sTemp2 & UCase(Left(sTemp(x), 1)) & Mid(sTemp(x), 2) & " "
Next
ProperCase = trim(sTemp2)
Else
ProperCase = sString
End If
End Function
Loading Comments ...
Comments
No comments have been added for this post.
You must be logged in to make a comment.