Visual Basic .NET で ADO レコードセットを使用する方法

努力成为好爸爸

于 2015-06-07 18:03:02 发布

阅读量504

点赞数

分类专栏： .NET

.NET 专栏收录该内容

197 篇文章

订阅专栏

本文介绍如何使用ADO.NET连接并操作SQL Server数据库，包括建立连接、执行SQL查询、处理记录集等基本操作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Module Module1

    Sub Main()
        Dim cn As New ADODB.Connection()
        cn.ConnectionString = "provider=sqloledb;server=(localhost);database=northwind;uid=<username>"
        cn.Open()

        Dim rs As New ADODB.RecordSet()
        rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient
        rs.CursorType = ADODB.CursorTypeEnum.adOpenStatic
        rs.LockType = ADODB.LockTypeEnum.adLockBatchOptimistic
        rs.Open("select * from products", cn)
        rs.ActiveConnection = Nothing
        cn.Close()

        Dim da As New System.Data.OleDb.OleDbDataAdapter()
        Dim ds As New DataSet()
        da.Fill(ds, rs, "products")

        Console.Write("There are " & ds.Tables(0).Rows.Count.ToString & " total products.")
        Console.ReadLine()
    End Sub

End Module