我是vb.net的极客,我已经从具有ms访问数据库的应用程序中创建了vb.net。现在我需要将此应用程序用于多用户,并且我想使用SQL服务器,我使用此代码显示从访问数据库到listview的数据:
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服务器也? 感谢。
答案 0 :(得分:0)
更改您的连接字符串,请参阅here。同时将OleDbConnection对象更改为SQLConnection,将OleDbDataAdapter更改为SQLDataAdapter
您的数据库必须已存在于SQL Server中才能使其正常工作