查看文章 |
ASP中将大写（小写）字母转小写（大写）字母方法
2008-07-18 16:28
LCase：转成小写 UCase：转成大写 例子： <%
dim str,str1,str2 str="AbCdEfGHiJkLmnOpQ" str1=LCase(str) str2=UCase(str) Response.write(str1 & "," & str2) %> 如果是将一个指定好了的1.txt文件内容全部转换为大写（小写），并生成另一个2.txt文件，内容就为生成的大写（小写）就可以用到以上的语句了，呵呵！将下面的代码独立为一个*.asp文件，再用记事本生成一个*.txt文件，里面用小写字母写上“sichuan”. <%
运行以后呢，这个页面就显示了大写和小写出来，然后还自动生成了一个zibet2.txt文件，里面是生成好了的大写字母；“SICHUAN”,的确好耍！！！程序实验成功！Dim fso,r,content,w Set fso = Server.CreateObject("Scripting.FileSystemObject") Set r=fso.OpenTextFile(Server.MapPath("zibet1.txt")) content = r.ReadAll Response.Write("<hr>原文：" & content) r.close set r=nothing Set w=fso.CreateTextFile(Server.MapPath("zibet2.txt")) content = UCase(content) w.Write content w.close set w=nothing set fso=nothing Response.Write("<hr>大写：" & content) Response.Write("<hr>以上内容已保存到zibet2.txt") %> |
最近读者：
