نحوه نمایش اطلاعات دیتا تیبل در کریستال ریپورت

[ehsan21]

با سلام
من اطلاعات یک گزار ش رو داخل یک دیتا تیبل ریختم . چه طور میشه این رو به یک کریستال خالی ارسال کنم که محتویات دیتا تیبل رو از طریق کریستال ریپورت ببینم ؟

[sara.f]

با سلام
من اطلاعات یک گزار ش رو داخل یک دیتا تیبل ریختم . چه طور میشه این رو به یک کریستال خالی ارسال کنم که محتویات دیتا تیبل رو از طریق کریستال ریپورت ببینم ؟
سلام
جستجو می کردید هم به نتایج خوبی می رسیدید.

privatevoid button15_Click(object sender, EventArgs e)
{
try
{
DataTable datatable=newDataTable();
datatable.Clear();
ReportDocument reportDocument = newReportDocument();
SqlDataAdapter objadapter = newSqlDataAdapter();
objadapter.SelectCommand = newSqlCommand("select * from employee where lname=@l1 order by code", objconn);
objadapter.SelectCommand.Parameters.AddWithValue("@l1", comboBox2.Text);
objconn.Open();
objadapter.Fill(datatable);
objconn.Close();
ConnectionInfo connectionInfo = newConnectionInfo();
connectionInfo.ServerName = ".";
connectionInfo.DatabaseName = "project2";
connectionInfo.UserID = "";
connectionInfo.Password = "";
string reportPath = Application.StartupPath.Remove(Application.Startup Path.Length - 10);
reportPath += @"\CrystalReport1.rpt";
reportDocument.Load(reportPath);
reportDocument.SetDataSource(datatable);
crystalReportViewer1.ReportSource = reportDocument;

}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}

}

[ehsan21]

من دیتا تیبل رو به صورت دستی پر کردم و از بانک نمی خونم .
در ارتباط این دیتا تیبل به کریستال مشکل دارم.
به چه صورت فیلد های دیتا تیبل رو برای کریستال تعریف کنم و اونارو به هم ارتباط بدم ؟

[sara.f]

من دیتا تیبل رو به صورت دستی پر کردم و از بانک نمی خونم .
در ارتباط این دیتا تیبل به کریستال مشکل دارم.
به چه صورت فیلد های دیتا تیبل رو برای کریستال تعریف کنم و اونارو به هم ارتباط بدم ؟
من متوجه نمی شم، :متفکر:
چطوری دیتا تیبل را دستی پر کردید؟
لطفا کدهای این قسمت را در اینجا بذارید تا بتونم کمکتون کنم.

[ehsan21]

dt = New DataTable
Dim ro As DataRow

ro = dt.NewRow
dt.Columns.Add("Column1")
dt.Columns.Add("Column2")
dt.Columns.Add("Column3")
dt.Columns.Add("Column4")
dt.Columns.Add("Column5")
dt.Columns.Add("Column6")

For i = 0 To dg.Rows.Count - 1
ro = dt.NewRow

ro("Column1") = dg.Rows(i).Cells("Column1").Value

ro("Column2") = dg.Rows(i).Cells("Column2").Value
ro("Column3") = dg.Rows(i).Cells("Column3").Value
ro("Column4") = dg.Rows(i).Cells("Column4").Value
ro("Column5") = dg.Rows(i).Cells("Column5").Value


strcon = dg.Rows(i).Cells("Column6").Value.ToString
If dg.Rows(i).Cells("Column6").Value.ToString <> " " Then

ro("Column6") = dg.Rows(i).Cells("Column6").Value
Else
ro("Column6") = "-"
End If
dt.Rows.Add(ro)
Next


به این صورت پر شده . اینو می خوام به کریستال نسبت بدم و در کریستال هیچ فیلدی رو تعریف نکرم . نمیدونم چه با ید انجام بدم :اشتباه::ناراحت::افسرده:

[ehsan21]

کمک
این کار اصلاً میشه ؟:عصبانی++: