Credo che il tuo errore sia da un'altra parte non nella SUB che hai creato. Ho provato ad utilizzarla e funziona tutto.
Ti posto l'esempio completo, così magari capisci dov'è l'errore.
In quanto a questa riga
strDelete = "DELETE FROM Tabella1 WHERE ID=?"
Con il dataBase Access si usa il punto interrogativo per i parametri.
Ciao
Marco
codice:
<%@ Page Language="VB" Debug="true"%>
<%@ Import namespace="System.data.OleDb" %>
<script runat="server">
Sub button_click (s As Object, e As EventArgs)
Dim conCiccio As OleDbConnection
Dim strDelete As String
Dim cmdDelete As OleDbCommand
conCiccio = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source="& Server.MapPath("risultati2.mdb") )
strDelete = "DELETE FROM risultati WHERE ID=?"
cmdDelete = New OleDbCommand( strDelete, conCiccio )
cmdDelete.Parameters.Add( "@ID", txtDelete.text )
conCiccio.Open()
cmdDelete.ExecuteNonQuery()
conCiccio.Close()
end sub
</script>
<html>
<head>
<title>Untitled Document</title>
</head>
<body>
<form runat="server">
<asp:TextBox id="txtDelete" runat="server" />
<asp:Button text="invia" OnClick="button_click " runat="server" />
</form>
</body>
</html>