最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 截取字符串函数,计算一汉字等于2个英文
时间：2022-07-02 23:01:15 编辑：袖梨 来源：一聚教程网
'str 要截取的字符串
'strlen 截取字数
'str2 截取字符串后要加的字符。如：...
function gotTopic(str,strlen,str2)
if str="" or isnull(str) then
gotTopic=""
exit function
end if
dim l,t,c, i
str=replace(replace(replace(replace(str," "," "),""",chr(34)),">",">"),"<","<")
l=len(str)
t=0
for i=1 to l
c=Abs(Asc(Mid(str,i,1)))
if c>255 then
t=t+2
else
t=t+1
end if
if t>cint(strlen) then
if str2<>"" then i=i-1
gotTopic=left(str,i-1) & str2
exit for
else
gotTopic=str
end if
next
gotTopic=replace(replace(replace(replace(gotTopic," "," "),chr(34),"""),">",">"),"<","<")
end function
这个函数可以过滤html来截取哦，就是html与汉字混合的他也可以只截取中文哦。
相关文章
- 超星网页版登录入口-超星学习通官网登录平台 03-15
- twitch网页版快捷登录-Twitch一键登录入口 03-15
- 抖音网页版入口在哪-抖音电脑版官网一键直达 03-15
- 小小蚁国官网首页入口在哪-小小蚁国官网首页入口直达 03-15
- 秀秀漫画免费漫画页面入口在线观看高清版本-秀秀漫画在线登录页面免费漫画入口安装包下载 03-15
- jm浏览器官网进入-jm网页版官方入口 03-15