如何将asp页面中输入的数据写入assess数据库中

<form name="form1" method="post" action="news_info1_save.asp?action=add&cid=<%=request.querystring("Cid")%>" onsubmit="return checklogin();" enctype="multipart/form-data">
          <input type="hidden" name="kind_id" value="<%=kind_id%>">
            <table width="624" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E1E4EC" class="margin_top10">
              <tr>
                <td width="95" height="35" align="right" bgcolor="fefefe">姓名：</td>
                <td width="263" height="35" align="left" bgcolor="fefefe">&nbsp;<input name="user_name" type="text" size="15" />
                  <span class="STYLE1">*</span> </td>
                </tr>
              
              
              
              <tr>
                <td height="43" colspan="2" align="left" bgcolor="#FFFFFF" style="padding-left:40px;">
                  <label><input type="submit" name="Submit" value=" 提 交 " /></label>
                    &nbsp;&nbsp;
                  <input type="button" onClick="javascript:history.back(-1);" value=" 取 消 " src="../images/quxiao.gif" width="76" height="21">
                </td>
              </tr>
            </table>
            </form>




<!--#include file="conn/conn.asp" -->
<!--#include file="inc/function.asp"-->
<!--#include file="config.asp" -->
<%
openconn
id=Filtrate(request.QueryString("id"))
action=request.QueryString("action")
if action="add" then
    cid=request.querystring("cid")
    user_name=request.form("user_name")
    set rs=server.createobject("adodb.recordset")
sql="select * from reg_meet"
rs.open sql,conn,1,3
rs.addnew
    rs("m_id")=cid
    rs("user_name")=user_name
    rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
Response.Write("<script language=javascript>alert('报名成功!"+cid+""+user_name+"');window.location.href='news_list2.asp?kind_id=27';</script>")
response.End()
end if

%>