Microsoft VBScript 编译器异常 (0x800A03F6) 缺少 'End'

Microsoft VBScript 编译器错误 (0x800A03F6) 缺少 'End'
<!--DWLayoutTable-->
  <tr>
  <td width="60" height="21">&nbsp;</td>
  <td width="684">&nbsp;</td>
  <td width="56">&nbsp;</td>
  </tr>
  <tr>
  <td height="316">&nbsp;</td>
  <td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <!--DWLayoutTable-->
  <tr> <form name="form1" method="post" action="resolve1write.asp?action=SaveWrite">
  <td width="163" height="41"></td>
  <td colspan="5" valign="top"><img src="image/df/zxdy.gif" alt="" width="433" height="37" /></td>
  <td width="77">&nbsp;</td>
  <td width="11">&nbsp;</td>
  1<img src="image/df/zxdy.gif" alt="" width="433" height="37" />
   
  <tr>
  <td height="20" colspan="7" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#999999">
  <!--DWLayoutTable-->
  <tr>
  <td width="209" height="20">&nbsp;</td>
  <td width="229" align="center" valign="middle">带<span class="STYLE5">*</span>项为必填项</td>
  <td width="246">&nbsp;</td>
  </tr>
   
   
   
   
   
   
  </table></td>
  <td>&nbsp;</td>
  </tr>
  <tr>
  <td height="230" colspan="7" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
  <tr>
  <td width="187" height="27" valign="middle"><div align="right" class="STYLE2">
  <div align="right">留言者:</div>
  </div></td>
  <td width="486" valign="middle">&nbsp;<input type="text" name="name"></td>
  </tr>
  <tr>
  <td height="27" valign="middle"><div align="right" class="STYLE2">
  <div align="right">E-MAIL:</div>
  </div></td>
  <td valign="middle">&nbsp;<input type="text" name="email"></td>
  </tr>
  <tr>
  <td height="27" valign="middle"><div align="right" class="STYLE2">
  <div align="right">QQ号码:</div>
  </div></td>
  <td valign="middle">&nbsp;<input type="text" name="qq"></td>