我有这个......
Response.write "<table width=""700"" border=""0"">"
Response.write "<tr><td width=""10%""> <td align=center pagetitle2strong""><br><strong>Advanced Sales Search</strong><br><br></td></tr>"
Response.write "<tr><td width=""10%""> <td>"
ShowSearchDisclaimer
Response.write "<table border=0><tr><td width=""10%""> <td>"
ShowForm
Response.write "</td></td></tr></table>"
Response.write "</td></tr></table>"
在视图源中看起来像这样......只是一个大blob。
<table width="700" border="0"><tr><td width="10%"> </td><td align="right" ><h1>Search Sales or Transfers</h1></td></tr><tr><td width="10%"> </td><td><table width=600 border=0><tr><td><font size=+1><b>By using this page you are agreeing to the following disclaimer.</b></font></td></tr><tr><td> </td></tr><tr><td>The information appearing on this website was extracted from the records of the office of the Sarasota County Property Appraiser. Our goal is to provide you with the most accurate information possible. The information maintained on this website should not be relied upon for any purposes except for those of the Property Appraiser and his staff. The Sarasota County Property Appraiser accepts no responsibility for the inappropriate use or the misinterpretation of data. No warranties, expressed or implied, are provided for the data herein. The property values relate to the last valuation date, or to preliminary values when noted. The data is subject to change.</td></tr><tr><td> </td></tr><tr><td>By proceeding with a property search you are stating that the notice has been read and that you understand and agree with its contents. The data contained on this site is intended for information purposes only. It is based on the best information available at the time of posting and is not warranted. The data may not reflect the most current records.</td></tr><tr><td> </td></tr><tr><td><a href="/Content/Disclaimer.asp">View Full Disclaimer Here.</a></td></tr><tr><td> </td></tr></table><table><form METHOD=POST NAME=frmPrice ACTION=/search/sales_search_results.asp><tr><td FormDisplayText"><b>Recorded Consideration<p class="teaser">Sale Price</p></b></td><td align=right><input TYPE=text SIZE=8 NAME=AmtFrom title="Minimum Price"> <input TYPE=text SIZE=8 NAME=AmtTo title="Maximum Price"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><form METHOD=POST NAME=frmDate ACTION=/search/sales_search_results.asp><tr><td FormDisplayText"><b>Transaction Date</b></td><td align=right><input TYPE=text SIZE=8 NAME=DateFrom title="Minimum Date"> <input TYPE=text SIZE=8 NAME=DateTo title="Maximum Date"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><form METHOD=POST NAME=frmInstrument ACTION=/search/sales_instrument_search_results.asp><tr><td FormDisplayText"><b>Instrument Number</b></td><td align=right><input TYPE=text SIZE=22 NAME=kw1 title="Enter Complete or Partial Instrument Number"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><form METHOD=POST NAME=frmDeedType ACTION=/search/sales_deed_type_search_results.asp><tr><td FormDisplayText"><b>Instrument Type</b></td><td align=right><input TYPE=text SIZE=22 NAME=kw1 title="Enter Exact Deed Type"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><form METHOD=POST NAME=frmGrantor ACTION=/search/sales_grantor_search_results.asp><tr><td FormDisplayText"><b>Seller/Grantor</b></td><td align=right><input TYPE=text SIZE=8 name=kw1 title="Enter part of Grantor's Name"> <input TYPE=text SIZE=8 name=kw2 title="Enter part of Grantor's Name"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><form METHOD=POST NAME=frmSubCode ACTION=/search/sales_search_results.asp?type=code><tr><td FormDisplayText"><b>Subdivision Code</b></td><td align=right><input TYPE=text SIZE=22 name=SubCode title="Enter exact Subdivision Code"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><form METHOD=POST NAME=frmSubName ACTION=/search/sales_search_results.asp?type=name><tr><td FormDisplayText"><b>Subdivision Name</b></td><td align=right><input TYPE=text SIZE=22 name=SubName title="Enter all or part of the Subdivision Name"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><form METHOD=POST NAME=frmUseCode ACTION=/search/sales_search_results.asp><tr><td FormDisplayText"><b>Land Use Code</b></td><td align=right><input TYPE=text SIZE=8 NAME=UseFrom title="Minimum LUC"> <input TYPE=text SIZE=8 NAME=UseTo title="Maximum LUC"> <input type=submit value=Submit title="Click to view search results"></td></tr></form><tr><td FormDisplayText"> </td></tr><tr><td FormDisplayText"><b>Lookup Subdivision Code</b></td><td align=right><input type=button value=Lookup title="Click to lookup code values" onclick=location.href='/search/subdivision_codes.asp?type=sales'></td></tr></form><tr><td FormDisplayText"><b>Lookup Use Code</b></td><td align=right><input type=button value=Lookup title="Click to lookup code values" onclick=location.href='/search/use_codes.asp?type=sales'></td></tr></form><tr><td FormDisplayText"><b>Lookup Instrument Type</b></td><td align=right><input type=button value=Lookup title="Click to lookup code values" onclick=location.href='/search/deed_types.asp'></td></tr></form><tr><td FormDisplayText"><b>Lookup Transaction Qual. Codes</b></td><td align=right><input type=button value=Lookup title="Click to lookup code values" onclick=location.href='/search/sales_qualification_codes.asp'></td></tr></form></table></td></tr></table>
我想要一个能让我快速的正则表达式
更改所有response.write "<some html here>" & sometimes with variables & </more html>"
以
%>
<my html><%=somevariable%>
<%
此外，原始代码没有任何形式，因此很少将属性值正确地包含在引号中。
我想这样做是因为调试“blob”非常困难，当我在IDE中时，能够看到渲染的html真的很棒。如果我错了， PLUS 会纠正我，但这不是我使用了很多服务器端资源吗？既然所有的response.write命令都必须在服务器端处理？无论如何。我真的很感激能够想到快速重新编码这种情况的人。
这是我手工制作的页面......
Sub ShowCriteriaRow()
If strPrint <> "yes" then
%>
<br />
<input type="text" id="kw1" name="kw1" size="20" value="<%=Keyword1 %>"/><%
If (PageType <> "parcel" and PageType <> "lastname"and PageType <> "situs") Then
%>
<input type="text" id="kw2" name="kw2" size="20" value="<%=Keyword2 %>"/><%
End If
If PageType = "STR" Then
%>
<input type="text" id="kw3" name="kw3" size="20" value="<%=Keyword3 %>"/><%
End If
%>
<input type="submit" name="submit" id="submit" value="Resubmit" /><%
ShowExportButton
Else
Response.Write "<b>Keywords:</b> " & Keyword1
If Keyword2 <> "" Then Response.Write ", " & Keyword2
If Keyword3 <> "" Then Response.Write ", " & Keyword3
Response.Write " "
End If
%>
</td>
</tr><%
这是一个开始。我不能改变太多的底层结构，因为它很像意大利面。
答案 0 :(得分：0)
我不认为正则表达式是答案，也不适用于此。
就个人而言，我会用更像下面的内容来解决你的问题，以使脚本和输出HTML更具可读性：
tableString = "<table width=""700"" border=""0"">" & _
"<tr><td width=""10%""> <td align=center pagetitle2strong""><br><strong>Advanced Sales Search</strong><br><br></td></tr>" & _
"<tr>" & _
"<td width=""10%""> <td>" & _
"{SearchDisclaimer}" & _
"<table border=0>" & _
"<tr><td width=""10%""> <td>" & _
"{ShowForm}" & _
"</td></td></tr>" & _
"</table>" & _
"</td></tr>" & _
"</table>"
tableString = replace(tableString, "{SearchDisclaimer}", ShowSearchDisclaimer())
tableString = replace(tableString, "{ShowForm}", ShowForm())
Response.write(tableString)
然后将Subs更改为将HTML作为字符串返回的函数，例如：
function ShowCriteriaRow()
outputString = ""
if strPrint <> "yes" then
outputString = outputString & "<input id=""textbox"" name=""foo"" value=""bar"" />"
end if
ShowCriteriaRow = outputString
end function