莫相离 发表于 2015-1-16 23:35:36

ASP网页编程之ASP中一个字符串处置类(VBScript)

asp,jsp,php是web开发的三大技术,asp简单易用且有microsoft做靠山,jsp功能强大是因为有java支持,php则开源跨平台.在国内,asp应用范围最广,jsp发展势头最猛,php则处于劣势.这可能与公司的支持以及技术的培训有关.vbscript|字符串这个类是用于处置字符串的,是老外写的,我把内里的功效和参数加了申明

利用办法:

===============test.asp================

<!--#includefile="StringOperations.asp"-->

<%
dimstr
setstr=NewStringOperations
test=str.toCharArray("checkthisout")
response.write"<strong>str.toCharArray</strong>:"
fori=0toubound(test)
response.writetest(i)&""
next

response.write"<BR><BR>"
test1=str.arrayToString(test)
response.write"<strong>str.arrayToString</strong>:"&test1

response.write"<BR><BR>"
response.write"<strong>str.startsWith</strong>:"&str.startsWith(test1,"ch")

response.write"<BR><BR>"
response.write"<strong>str.endWith</strong>:"&str.endsWith(test1,"out")

response.write"<BR><BR>"
response.write"<strong>str.clone</strong>:"&str.clone("abc",10)

response.write"<BR><BR>"
response.write"<strong>str.trimStart</strong>:"&str.trimStart(test1,3)

response.write"<BR><BR>"
response.write"<strong>str.trimEnd</strong>:"&str.trimEnd(test1,2)

response.write"<BR><BR>"
response.write"<strong>str.swapCase</strong>:"&str.swapCase("HiHiHi")

response.write"<BR><BR>"
response.write"<strong>str.isAlphabetic</strong>:"&str.isAlphabetic("!")

response.write"<BR><BR>"
response.write"<strong>str.capitalize</strong>:"&str.capitalize("clarafehler")
Setstr=Nothing
%>

===============StringOperations.asp================




<%
classStringOperations

****************************************************************************
@功效申明:把字符串换为char型数组
@参数申明:-str:必要转换的字符串
@前往值:-Char型数组
****************************************************************************
publicfunctiontoCharArray(byValstr)
redimcharArray(len(str))
fori=1tolen(str)
charArray(i-1)=Mid(str,i,1)
next
toCharArray=charArray
endfunction

****************************************************************************
@功效申明:把一个数组转换成一个字符串
@参数申明:-arr:必要转换的数据
@前往值:-字符串
****************************************************************************
publicfunctionarrayToString(byValarr)
fori=0toUBound(arr)
strObj=strObj&arr(i)
next
arrayToString=strObj
endfunction

****************************************************************************
@功效申明:反省源字符串str是不是以chars开首
@参数申明:-str:源字符串
@参数申明:-chars:对照的字符/字符串
@前往值:-
****************************************************************************
publicfunctionstartsWith(byValstr,chars)
ifLeft(str,len(chars))=charsthen
startsWith=true
else
startsWith=false
endif
endfunction

****************************************************************************
@功效申明:反省源字符串str是不是以chars开头
@参数申明:-str:源字符串
@参数申明:-chars:对照的字符/字符串
@前往值:-
****************************************************************************
publicfunctionendsWith(byValstr,chars)
ifRight(str,len(chars))=charsthen
endsWith=true
else
endsWith=false
endif
endfunction

****************************************************************************
@功效申明:复制N个字符串str
@参数申明:-str:源字符串
@参数申明:-n:复制次数
@前往值:-复制后的字符串
****************************************************************************
publicfunctionclone(byValstr,n)
fori=1ton
value=value&str
next
clone=value
endfunction

**************************************************************</p>ASP一般认为只能运行在IIS上,正如前面所提到的,这并不是十分正确,事实上,ASP也能运行在Apache上。ApacheASP可在任意Apache服务器上运行有限的ASP功能,所需做的,只需打开mod_perl。

变相怪杰 发表于 2015-1-20 10:05:21

不能只是将它停留在纸上谈兵的程度上。

小妖女 发表于 2015-1-24 13:40:09

跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组

再现理想 发表于 2015-2-1 16:11:07

他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。

谁可相欹 发表于 2015-2-7 07:53:31

用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。

海妖 发表于 2015-2-21 04:10:59

哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?

柔情似水 发表于 2015-3-6 19:29:49

我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.

仓酷云 发表于 2015-3-13 06:27:47

下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...

再见西城 发表于 2015-3-20 15:17:19

你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。
页: [1]
查看完整版本: ASP网页编程之ASP中一个字符串处置类(VBScript)