dynamic generation of crystal report

sir thanks for your answere, i have done the same ... the table that i have constructed and added to the new dataset and then i have supplied it as the sourse to the report, but the problem for me in the changing schema of mine because i dont have a fixed schema for my table at one tome it may have just six columns and at the other time it may have say... 15 columns... so please suggest me some way to provide this schema to the report at run time using that .xsd file of the dataset and also how to show the same data in the report. i am sending you the code of mine using which i am generating the dynamic column and then... i cant do it using wizard sir, suggest me the way to do it all using code... Dim IDNO As New DataColumn With IDNO .DataType = System.Type.GetType("System.String") .ColumnName = "IDNO" End With maintable.Columns.Add(IDNO) Dim NAME As New DataColumn With NAME .DataType = System.Type.GetType("System.String") .ColumnName = "NAME" End With maintable.Columns.Add(NAME) Dim CENTER As New DataColumn With CENTER .DataType = System.Type.GetType("System.String") .ColumnName = "CENTER" End With maintable.Columns.Add(CENTER) For i = 0 To listcomponent.SelectedItems.Count - 1 Dim maincmd As SqlCommand = New SqlCommand("GET_MARKSBYCOMPONENT", con) maincmd.CommandType = CommandType.StoredProcedure query = "COMPONENTS= '" & listcomponent.SelectedItems(i) & "'" 'MsgBox("COMPONENTS= '" & listcomponent.SelectedItems(i) & "'") row = combo_dataset.Tables(0).Select(query) maincmd.Parameters.Add("@COMP_ID", SqlDbType.Int).Value = CInt(row(0)("COMPONENT_ID")) maincmd.Parameters.Add("@COMP_CODE", SqlDbType.Int).Value = CInt(row(0)("COMPUTER_CODE")) MsgBox(CInt(row(0)("COMPONENT_ID")) & "&" & CInt(row(0)("COMPUTER_CODE"))) main_adapter.SelectCommand = maincmd 'main_dataset = New DataSet Try main_adapter.Fill(main_dataset, "mytable") Catch ex As Exception MsgBox(ex.Message) End Try For Each temprow In main_dataset.Tables(0).Rows '''''if i am talking about the first time then put it into the table as it is,else convert it (only the marks table of the rest) as only one table in my main table If i = 0 Then Dim mainrow = maintable.NewRow mainrow("IDNO") = temprow("IDNO") mainrow("NAME") = temprow("NAME") mainrow("CENTER") = temprow("CENTER") mainrow("STATUS") = temprow("STATUS") mainrow(i + 4) = temprow("MARKS") maintable.Rows.Add(mainrow) End If Next If i > 0 Then j = 0 MsgBox("dataset has " & main_dataset.Tables(0).Rows.Count & " rows") For Each temprow In main_dataset.Tables(0).Rows MsgBox(temprow("MARKS")) maintable.Rows(j)(i + 4) = temprow("MARKS") j = j + 1 Next End If main_dataset.Clear() Next Dim tot As Integer For Each temprow In maintable.Rows tot = 0 For j = 4 To maintable.Columns.Count - 2 tot = tot + temprow(j) Next temprow("TOTAL") = tot Next DataGrid1.DataSource = maintable End Sub Private Sub BtNPRINT_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtNPRINT.Click 'Dim rptdataset As New DataSet DataSet1.Tables.Add(maintable) ' added maintable to the dataset Dim rd As New MarksReport CrystalReportViewer1.ReportSource = rd rd.SetDataSource(DataSet1)

You need to "push" the data into the crystal report. You have to create a new dataset in your project add the elements for your report. Build your project, then add a report in the wizard you have ADO.Net datsource. This is your dataset you keyed in and you candraw the report. I will dig the example out for you if you get stuck.