ado.net数据操作全接触一(insert,update,delete)
2008-05-01 03:28
495 查看
1.1创建数据库连接(sqlserver)
1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.SqlClient" %>
3: <%
4: Dim myConnection As SqlConnection
5: myConnection = New SqlConnection( "server=localhost;database=Pubs;uid=sa" )
6:
7: myConnection.Open()
8: %>
9: Connection Opened!
[b]1.2创建数据库连接(access)
1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.OleDb" %>
3: <%
4: Dim myConnection As OleDbConnection
5: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:/authors.mdb" )
6:
7: myConnection.Open()
8: %>
9: Connection Opened!
2.1添加纪录(sqlserver) 1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SqlConnection 6: Dim myCommand As SqlCommand 7: 8: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" ) 9: myConnection.Open()10: myCommand = New SqlCommand( "insert testTable ( col1 ) http://aspfree.com/chapters/sams/graphics/ccc.gifValues ( 'Hello' )", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close()13: %>14: New Record inserted!15:2.2添加纪录(access)1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.OleDb" %> 3: 4: <% 5: Dim myConnection As OleDbConnection 6: Dim myCommand As OleDbCommand 7: 8: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:authors.mdb" ) 9: myConnection.Open()10: myCommand = New OleDbCommand( "insert INTO Authors ( Author ) Values http://aspfree.com/chapters/sams/graphics/ccc.gif( 'Simpson' )", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close()13: %>14: New Record inserted!15:3.1更新数据(sqlserver)1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SqlConnection 6: Dim myCommand As SqlCommand 7: 8: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" ) 9: myConnection.Open()10: myCommand = New SqlCommand( "update Authors SET LastName='Smith' http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE LastName='Bennett'", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close()13: %>14: Record updated!15:3.2更新数据(access)1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.OleDb" %> 3: 4: <% 5: Dim myConnection As OleDbConnection 6: Dim myCommand As OleDbCommand 7: 8: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:/authors.mdb" ) 9: myConnection.Open()10: myCommand = New OleDbCommand( "update Authors SET Author='Bennett' http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE Author = 'Simpson'", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close13: %>14: Record updated!15:3.3更新数据中受影响的记录数1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SqlConnection 6: Dim myCommand As SqlCommand
7: Dim recordsAffected As Integer
8:
9: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" )
10: myConnection.Open()
11: myCommand = New SqlCommand( "update testTable SET col1='hello' http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE col1='fred'", myConnection )
12: recordsAffected = myCommand.ExecuteNonQuery()
13: Response.Write( "The update statement modified " & http://aspfree.com/chapters/sams/graphics/ccc.gifrecordsAffected.toString() & " records!" )
14: myConnection.Close
15: %>
16:4.1删除数据(sqlserver)1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.SqlClient" %>
3:
4: <%
5: Dim myConnection As SqlConnection
6: Dim myCommand As SqlCommand
7:
8: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" )
9: myConnection.Open()
10: myCommand = New SqlCommand( "delete testTable WHERE col1='fred'", myConnection )
11: myCommand.ExecuteNonQuery()
12: myConnection.Close()
13: %>
14: Record deleted!
15:4.2删除数据(access) 1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.OleDb" %>
3:
4: <%
5: Dim myConnection As OleDbConnection
6: Dim myCommand As OleDbCommand
7:
8: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:/authors.mdb" )
9: myConnection.Open()
10: myCommand = New OleDbCommand( "delete FROM Authors http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE Author = 'Simpson'", myConnection )
11: myCommand.ExecuteNonQuery()
12: myConnection.Close()
13: %>
14: Record deleted!
15:
16:4.3删除纪录中受影响的记录数1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SQLConnection 6: Dim myCommand As SQLCommand 7: Dim recordsAffected As Integer 8: 9: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" )10: myConnection.Open()11: myCommand = New SqlCommand( "delete Authors2 http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE LastName='Smith'", myConnection )12: recordsAffected = myCommand.ExecuteNonQuery()13: Response.Write( "The delete statement modified " http://aspfree.com/chapters/sams/graphics/ccc.gif& recordsAffected.toString() & " records!" )14: myConnection.Close15: %>16:
1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.SqlClient" %>
3: <%
4: Dim myConnection As SqlConnection
5: myConnection = New SqlConnection( "server=localhost;database=Pubs;uid=sa" )
6:
7: myConnection.Open()
8: %>
9: Connection Opened!
[b]1.2创建数据库连接(access)
1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.OleDb" %>
3: <%
4: Dim myConnection As OleDbConnection
5: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:/authors.mdb" )
6:
7: myConnection.Open()
8: %>
9: Connection Opened!
2.1添加纪录(sqlserver) 1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SqlConnection 6: Dim myCommand As SqlCommand 7: 8: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" ) 9: myConnection.Open()10: myCommand = New SqlCommand( "insert testTable ( col1 ) http://aspfree.com/chapters/sams/graphics/ccc.gifValues ( 'Hello' )", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close()13: %>14: New Record inserted!15:2.2添加纪录(access)1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.OleDb" %> 3: 4: <% 5: Dim myConnection As OleDbConnection 6: Dim myCommand As OleDbCommand 7: 8: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:authors.mdb" ) 9: myConnection.Open()10: myCommand = New OleDbCommand( "insert INTO Authors ( Author ) Values http://aspfree.com/chapters/sams/graphics/ccc.gif( 'Simpson' )", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close()13: %>14: New Record inserted!15:3.1更新数据(sqlserver)1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SqlConnection 6: Dim myCommand As SqlCommand 7: 8: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" ) 9: myConnection.Open()10: myCommand = New SqlCommand( "update Authors SET LastName='Smith' http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE LastName='Bennett'", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close()13: %>14: Record updated!15:3.2更新数据(access)1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.OleDb" %> 3: 4: <% 5: Dim myConnection As OleDbConnection 6: Dim myCommand As OleDbCommand 7: 8: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:/authors.mdb" ) 9: myConnection.Open()10: myCommand = New OleDbCommand( "update Authors SET Author='Bennett' http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE Author = 'Simpson'", myConnection )11: myCommand.ExecuteNonQuery()12: myConnection.Close13: %>14: Record updated!15:3.3更新数据中受影响的记录数1: <%@ Import Namespace="System.Data" %> 2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SqlConnection 6: Dim myCommand As SqlCommand
7: Dim recordsAffected As Integer
8:
9: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" )
10: myConnection.Open()
11: myCommand = New SqlCommand( "update testTable SET col1='hello' http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE col1='fred'", myConnection )
12: recordsAffected = myCommand.ExecuteNonQuery()
13: Response.Write( "The update statement modified " & http://aspfree.com/chapters/sams/graphics/ccc.gifrecordsAffected.toString() & " records!" )
14: myConnection.Close
15: %>
16:4.1删除数据(sqlserver)1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.SqlClient" %>
3:
4: <%
5: Dim myConnection As SqlConnection
6: Dim myCommand As SqlCommand
7:
8: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" )
9: myConnection.Open()
10: myCommand = New SqlCommand( "delete testTable WHERE col1='fred'", myConnection )
11: myCommand.ExecuteNonQuery()
12: myConnection.Close()
13: %>
14: Record deleted!
15:4.2删除数据(access) 1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.OleDb" %>
3:
4: <%
5: Dim myConnection As OleDbConnection
6: Dim myCommand As OleDbCommand
7:
8: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:/authors.mdb" )
9: myConnection.Open()
10: myCommand = New OleDbCommand( "delete FROM Authors http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE Author = 'Simpson'", myConnection )
11: myCommand.ExecuteNonQuery()
12: myConnection.Close()
13: %>
14: Record deleted!
15:
16:4.3删除纪录中受影响的记录数1: <%@ Import Namespace="System.Data" %>
2: <%@ Import NameSpace="System.Data.SqlClient" %> 3: 4: <% 5: Dim myConnection As SQLConnection 6: Dim myCommand As SQLCommand 7: Dim recordsAffected As Integer 8: 9: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" )10: myConnection.Open()11: myCommand = New SqlCommand( "delete Authors2 http://aspfree.com/chapters/sams/graphics/ccc.gifWHERE LastName='Smith'", myConnection )12: recordsAffected = myCommand.ExecuteNonQuery()13: Response.Write( "The delete statement modified " http://aspfree.com/chapters/sams/graphics/ccc.gif& recordsAffected.toString() & " records!" )14: myConnection.Close15: %>16:
相关文章推荐
- [转贴]ado.net数据操作全接触一(insert,update,delete)
- ado.net数据操作全接触一(insert,update,delete)
- ado.net数据操作全接触一(insert,update,delete
- 关于ADO.Net使用TableAdapter时产生:更新要求有效的deletecommand或update,insert,selectcommand的解决办法,以及“违反并发性”处理
- 关于通过.NET Framework 2.0 中 SqlDataSource 控件 Select,Update,Delete,Insert 接口调用 存储过程 的粗浅理解。
- Insert, Update, Delete in ASP.NET Gridview, DataSource as SQL Server, MS Access (mdb/accdb), XML and
- ado.net数据操作全接触三(存储过程,datasets)
- ado.net数据操作全接触三(存储过程,datasets)
- ado.net数据操作全接触
- ado.net数据操作全接触二(query,Parameters)
- ado.net数据操作全接触二(query,Parameters)
- ado.net数据操作全接触三(存储过程,datasets)
- ado.net数据操作全接触二(query,Parameters)
- ado.net数据操作全接触四(表关联,DataAdapter)
- ado.net数据操作全接触四(表关联,DataAdapter)
- SQLiteDataBase中query、insert、update、delete方法参数说明
- SQLiteDatabase中query、insert、update、delete方法参数说明
- 04 Mybatis应用篇---XML映射文件之select,insert,update,delete基础介绍
- mysql之insert,update,delete
- 数据库操作语言:INSERT、UPDATE、LOAD、DELETE