<% 
dim str,str1,str2 
str="AbCdEf" 
str1=LCase(str) 
str2=UCase(str) 
Response.write("LCase轉換小寫"&str1 & ",UCase轉換大寫" & str2) 
%>