Click here to Skip to main content
12,999,628 members (43,959 online)
Rate this:
Please Sign up or sign in to vote.
See more: , +
Hi friends!

I'm looking for an easy way to enable a user of my app to print the contet of a GridView.However, I think an easy way will be to convert it into a Crystal Report or pdf (many people say to pdf is terrible), so, I'd like to convert it into a Cyrstal Report (or just a report). Some people have talked about converting a GridView into a Crystal Report, but none have I seen talking about this when I generated my GridView in codes. I mean, people will talk of creating the dataset and data adapter using the GUI in VS2010, but I created mine in codes. Also, when telling the CR where to get its data, people talk about dragging the data connections (table fields etc) to the report in a GUI way, but I can't see how to do that in codes. I use codes for dataset and data adapter in my application forms, how can I code the Crystal Report?
(I develop with VB.NET, VS 2010)

Public inc As Integer
    Public MaxRows As Integer
    Public con As New OleDb.OleDbConnection
    Public dbProvider As String
    Public dbSource As String
    Public ds As New DataSet
    Public da As OleDb.OleDbDataAdapter
    Dim sql As String
    Dim sqlVacation As String
    Dim sqlRadio As String
        dbProvider = "PROVIDER= Microsoft.Jet.OLEDB.4.0;"
        dbSource = "Data Source = data/Human Resource.mdb;"
        con.ConnectionString = dbProvider & dbSource
        'Search for Department
        If rdDept.Checked = True Then
            sqlRadio = "SELECT ID,FirstName,MiddleName,Surname,Phone,Birthday,Empl_Year,Department,Residence,Status " _
            + "FROM tblDetails" _
            + " WHERE Department = '" & Trim(Me.txtSearch.Text) & "'"
            da = New OleDb.OleDbDataAdapter(sqlRadio, con)
            da.Fill(ds, "HumanResource")
            'Fill the data grid
            dgv1.DataSource = ds.Tables("HumanResource")
            'If nothing was found
            If ds.Tables("HumanResource").Rows.Count = 0 Then
                MsgBox("No any record found matching your search.", vbCritical, "GreatestHR:Search Results")
             dgv1.DataSource = ds.Tables("HumanResource")
            End If

I want to enable the user to print these results by creating a Crystal Report that will get its data from this gridView, (then I can print from the CR).
I have googled for this for some day now, can someone out there please help?

Thanks in advance,
its Frank!
Posted 12-Oct-12 12:09pm
Updated 12-Oct-12 12:12pm
Maciej Los254.5K

1 solution

Rate this: bad
Please Sign up or sign in to vote.

Solution 1

One way is to go with this one.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month

Advertise | Privacy | Mobile
Web02 | 2.8.170624.1 | Last Updated 15 Oct 2012
Copyright © CodeProject, 1999-2017
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100