简单生活 发表于 2015-1-16 22:05:00

ASP教程之用自界说函数猎取汉字的首字母

ASP脚本是采用明文(plaintext)方式来编写的。用自界说函数猎取汉字的首字母<SCRIPTLANGUAGE=vbscript>
<!--

供应者:小白
接洽办法:
E-mail:xiaobai@17560.net
接待人人测试
针对chenjf网友发明的成绩
小白做了一处修正
别的,对刘伟强网友的复兴是:本函数量前只能猎取..?呵呵
若有不准确的中央,请提出来或是协助完美
感谢

functiongetpychar(char)
tmp=65536+asc(char)
if(tmp>=45217andtmp<=45252)then
getpychar="A"
elseif(tmp>=45253andtmp<=45760)then
getpychar="B"
elseif(tmp>=45761andtmp<=46317)then
getpychar="C"
elseif(tmp>=46318andtmp<=46825)then
getpychar="D"
elseif(tmp>=46826andtmp<=47009)then
getpychar="E"
elseif(tmp>=47010andtmp<=47296)then
getpychar="F"
elseif(tmp>=47297andtmp<=47613)then
getpychar="G"
elseif(tmp>=47614andtmp<=48118)then
getpychar="H"
elseif(tmp>=48119andtmp<=49061)then
getpychar="J"
elseif(tmp>=49062andtmp<=49323)then
getpychar="K"
elseif(tmp>=49324andtmp<=49895)then
getpychar="L"
elseif(tmp>=49896andtmp<=50370)then
getpychar="M"
elseif(tmp>=50371andtmp<=50613)then
getpychar="N"
elseif(tmp>=50614andtmp<=50621)then
getpychar="O"
elseif(tmp>=50622andtmp<=50905)then
getpychar="P"
elseif(tmp>=50906andtmp<=51386)then
getpychar="Q"
elseif(tmp>=51387andtmp<=51445)then
getpychar="R"
elseif(tmp>=51446andtmp<=52217)then
getpychar="S"
elseif(tmp>=52218andtmp<=52697)then
getpychar="T"
elseif(tmp>=52698andtmp<=52979)then
getpychar="W"
elseif(tmp>=52980andtmp<=53640)then
getpychar="X"
elseif(tmp>=53689andtmp<=54480)then
getpychar="Y"
elseif(tmp>=54481andtmp<=62289)then
getpychar="Z"
else假如不是中文,则不处置
getpychar=char
endif
endfunction

functiongetpy(str)
fori=1tolen(str)
getpy=getpy&getpychar(mid(str,i,1))
next
endfunction
d="只查"
msgboxgetpy(d)
//-->
</SCRIPT>


ASP脚本是采用明文(plaintext)方式来编写的。

只想知道 发表于 2015-1-18 20:12:40

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

莫相离 发表于 2015-1-27 19:43:49

Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点)

蒙在股里 发表于 2015-2-5 15:03:32

那么,ASP.Net有哪些改进呢?

乐观 发表于 2015-2-12 10:31:51

ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。

海妖 发表于 2015-3-3 03:15:03

还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。

老尸 发表于 2015-3-18 07:37:10

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

兰色精灵 发表于 2015-3-25 16:20:52

从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了
页: [1]
查看完整版本: ASP教程之用自界说函数猎取汉字的首字母