Code Title: Proper Case

Description: You know how to use UCase and LCase, now here's Pcase! Ucase converts a string to all

UPPERCASE, and of course Lcase does the opposite, but this will convert any text string to Proper Case. It

basically capitalizes the first letter of every word in the string. Pretty cool, huh?!

Copy and paste this snippet as-is into your editor:

<%

Function PCase(strInput)

iPosition = 1

Do While InStr(iPosition, strInput, " ", 1) <> 0

iSpace = InStr(iPosition, strInput, " ", 1)

strOutput = strOutput & UCase(Mid(strInput, iPosition, 1))

strOutput = strOutput & LCase(Mid(strInput, iPosition + 1, iSpace - iPosition))

iPosition = iSpace + 1

Loop

strOutput = strOutput & UCase(Mid(strInput, iPosition, 1))

strOutput = strOutput & LCase(Mid(strInput, iPosition + 1))

PCase = strOutput

End Function

%>

Then, in your asp, use the function like this:

i.e.: <%=PCase(rs("PG"))%> or..

i.e.: <%=PCase(myVariable)%> etc etc etc..