·您现在的位置: 云翼网络 >> 文章中心 >> 网站建设 >> 网站建设开发 >> ASP网站建设 >> 将半角转换为中文的函数

将半角转换为中文的函数

作者:佚名      ASP网站建设编辑:admin      更新时间:2022-07-23
function new_str(str)
if instr(str,chr(34))<>0 and str<>"" then
  str_split=split(str,chr(34))
  i=1
  str_s=""
  for j=0 to ubound(str_split)-1
   if i mod 2 then
    str_s=str_s&str_split(j)&"“"&str_split(j+1)
   else
    str_s=str_s&str_split(j)&"”"&str_split(j+1)
   end if
   i=i+1
  next
end function