Tekil Mesaj gösterimi - regular expression sorunu - R10.net

Konu regular expression sorunu

16-10-2008, 01:02:17

#2

apridev

Alıntı

Function zz(byVal strVeri)
Set objReg = New RegExp
objReg.Global = True
objReg.IgnoreCase = True
objReg.Pattern = "\[(link)\](.+?)\[\/\1\]"
zz = objReg.Replace(strVeri, "<a>"response.write left(("$2"),29)"</a>")
Set objReg = Nothing
End Function

Kod tam çalışırmı çalışmazmı bilmiyorum ama 3 aşağa 5 yukarı yazdığım şekilde olacaktır. (belkim $2 parantez içine alınmayabilir)