Dreamweaver 生成的表单 想实现提交后自动跳转到某个页面如何实现？

[ruixing5]

代码是DREAMWEAVER自动生成的。
表单<form ACTION="<%=MM_editAction%>" METHOD="POST" name="form1">
其中这个MM_editAction如下：
Dim MM_editAction
MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString)
End If
我如果把这个ACTION直接改成我想跳转的页面，那么跳转是能跳转，但是页面的数据并没有插入到数据库，如果不改ACTION，能插入到数据库但无法跳转，给提交按钮加个onclick，然后用JAVA SCRIPT写个window.location.href也不行。请问如何修改代码实现既能插入数据到数据库，又能实现插入完跳转到某个确认页面？数据库用的是ACCESS。

[浪子回头8]

<!--#include file = "Include/DBClass.inc1.asp" --> <% D_Author=trim(Request("D_Author")) leader=trim(Request("leader")) D_From=trim(Request("D_From")) address=trim(Request("address")) tel=trim(Request("tel")) email=trim(Request("email")) D_Title=trim(Request("D_Title")) D_Content=trim(Request("D_Content")) CheckCode=trim(Request("CheckCode")) if CheckCode<>CStr(session("CheckCode")) then response.Write("<script language=""JavaScript"">alert(""请输入正确的验证码！"");history.go(-1);</script>") response.end end if set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from NewsData1" rs.open sql,oConn,1,3 rs.Addnew rs("D_Author")=D_Author rs("D_User")=D_Author rs("leader")=leader rs("D_From")=D_From rs("address")=address rs("tel")=tel rs("email")=email rs("D_Title")=D_Title rs("D_Content")=D_Content rs("D_AddTime")=now() rs("d_class")="1" rs.Update rs.close set rs=nothing Postdate=now() response.write "<script language='javascript'>" response.write "alert('稿件提交成功！请等待工作人员审核！');location.href='index.asp'" response.write "</script>" response.end %>