oledbupdate.aspx

asp.net技术内幕的书配源码

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

conAuthors = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=c:\Authors.mdb" )
strUpdate = "Update Authors Set au_lname='Frege' Where au_lname='Russell'"
cmdUpdate = New OleDbCommand( strUpdate, conAuthors )
conAuthors.Open()
cmdUpdate.ExecuteNonQuery()
conAuthors.Close()
%>
Author Updated!