上一篇
下一篇
ASP删除所有空格函数
作者:刚子 日期:2008-05-27
废话不说，如果你用普通的方法无法清除掉的空格，那么请用我这个函数试试。如果清除失败请评论本文指出问题，我会为你寻找办法。
程序代码
程序代码function noblank(str)
str = replace(str, " ", "")
str = Replace(str, CHR(32), "")
str = Replace(str, CHR(8), "")
str = Replace(str, CHR(9), "")
str = Replace(str, CHR(34), "")
str = Replace(str, CHR(39), "")
str = Replace(str, CHR(13), "")
str = Replace(str, CHR(255), "")
str = Replace(str, CHR(10), "")
str = Replace(str, CHR(11), "")
str = Replace(str, CHR(12), "")
noblank=trim(str)
end function
str = replace(str, " ", "")
str = Replace(str, CHR(32), "")
str = Replace(str, CHR(8), "")
str = Replace(str, CHR(9), "")
str = Replace(str, CHR(34), "")
str = Replace(str, CHR(39), "")
str = Replace(str, CHR(13), "")
str = Replace(str, CHR(255), "")
str = Replace(str, CHR(10), "")
str = Replace(str, CHR(11), "")
str = Replace(str, CHR(12), "")
noblank=trim(str)
end function
文章来自: 
引用通告: 
Tags: 评论: 0 | 引用: 0 | 查看次数: -
发表评论