5.1使用SQLDataReader进行数据库查询
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 myDataReader As SqlDataReader
8:
9: myConnection = New SqlConnection( "server=localhost;uid=sa;database=Pubs" )
10: myConnection.Open()
11: myCommand = New SqlCommand( "Select * from Authors", myConnection )
12: myDataReader = myCommand.ExecuteReader()
13: While myDataReader.Read()
14:  Response.Write( myDataReader.Item( "au_lname" ) )
15: End While
16: myDataReader.Close()
17: myConnection.Close()
18: %>
19:
5.2在C#中使用SqlDataReader 进行数据库查询

 1: <%@ Page Language="C#" %>
 2: <%@ Import Namespace="System.Data" %> 
3: <%@ Import NameSpace="System.Data.SqlClient" %> 
4: 
5: <%
 6: SqlDataReader myDataReader; 
7: SqlConnection myConnection = new http://aspfree.com/chapters/sams/graphics/ccc.gifSqlConnection( "server=localhost;uid=sa;database=Pubs" ); 
8: myConnection.Open(); 
9: SqlCommand myCommand = new SqlCommand( "Select * from http://aspfree.com/chapters/sams/graphics/ccc.gifAuthors", myConnection );
10: myDataReader = myCommand.ExecuteReader();
11: while ( myDataReader.Read() )
12: {
13:  Response.Write( myDataReader[ "au_lname" ].ToString() );
14: }
15: myDataReader.Close();
16: myConnection.Close();
17: %>
18:

5.3使用OleDbDataReader进行数据库查询

1: <%@ Import Namespace="System.Data" %>
 2: <%@ Import NameSpace="System.Data.OleDb" %> 
3:
 4: <%
 5: Dim myConnection As OleDbConnection 
6: Dim myCommand As OleDbCommand 
7: Dim myDataReader As OleDbDataReader 
8: 
9: myConnection = New OleDbConnection( "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA http://aspfree.com/chapters/sams/graphics/ccc.gifSource=c:\authors.mdb" )
10: myConnection.Open()
11: myCommand = New OleDbCommand( "Select * from Authors", myConnection )
12: myDataReader = myCommand.ExecuteReader()
13: While myDataReader.Read
14:  Response.Write( myDataReader.Item( "author" ) )
15: End While
16: myDataReader.Close()
17: myConnection.Close
18: %>
19:

5.5使用sql Parameters

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 FirstName As String = "Robert"
 8: Dim LastName As String = "Johnson" 
9:
10: myConnection = New SqlConnection( "server=localhost;uid=sa;pwd=secret;database=myData" )
11: myConnection.Open()
12: myCommand = New SQLCommand( "Insert Authors ( FirstName, LastName ) http://aspfree.com/chapters/sams/graphics/ccc.gifValues ( @FirstName, @LastName )", myConnection )
13:
14: myCommand.Parameters.Add( New SqlParameter( "@FirstName", http://aspfree.com/chapters/sams/graphics/ccc.gifSqlDbType.Varchar, 30 ))
15: myCommand.Parameters( "@FirstName" ).Value = FirstName
16:
17: myCommand.Parameters.Add( New SqlParameter( "@LastName", http://aspfree.com/chapters/sams/graphics/ccc.gifSqlDbType.Varchar, 30 ))
18: myCommand.Parameters( "@LastName" ).Value = LastName
19:
20: myCommand.ExecuteNonQuery()
21: myConnection.Close()
22: %>
23: Record Inserted!

5.6使用sql Parameters(access)

1: <%@ Import Namespace="System.Data" %> 
2: <%@ Import NameSpace="System.Data.OleDb