将数据从 SQL 服务器显示到列表视图答案

【问题标题】：Display data from SQL server to listvew将数据从 SQL 服务器显示到列表视图
【发布时间】：2016-04-24 13:29:03
【问题描述】：

我是 vb.net 的极客，我已经使用 ms 访问数据库从应用程序制作了 vb.net。现在我需要将此应用程序用于多用户并且我想使用 SQL 服务器，我使用此代码显示从访问数据库到列表视图的数据：

 con.ConnectionString = "provider=microsoft.ace.oledb.12.0; data source = |datadirectory|\noorapp.accdb;"
        con.Open()

Dim dt As New DataTable
        Dim ds As New DataSet
        ds.Tables.Add(dt)
        Dim da As New OleDbDataAdapter("select * from " & Year(Now) & " where cmonth='" & m & "' order by cdate DESC", con)
        da.Fill(dt)
        Dim myrow As DataRow
        For Each myrow In dt.Rows
            ListView1.Items.Add(myrow.Item(0)).ToString()
            ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(2))
            ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(3))
            ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(4))
            ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(5))
            ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(6))
            ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(myrow.Item(7))
        Next

任何解决方案如何使它也适用于 sql server？谢谢。

【问题讨论】：

标签： sql-server vb.net visual-studio

【解决方案1】：

更改您的连接字符串参见here。还将您的 OleDbConnection 对象更改为 SQLConnection 并将您的 OleDbDataAdapter 更改为 SQLDataAdapter

您的数据库必须已经存在于 SQL Server 中才能正常工作

【讨论】：