2013-03-07 40 views
2

任何人都可以告诉我我在做什么错在这里? 非常基本的Visual Basic体验。从SQL数据库检索数据到VB.NET

我试图从提供的数据库中检索ORDERID,ORDERDATE和CUSTOMERID,并将它们显示在dataGridView中?

Dim con1 As New OleDbConnection 
con1.ConnectionString = _ 
"Provider=msdaora;Data Source=orabis;User Id=112221800;Password=112221800;" 

'Dim con1 As New SqlConnection("Provider=msdaora;Data Source=orabis;User Id=112221800;Password=112221800;") 
con1.Open() 
Dim cmd1 As New SqlCommand("select ORDERID, ORDERDATE AND CUSTOMERID from CUSORDER", con1) 

Dim ada1 As New SqlDataAdapter(cmd1) 
Dim ds1 As New DataSet 
ada1.Fill(ds1) 
ViewDeliverys.DataGridView1.DataSource = ds1.Tables(0) 

con1.Close() 
+0

你使用Oracle?将它添加为标签(或确认,我会) – 2014-09-08 00:46:33

回答

1

您不能使用OleDbConnection蒙山一个SqlCommand(SQL服务器)。你使用哪种rdbms?

这适用于SQL-服务器:

Using con = New SqlConnection(connectionString) 
    Using da = New SqlDataAdapter("SELECT ORDERID, ORDERDATE AND CUSTOMERID from CUSORDER", con) 
     Dim table = New DataTable() 
     da.Fill(table) 
     ViewDeliverys.DataGridView1.DataSource = table 
    End Using 
End Using 

编辑:这里是OleDb版本:

Using con = New OleDbConnection(connectionString) 
    Using da = New OleDbDataAdapter("SELECT ORDERID, ORDERDATE AND CUSTOMERID from CUSORDER", con) 
     Dim table = New DataTable() 
     da.Fill(table) 
     ViewDeliverys.DataGridView1.DataSource = table 
    End Using 
End Using 
+0

使用Oracle SQL Developer?那么需要oleDbConnection? – 112221 2013-03-07 10:45:34

+0

@ 112221:我编辑了我的答案以显示OleDb方法。 – 2013-03-07 10:48:00

+0

Dim con1 As New SqlConnection con1.ConnectionString = _ “Provider = msdaora; Data Source = orabis; User Id = 112221800; Password = 112221800;” con1.Open() 昏暗哒作为新的SqlDataAdapter(CMD1) 昏暗DS1作为新的数据集 使用CON =新的OleDbConnection(的connectionString:=) 使用DA =新OleDbDataAdapter的(“选择ORDERID,从CUSORDER ORDERDATE AND CUSTOMERID ” CON) 昏暗表=新的DataTable() da.Fill(表) ViewDeliverys.DataGridView1.DataSource =表 结束使用 结束使用 – 112221 2013-03-07 10:51:32

0

你在使用SQL Sever的或MS Access数据库? 如果您正在使用SQL Server,请使用SQL Connection,然后在MS Access上使用OleDBConnection。

对于正确的连接字符串检查它:

http://www.connectionstrings.com

检查也是本教程来自:

Dim cmd1 As New SqlCommand("select ORDERID, ORDERDATE AND CUSTOMERID from CUSORDER", con1) 

http://vb.net-informations.com/ado.net-dataproviders/ado.net-sqldataadapter

而且还从替换查询

w这里ORDERDATE AND CUSTOMERID会引发你的错误

将其更改为:

Dim cmd1 As New SqlCommand("select ORDERID, ORDERDATE,CUSTOMERID from CUSORDER", con1) 
+0

“不支持的关键字:'provider'。” - 现在获取此错误.. – 112221 2013-03-07 10:43:18