替换HTML表单元素?

时间:2012-11-18 01:20:48

标签: regex vb.net replace

我有这个HTML代码:

<HTML>
<HEAD>
<TITLE></TITLE>

</HEAD>

<BODY>

<form action="http://www.aweber.com/scripts/addlead.pl" method="post">
<input id="email" class="text" type="text" size="20" value="Enter your best email" name="email" onblur="if (this.value == '') {this.value = 'Enter your best email';}" onfocus="if (this.value == 'Enter your best email') {this.value = '';}" />
<input type="hidden" name="meta_web_form_id" value="">
<input type="hidden" name="meta_split_id" value="">
<input type="hidden" name="listname" value="">
<input type="hidden" name="redirect" value="">
<input type="hidden" name="meta_adtracking" value="">
<input type="hidden" name="meta_message" value="1">
<input type="hidden" name="meta_required" value="email">
<input type="hidden" name="meta_tooltip" value="">
<div style="padding-top:5px;">
<center><input class="button1" id="submit" type="image" src="red_getwaitinglist.png" name="submit" value="Get Instant Access"/></center>
</div>
</form>

</BODY>
</HTML>

我正在使用此函数使用RegEx替换元素:

Function StripTags(ByVal html As String, ByVal replace As String) As String
    Return Regex.Replace(html, "<form.+?</form>", replace)
End Function

但它似乎不起作用。它返回相同的代码(无替换)。

我对regex知之甚少,所以我假设RegEx语法可能有误。 有人可以帮我这个或者告诉我我错在哪里吗?

1 个答案:

答案 0 :(得分:1)

附加RegexOption Singleline。如果没有此.将无法匹配换行符。

Return Regex.Replace(html, "<form.+?</form>", replace, RegexOptions.Singleline)

有关详细信息,请参阅RegexOptions Enumeration