按钮单击asp以删除SQL Server中的行-传统的asp和vbscript

问题描述

|| 我已经在ASP中创建了一个网页，以显示来自sql数据库的表格。然后，我向每个表格行添加了Button，以更新和删除每个行代码-

    do while not objRS.EOF

    %>

    <tr> 
        <td><%= objRS(\"Id\") %> </td>
        <td><%= objRS(\"Name\") %> </td>
        <td><%= objRS(\"Address\") %></td>
        <td><%= objRS(\"Suburb\") %></td>
        <td><%= objRS(\"Postcode\") %></td>
        <td><%= objRS(\"Age\") %></td>
        <td><%= objRS(\"Email\") %></td>
        <td><Center><input type=\"submit\" value=\"Update\"></Center></td>
        <td><center><input type=\"Submit\" onclick=\"delete(<%= objRS(\"Id\") %>)\" value=\"Delete\"></center></td>
    </tr>
    <%
        objRS.MoveNext
        loop    
        objCon.close
    %>

我也是要删除的代码-

    Function delete(index)

        Dim objCon,objRS,dsql      
        set objCon = CreateObject(\"ADODB.Connection\")
        objCon.open \"Provider=sqlOLEDB.1;Password=xxxx;Persist Security Info=True;User ID=xxxx;Initial Catalog=Customer;Data Source=PC\"

        dsql = \"DELETE FROM Customer WHERE Id=\" & index

        objCon.execute(dsql)            
        objCon.close     
    End Function

我到处都看过，但似乎找不到如何识别每个不同的按钮以及如何从数据库中删除相应的行     

解决方法

在每一行中都有：

<a href=\"Page.asp?action=delete&ID=<%= objRS(\"Id\") %>\">Delete this</a>

然后在接收页面上输入以下代码：

Dim strAction

strAction = request.querystring(\"action\")
if(strAction = \"delete\")

    \'Verify ID
    \'Perform deletion
    \'Redirect

end if

传统上，这就是您删除它的方式。在您的示例中，您似乎需要AJAX函数。将其添加到页面顶部：

<script type=\"text/javascript\">
    function delete(RecordID){
        alert(RecordID);
    }
</script>

这是单击删除时要尝试调用的Javascript函数。因此，如果您要这样做，那将是您的模板以对删除脚本调用AJAX请求。     ,您似乎正在尝试使用Javascript调用ASP代码。那是行不通的。 如果您在单独的ASP脚本中具有删除功能，则可以创建Javascript方法来处理按钮单击，并直接使用GET或Ajax调用来调用其他ASP脚本。然后，您必须重新加载原始页面。