Question

我的asp代码中存在一个问题，我无法解决这个问题。我想做一个插入，但它不起作用。我真的不明白为什么我的选择查询完美但不是我的插入。我不知道它是语法错误还是什么。

这是我的代码：

<%@ LANGUAGE="VBSCRIPT" %>
<%
    dim ajoutChamp1
    ajoutChamp1 = request.form("ajoutChamp1")
    Response.Write(ajoutChamp1)
    if len(ajoutChamp1 ) > 0 then
        set dbcon2=Server.CreateObject("ADODB.Connection")
        dbcon2.open "dsn=bdd"
        rqt2="insert into Table1(Champ1) values ('1');"
        set info=dbcon.execute(rqt2)
        Response.Write(rqt2)
        dbcon2.close
        dbcon2 =null    
    end if
%>
<html>    
    <body>
        <h1>Mon App ASP<h1>
        <h2>Données lues dans la bd : bdd.mdb</h2>
        <h3>Table : table1</h3>
        <h4>Lecture :</h4>
        <table>
        <%
            set dbcon=Server.CreateObject("ADODB.Connection")
            dbcon.open "dsn=bdd"
            rqt="select * from Table1;"
            set info=dbcon.execute (rqt)
            if not info.eof then
                %><tr><th><%=info("Champ1")%></th></tr><%
                info.movenext    
            end if    
            while not info.eof
                %><tr><td><%=info("Champ1")%></td></tr><%
                info.movenext
            wend
            info=null
            dbcon.close
            dbcon =null
        %>
        </table>
        <h4>Ajout :</h4>
          <form method="post" action="">     
            <input name="ajoutChamp1" type="text"> <input type="submit">     
              </form>
    </body>
</html>

Answer 1

我不确定我是否对，但在这段代码中：

if len(ajoutChamp1 ) > 0 then
    set dbcon2=Server.CreateObject("ADODB.Connection")
    dbcon2.open "dsn=bdd"
    rqt2="insert into Table1(Champ1) values ('1');"
    set info=dbcon.execute(rqt2)
    Response.Write(rqt2)
    dbcon2.close
    dbcon2 =null    
end if

dbcon2已创建（已实例化），但您正在使用dbcon来执行INSERT。

Answer 2

我发现了我的问题，就是我的数据库文件夹中的修改权对每个人都不见了。

ASP插入不起作用，IIS WinServer2012出错404

2 个答案: