oledbdelete.aspx

来自「asp.net技术内幕的书配源码」· ASPX 代码 · 共 15 行

<%@ Import Namespace="System.Data.OleDb" %>
<%
Dim conAuthors As OleDbConnection
Dim strDelete As String
Dim cmdDelete As OleDbCommand

conAuthors = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=c:\Authors.mdb" )
strDelete = "Delete From Authors Where au_lname='Frege'"
cmdDelete = New OleDbCommand( strDelete, conAuthors )
conAuthors.Open()
cmdDelete.ExecuteNonQuery()
conAuthors.Close()
%>
Records Deleted!