表单上的数据如何传递不到数据库中啊

表单上的数据怎么传递不到数据库中啊,这是Dreamweaver中自动生成的代码,不知道哪里错了,错误提示是找不到

表单上的数据怎么传递不到数据库中啊,
这是Dreamweaver中自动生成的代码,不知道哪里错了,错误提示是找不到文件:求助!!!!!!!!!!!!!!!!!1
<%@LANGUAGE= "VBSCRIPT "   CODEPAGE= "936 "%>
<!--#include   file= "Connections/conn.asp "   -->
<%
'   ***   Edit   Operations:   declare   variables

Dim   MM_editAction
Dim   MM_abortEdit
Dim   MM_editQuery
Dim   MM_editCmd

Dim   MM_editConnection
Dim   MM_editTable
Dim   MM_editRedirectUrl
Dim   MM_editColumn
Dim   MM_recordId

Dim   MM_fieldsStr
Dim   MM_columnsStr
Dim   MM_fields
Dim   MM_columns
Dim   MM_typeArray
Dim   MM_formVal
Dim   MM_delim
Dim   MM_altVal
Dim   MM_emptyVal
Dim   MM_i

MM_editAction   =   CStr(Request.ServerVariables( "SCRIPT_NAME "))
If   (Request.QueryString   <>   " ")   Then
    MM_editAction   =   MM_editAction   &   "? "   &   Server.HTMLEncode(Request.QueryString)
End   If

'   boolean   to   abort   record   edit
MM_abortEdit   =   false

'   query   string   to   execute
MM_editQuery   =   " "
%>
<%
'   ***   Insert   Record:   set   variables

If   (CStr(Request( "MM_insert "))   =   "form1 ")   Then

    MM_editConnection   =   MM_conn_STRING
    MM_editTable   =   "admin_liuyan "
    MM_editRedirectUrl   =   "留言.asp "
    MM_fieldsStr     =   "textfield|value "
    MM_columnsStr   =   "admin_liuyan| ',none, ' ' "

    '   create   the   MM_fields   and   MM_columns   arrays
    MM_fields   =   Split(MM_fieldsStr,   "| ")
    MM_columns   =   Split(MM_columnsStr,   "| ")
   
    '   set   the   form   values
    For   MM_i   =   LBound(MM_fields)   To   UBound(MM_fields)   Step   2
        MM_fields(MM_i+1)   =   CStr(Request.Form(MM_fields(MM_i)))
    Next

    '   append   the   query   string   to   the   redirect   URL
    If   (MM_editRedirectUrl   <>   " "   And   Request.QueryString   <>   " ")   Then
        If   (InStr(1,   MM_editRedirectUrl,   "? ",   vbTextCompare)   =   0   And   Request.QueryString   <>   " ")   Then
            MM_editRedirectUrl   =   MM_editRedirectUrl   &   "? "   &   Request.QueryString
        Else
            MM_editRedirectUrl   =   MM_editRedirectUrl   &   "& "   &   Request.QueryString
        End   If
    End   If

End   If
%>
<%
'   ***   Insert   Record:   construct   a   sql   insert   statement   and   execute   it



Dim   MM_tableValues
Dim   MM_dbValues

If   (CStr(Request( "MM_insert "))   <>   " ")   Then

    '   create   the   sql   insert   statement
    MM_tableValues   =   " "
    MM_dbValues   =   " "
    For   MM_i   =   LBound(MM_fields)   To   UBound(MM_fields)   Step   2
        MM_formVal   =   MM_fields(MM_i+1)
        MM_typeArray   =   Split(MM_columns(MM_i+1), ", ")
        MM_delim   =   MM_typeArray(0)
        If   (MM_delim   =   "none ")   Then   MM_delim   =   " "
        MM_altVal   =   MM_typeArray(1)
        If   (MM_altVal   =   "none ")   Then   MM_altVal   =   " "
        MM_emptyVal   =   MM_typeArray(2)
        If   (MM_emptyVal   =   "none ")   Then   MM_emptyVal   =   " "
        If   (MM_formVal   =   " ")   Then
            MM_formVal   =   MM_emptyVal
        Else
            If   (MM_altVal   <>   " ")   Then
                MM_formVal   =   MM_altVal
            ElseIf   (MM_delim   =   " ' ")   Then     '   escape   quotes
                MM_formVal   =   " ' "   &   Replace(MM_formVal, " ' ", " ' ' ")   &   " ' "
            Else
                MM_formVal   =   MM_delim   +   MM_formVal   +   MM_delim
            End   If
        End   If
        If   (MM_i   <>   LBound(MM_fields))   Then
            MM_tableValues   =   MM_tableValues   &   ", "
            MM_dbValues   =   MM_dbValues   &   ", "
        End   If
        MM_tableValues   =   MM_tableValues   &   MM_columns(MM_i)
        MM_dbValues   =   MM_dbValues   &   MM_formVal
    Next
    MM_editQuery   =   "insert   into   "   &   MM_editTable   &   "   ( "   &   MM_tableValues   &   ")   values   ( "   &   MM_dbValues   &   ") "

    If   (Not   MM_abortEdit)   Then
        '   execute   the   insert
        Set   MM_editCmd   =   Server.CreateObject( "ADODB.Command ")
        MM_editCmd.ActiveConnection   =   MM_editConnection


        MM_editCmd.CommandText   =   MM_editQuery
        MM_editCmd.Execute
        MM_editCmd.ActiveConnection.Close

        If   (MM_editRedirectUrl   <>   " ")   Then
            Response.Redirect(MM_editRedirectUrl)
        End   If
    End   If

End   If
%>
<%
Dim   liuyan
Dim   liuyan_numRows

Set   liuyan   =   Server.CreateObject( "ADODB.Recordset ")
liuyan.ActiveConnection   =   MM_conn_STRING
liuyan.Source   =   "SELECT   *   FROM   admin_liuyan "
liuyan.CursorType   =   0
liuyan.CursorLocation   =   2
liuyan.LockType   =   1
liuyan.Open()

liuyan_numRows   =   0
%>
<!DOCTYPE   html   PUBLIC   "-//W3C//DTD   XHTML   1.0   Transitional//EN "   "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd ">

<html   xmlns= "http://www.w3.org/1999/xhtml ">
<head>
<meta   http-equiv= "Content-Type "   content= "text/html;   charset=gb2312 "   />
<title> 刊物论坛 </title>
<style   type= "text/css ">
<!--
.STYLE7   {font-size:   14px;   color:   #FFFFFF;   }
.STYLE10   {color:   #FFFFFF;   font-size:   12px;   }
-->
</style>
</head>

<body>
<table   width= "100% "   border= "0 ">
    <tr>
        <td   height= "150 "> <img   src= "image/shangbiao.gif "   name= "LOGO "   width= "100% "   height= "100% "   align= "left "   lowsrc= "image/shangbiao.gif "   id= "LOGO "   /> </td>
        <td   height= "150 "> <object   classid= "clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 "   codebase= "http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0 "   width= "100% "   height= "100% ">
            <param   name= "movie "   value= "image/banner.swf "   />
            <param   name= "quality "   value= "high "   />
            <param   name= "SCALE "   value= "noborder "   />
            <embed   src= "image/banner.swf "   width= "100% "   height= "100% "   quality= "high "   pluginspage= "http://www.macromedia.com/go/getflashplayer "   type= "application/x-shockwave-flash "   scale= "noborder "> </embed>
        </object> </td>
    </tr>
    <tr>
        <td   height= "26 "   colspan= "2 "   align= "center "   background= "image/index_2.gif "> <span   class= "STYLE7 "> |   <a   href= "index.asp "> 首页 </a>   |   <a   href= "Company.asp "> 公司简介 </a>   |   <a   href= "Introduction.asp "> 栏目简介 </a>   |   <a   href= "Reporter   Station   .asp "> 记者站 </a>   |   <a   href= "Forum   .asp "> 刊物论坛 </a>   |   <a   href= "book.asp "> 电子书刊 </a>   |   <a   href= "Advertising   .asp "> 广告服务 </a> |   <a   href= "login   .asp "> 后台控制 </a>   </span> </td>


    </tr>
    <tr>
        <td   width= "20% "   height= "51 "   align= "center "   bgcolor= "#9C1B1E "> &nbsp; </td>
        <td   height= "25 "   rowspan= "4 "   align= "center "   valign= "top "   bgcolor= "#9C1B1E "> <form   ACTION= " <%=MM_editAction%> "   METHOD= "POST "   id= "form1 "   name= "form1 ">
            <table   width= "559 "   border= "0 ">
                <tr>
                    <td   height= "104 "   colspan= "5 "   align= "center "   valign= "middle "   bgcolor= "#CCCCCC "> <input   name= "textfield "   type= "text "   size= "70 "   /> </td>
                    </tr>
               
               
                <tr>
                    <td   height= "23 "   colspan= "5 "   align= "center "   bgcolor= "#FFFFFF "> <input   type= "submit "   name= "Submit "   value= "提交 "   />
                    <input   type= "reset "   name= "Submit2 "   value= "取消 "   /> </td>
                </tr>
            </table>
            <input   name= "hiddenField "   type= "hidden "   value= "Request.ServerVariables( "REMOTE_ADDR ")
"   />
            <input   type= "hidden "   name= "MM_insert "   value= "form1 ">
</form>             <p   align= "left "> &nbsp; </p>         </td>
    </tr>
    <tr>
        <td   height= "38 "   align= "center "   bgcolor= "#9C1B1E "> <span   class= "STYLE10 "> <a   href= "Forum   .asp "> 在线评刊 </a> </span> </td>
    </tr>
   
    <tr>
        <td   height= "33 "   align= "center "   nowrap= "nowrap "   bgcolor= "#9C1B1E "> <span   class= "STYLE10 "> <a   href= "Forum   1).asp "> 我要留言 </a> </span> </td>
    </tr>
   
    <tr>
        <td   height= "36 "   align= "left "   valign= "top "   nowrap= "nowrap "   bgcolor= "#9C1B1E "> &nbsp; </td>
    </tr>


    <tr>
        <td   height= "15 "   colspan= "2 "   align= "center "   bgcolor= "#F70000 "> <span   class= "STYLE10 "> &copy;本网站版权归中国品牌杂志社所有 </span> </td>
    </tr>
</table>
</body>
</html>
<%
liuyan.Close()
Set   liuyan   =   Nothing
%>


[解决办法]
找不到那个文件呀?
[解决办法]
IIS对应的目录跟你DW里设置的测试网站没有对应起来。
[解决办法]
可能正如楼上所说,你的IIS目录不对。asp文件要在服务器环境下才可以运行的。
// <!--#include file= "Connections/conn.asp " -->
也可能是你的数据库链接有问题,比如没有数据库文件或者。。。
[解决办法]
MM_editAction这个变量的值就是你要的网面.你把这个值打印出来看看.具体有没有这个页面啊