当前位置: 首页 > 图文教程 > 网络编程 > ASP > 将半角转换为中文的函数

ASP
ASP实用大全-ASP服务器组件(4)
ASP实用大全-ASP服务器组件(5)
ASP实用大全-ASP服务器组件(6)
ASP实用大全-ASP服务器组件(7)
ASP 3.0高级编程(一)
ASP 3.0高级编程(二)
ASP 3.0高级编程(三)
ASP 3.0高级编程(四)
ASP 3.0高级编程(五)
ASP 3.0高级编程(六)
Asp Object 之:AddHeader
Asp Object 之:AppendToLog
Asp Object 之:BinaryRead
Asp Object 之:BinaryWrite
Asp Object 之:Buffer
Asp Object 之:CacheControl
Asp Object 之:Charset
Asp Object 之:Clear
Asp Object 之:ClientCertificate
Asp Object 之:ContentType

ASP 中的 将半角转换为中文的函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 225 ::
收藏到网摘: n/a

  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