帮忙转换下正则表达式
帮忙转换下正则表达式 谢谢
<input type="hidden" name="invalidtoken" value="800c3aee-1fa4-4b48-b505-11bff1047d21">
或者直接提取 value值的代码也行。
[解决办法]

Sub test()
    Set hf = CreateObject("htmlfile")
    hf.body.innerHTML = "<input type=""hidden"" name=""invalidtoken"" value=""800c3aee-1fa4-4b48-b505-11bff1047d21"">"
    Debug.Print hf.all("invalidtoken").Value
End Sub

[解决办法]
(?<=name\=\"invalidtoken\"\svalue\=\")[a-f0-9]{8}\-[a-f0-9]{4}\-[a-f0-9]{4}\-[a-f0-9]{4}\-[a-f0-9]{14}(?=\"\>)