ASP里用正则把英文的单引号及双引号换成中文的单引号及双绰号的方法亲测 原创 收藏

文章标签: 正则 ASP常用源码
  • :
  • 03-16 20:56
  • :
  • 14次
  • :
  • 0条
  • 1赞

简介本文和大家分享的是如何在ASP里,用正则的方法来把变量里的英文单引号及双引号换成中文的单引号及双绰号。

我们知道在ASP里,引号是特殊字符,所以我们在ASP里,用正则来替换引号时,和常规的替换字符是不太一样的。

本文站长就把具体的源码方法分享给大家。

首先,我们需要一个在ASP里用来正则替换的函数,这个函数站长以前分享过,现在在分享一次:

<%
Function RegReplace(vStr,vReg,ByVal vCode)
    IF asp_isnull(vStr) Then Exit Function
    Dim Re,sStr
    sStr = vStr
    Set Re = New RegExp
    Re.Pattern = vReg
    Re.IgnoreCase = True
    Re.Global = True
    IF asp_isnull(vCode) Then:vCode="":End IF
    If Re.Test(sStr) Then
        sStr = Re.Replace(sStr,vCode)
    End If
    Set Re=nothing
    RegReplace = sStr
End Function 
%>

现在,我们假设我们有这样一个变量:

<%
Dim aijquery
aijquery="'我很喜欢'""爱jQuery www.aijquery.cn"""
%>

上面这个变量里,有单引号也有双引号,下面就是具体的把英文的单引号和双绰号换成中文引号的方法:

<%
'先来替换单引号,下面的两种写法都正确
aijquery=RegReplace(aijquery,"\'([^']*)\'","‘$1’")
aijquery=RegReplace(aijquery,chr(39)&"([^"&chr(39)&"]*)"&chr(39),"‘$1’")

'再来替换双引号,下面的两种写法都正确
aijquery=RegReplace(aijquery,"""([^""]*)""","“$1”")
aijquery=RegReplace(aijquery,chr(34)&"([^"&chr(34)&"]*)"&chr(34),"“$1”")
%>

上面的代码,站长都亲测过的,保证能用的!

希望这篇文章能帮助到所有看到这篇文章的朋友们!



您正在找的文章可能是: