怎样实现将同一页面的两组数据同时向两个表单传递，并且验证是否传递进表？

<%On Error Resume Next%>
<%Application("mconn").Execute(fp_sql1)%>
<%Application("mconn").Execute(fp_sql2)%>
<%if (Err.number<>0) then%>
<tr height=30>
<td align=center>
对不起，信息发布过程出错。
</td>
</tr>
<%else%>
<tr height=30>
<td align=center>
信息发布成功！
</td>
</tr>
<%end if%>
===========================
我是如上所写，将两组数据分别向同一SQL SERVER的两个表递交。可是提交不进去。有那位朋友帮我分析一下原因，并写一个可以实现我的设想的方法给我，可以吗？谢谢了。