当前位置:编程学习 > asp >>

asp删除内容中间的空格与换行的源码

问题:请问asp怎么去掉和删除文字内容中的空格和换行

答案:使用replace替换 vbcrlf 代表回车符 vbtab 代表tab字符  trim 删除两头空格


<%

zzzyk=" 站长资源库 zzzyk.com 在线编程学习 软件教程 服务器" // 将数据集赋值给某个变量。因为asp的数据集不支持: rs("ji") = rs("js") 。 php则可以。
zzzyk=replace(zzzyk,vbcrlf,"") // 替换回车符

zzzyk=replace(zzzyk,vbtab,"") // 替换Tab字符

zzzyk=replace(zzzyk," ","") // 替换中间空格为无


zzzyk=(trim(ji))  // trim()先去掉头尾空格
response.write(zzzyk)  // 输出变量zzzyk,结果:站长资源库zzzyk.com在线编程学习软件教程服务器

%>


Asp去空格和回车正则表达式替换函数

chr(8)退格键
chr(9) tab空格       

chr(10) 换行     

chr(13) 回车        

Chr(13)&chr(10) 回车换行       

chr(32) 空格符       

chr(34) 双引号       

chr(39) 单引号


Public Function ReplaceTrim(ByVal strContent)
        On Error Resume Next
        Dim re
        Set re = New RegExp
        re.IgnoreCase = True
        re.Global = True
        re.Pattern = "(" & Chr(8) & "|" & Chr(9) & "|" & Chr(10) & "|" & Chr(13) & ")" 
        strContent = re.Replace(strContent, vbNullString)
        Set re = Nothing
        ReplaceTrim = strContent
        Exit Function
End Function

CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,