一个非常简单的将半角转换为中文的函数
2018-09-06 11:07
阅读：573
复制代码 代码如下:
functionnew_str(str)
ifinstr(str,chr(34))<>0andstr<>then
str_split=split(str,chr(34))
i=1
str_s=
forj=0toubound(str_split)-1
ifimod2then
str_s=str_s&str_split(j)&“&str_split(j+1)
else
str_s=str_s&str_split(j)&”&str_split(j+1)
endif
i=i+1
next
endfunction
上一篇：5天学会asp
下一篇：使用ASP生成HTML文件
评论
亲，登录后才可以留言！