以下代码列表演示如何使用 ADO.NET 数据提供程序从数据库中检索数据。数据在一个 DataReader 中返回。有关更多信息,请参见使用 DataReader 检索数据 (ADO.NET)。
成都创新互联专注于临朐企业网站建设,响应式网站,成都商城网站开发。临朐网站建设公司,为临朐等地区提供建站服务。全流程按需网站策划,专业设计,全程项目跟踪,成都创新互联专业和态度为您提供的服务
SqlClient
此示例中的代码假定您可以连接到 Microsoft SQL Server 7.0 或更高版本上的 Northwind 示例数据库。ADO.NET 数据在此情形 5 中,示例代码创建一个 SqlCommand 以从 Products 表中选择行,并添加 SqlParameter 来将结果限制为其 UnitPrice 大于指定参数值的行。
SqlConnection 在 using 块内打开,这将确保在代码退出时会关闭和释放资源。示例代码使用 SqlDataReader 执行命令,ADO.NET 数据并在控制台窗口中显示结果。此示例中的代码假定您可以连接到 Microsoft Access Northwind 示例数据库。#t#
在此情形 5 中,示例代码创建一个ADO.NET 数据 OleDbCommand 以从 Products 表中选择行,并添加 OleDbParameter 来将结果限制为其 UnitPrice 大于指定参数值的行。OleDbConnection 在 using 块内打开,这将确保在代码退出时会关闭和释放资源。示例代码使用 OleDbDataReader 执行命令,并在控制台窗口中显示结果。
- Option Explicit On
- Option Strict On
- Imports System
- Imports System.Data
- Imports System.Data.SqlClient
- Public Class Program
- Public Shared Sub Main()
- Dim connectionString As String = GetConnectionString()
- Dim queryString As String = _
- "SELECT CategoryID, CategoryName FROM dbo.Categories;"
- Using connection As New SqlConnection(connectionString)
- Dim command As SqlCommand = connection.CreateCommand()
- command.CommandText = queryString
- Try
- connection.Open()
- Dim dataReader As SqlDataReader = _
- command.ExecuteReader()
- Do While dataReader.Read()
- Console.WriteLine(vbTab & "{0}" & vbTab & "{1}", _
- dataReader(0), dataReader(1))
- Loop
- dataReader.Close()
- Catch ex As Exception
- Console.WriteLine(ex.Message)
- End Try
- End Using
- End Sub
- Private Shared Function GetConnectionString() As String
- ' To avoid storing the connection string in your code,
- ' you can retrieve it from a configuration file.
- Return "Data Source=(local);Initial Catalog=Northwind;" _
- & "Integrated Security=SSPI;"
- End Function
- End Class
当前名称:进行检索ADO.NET数据说明
当前路径:http://www.shufengxianlan.com/qtweb/news8/188758.html
网站建设、网络推广公司-创新互联,是专注品牌与效果的网站制作,网络营销seo公司;服务项目有等
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联