Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Sql server vb.net的crystal报表中没有数据显示,数据集使用SQL_Sql Server_Vb.net_Crystal Reports_Dataset_Vb.net 2010 - Fatal编程技术网

Sql server vb.net的crystal报表中没有数据显示,数据集使用SQL

Sql server vb.net的crystal报表中没有数据显示,数据集使用SQL,sql-server,vb.net,crystal-reports,dataset,vb.net-2010,Sql Server,Vb.net,Crystal Reports,Dataset,Vb.net 2010,我正在使用Vb.NET2010开发包含CrystalReportsCRFORVS\u13\u0的项目。我连接到sqlserver并使用以下步骤填充数据集 Imports System.Data.SqlClient Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.Shared Imports CrystalDecisions.ReportSource Imports System.Data Publi

我正在使用Vb.NET2010开发包含CrystalReportsCRFORVS\u13\u0的项目。我连接到sqlserver并使用以下步骤填充数据集

Imports System.Data.SqlClient
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports CrystalDecisions.ReportSource
Imports System.Data

Public Class frmPrinTest

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     Dim cnn As SqlConnection
     Dim connectionString As String
     Dim sql As String
     Dim MyCommand As New SqlCommand
     Dim myDA As New SqlDataAdapter

    connectionString = "Data Source=.\SQLEXPRESS;Initial Catalog=stock;Persist Security Info=True;User ID=sa;Password=1234[enter image description here][1];"

    cnn = New SqlConnection(connectionString)
    sql = "select Icode,Iname from stockInvt"

    MyCommand.Connection = cnn
    MyCommand.CommandText = sql
    MyCommand.CommandType = CommandType.Text
    myDA.SelectCommand = MyCommand
    Dim ds As New DataSet1
    myDA.Fill(ds, "stockInvt")

    Dim objRpt As New CrystalReport1
    objRpt.SetDataSource(ds)
    CrystalReportViewer1.ReportSource = objRpt
    'CrystalReportViewer1.Refresh()
   End Sub
End Class
但我无法在crystal report中显示数据集或数据表中的数据。 我也关注这个链接。 请帮帮我


您必须指定crystal report将使用的表。因此,只需将您的代码从这个
objRpt.SetDataSource(ds)
更改为这个
objRpt.SetDataSource(ds.tables(“stockInvt”))
objRpt.SetDataSource(ds.tables(0))

非常感谢。。你节省了我的时间。