Capitalize first letter of a string<%
dim txtFname
txtFName = "steve schofield"
txtFName = UCase(Left(txtFName,1)) & Mid(txtFName,2)
response.write txtFname
%> To call the function:
mynewvar = myfunc(txtFname) Function syntax
function myfunc(a)
myfunc = ucase(left(a,1)) & lcase(mid(a,2))
end function | 
Secure Audio Streaming with ASP.Net and Flash
