Question

如何用正则表达式读出以下的内容？

内容是这样的：
<?xml version="1.0" encoding="UTF-8" ?>
我想用ASP的正则把encoding的内容读出来，
请问这个正则应该怎样写？
Function getEncode(input)
End Function

Answer 1

Function getEncode(input)
Dim regEx
Set regEx = new RegExp
regEx.Pattern = ".*encoding=""([^""]+)"".*"
regEx.IgnoreCase = True
regEx.Global = True
getEncode = regEx.Replace(input, "$1")
End Function

测试：

MsgBox getEncode("<?xml version=""1.0"" encoding=""UTF-8"" ?>")

Answer 2

var str='<?xml version="1.0" encoding="UTF-8" ?>'
return str.replace(/<\?xml version="1\.0" encoding="(.*?)" \?>/,"$1")

asp的要换成vbs写法
先创建regexp对象
Function getEncode(input)
Set RegEx = New RegExp
RegEx.IgnoreCase =True
RegEx.Pattern = "<\?xml version=""1\.0"" encoding=""(.*?)"" \?>"
getEncode=RegEx.replace(input,"$1")
End Function