高手救命，好难改，写不进数据库

Question

<%
if session("ok")="" then
response.write"<script>alert('对不起，请先登陆！');history.back();</script>"
end if
%>
<link href="../style.css" rel="stylesheet" type="text/css">
<!--#include file="conn.asp"--><%
edit=trim(request("edit"))
if edit="save" then
response.write "<script language=javascript>alert('修改成功');history.back(-1)</script>"
Response.End
rs.close
else
set rs = server.CreateObject("adodb.recordset")
sql = "Select * from MB_Member where M_ID=" & request("id") & ""
rs.open Sql,my_conn,1,3
end if
%>
<form action=edit.asp?id=<%=request("id")%> method=post name=reg>
  <div align="center">
    <center>
    <table border="1" cellpadding="3" cellspacing="0" width="400" bordercolor="#ACACAC" height="257" style="border-collapse: collapse">
      <tr>
        <td colspan="2" width="392" height="16" bgcolor="#BCBCBC">
          <p align="center"><font color="#FFFFFF">用户资料修改</font></td>
      </tr>
      <tr>
        <td width="91" height="5" bgcolor="#DEDEDE">用户名：</td>
        <td width="294" height="5" bgcolor="#DEDEDE"><%=rs("M_Name")%></td>这是原始的，作为管理员修改用户资料．
然后我改成：
<%
edit=trim(request("edit"))
if edit="save" then
response.write "<script language=javascript>alert('注册成功');history.back(-1)</script>"
set rs = server.CreateObject("adodb.recordset") 
sql="Update MB_Member Set M_Email ='"& trim(request("email")) &"', M_qq ='"& trim(request("qq")) &"', M_sex ='"& trim(request("sex")) &"', M_phone ='"& trim(request("phone")) &"', M_card ='"& trim(request("card")) &"', M_web ='"& trim(request("web")) &"', M_pass ='"& trim(request("password")) &"' where M_Name='" & session("name") & "'"
rs.open Sql,my_conn,1,3 
else 
set rs = server.CreateObject("adodb.recordset") 
sql = "Select * from MB_Member where M_ID=" & request("id") & "'" 
rs.open Sql,my_conn,1,1 
end if %>但是不行出错了，我是参照个人用户修改的页面文件修改的如下：<%
edit=trim(request("edit"))
if edit="save" then
response.write "<script language=javascript>alert('注册成功');history.back(-1)</script>"
set rs = server.CreateObject("adodb.recordset") 
sql="Update MB_Member Set M_Email ='"& trim(request("email")) &"', M_qq ='"& trim(request("qq")) &"', M_sex ='"& trim(request("sex")) &"', M_phone ='"& trim(request("phone")) &"', M_card ='"& trim(request("card")) &"', M_web ='"& trim(request("web")) &"', M_pass ='"& trim(request("password")) &"' where M_Name='" & session("name") & "'"
rs.open Sql,my_conn,1,3 
else 
set rs = server.CreateObject("adodb.recordset") 
sql = "Select * from MB_Member where M_Name='" & session("name") & "'" 
rs.open Sql,my_conn,1,1 
end if 
             %>
<form action=reg_edit.asp method=post name=reg>，晕了怎么办啊