asp截取字符串的两种应用 原创
2017-02-06
17
1、纯粹的截取字符串复制代码 代码如下:functioncutstr(thestr1,strlen) diml,t,c l=len(thestr1) ifl<1thenexitfunction t=0 fordxy1=1tol c=Abs(asc(Mid(thestr1,dxy1,1))) ifc>255then t=t+2 else t=t+1 endif ift>=strlenthen thev=mid(thestr1,1,dxy1)...