borderAndreaVB free resources for Visual Basic developersborder

borderAndreaVB Visual Basic and VB.NET source code resources - Copyright © 1999-2010 Andrea Tincaniborder

AndreaVB | Forum | News | Downloads | Register | Help | Member List | Statistics | Search | PM | Profile

Print This Topic
Previous Topic (Is It Possible?)Next Topic (missing items) New Topic New Poll Post Reply
AndreaVB Forum : Reporting tools : DataGride Vs Datareport
Poster Message
jonybd
Level: Master

Registered: 18-01-2005
Posts: 119

Ads by Lake Quincy Media
icon DataGride Vs Datareport

i am trying to use vb datareport to open FlexGride data for print. any idea how to resolve this.



            Dim i As Integer
        
            With from1.flexgrid1
        
                    For i = 1 To from1.flexgrid1.Rows - 1
                    
                        If (from1.flexgrid1.TextMatrix(i, 0) = "") Then
                        
                                Exit Function
                                
                        Else
                            
                            With DataReport1.Sections("Section1").Controls
                                .Item("Text1").DataField = from1.flexgrid1.TextMatrix(i, 0)

                            End With


                        End If
                                            
                        Set DataReport1.DataSource =
                        DataReport1.Show vbModal
                    
                    
            End With
    

29-09-2006 at 08:01 PM
View Profile Send Email to User Show All Posts Visit Homepage | Quote Reply
Jihadalariqi
Level: Protégé

Registered: 18-12-2007
Posts: 7
icon Re: DataGride Vs Datareport

quote:
Set DataReport1.DataSource =


set the  record set

like this


Private Sub Command2_Click()
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset

cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
App.Path & "\small business.mdb;Persist Security Info=False"


rst.Open "SQL", cnn, adOpenStatic, adLockOptimistic


Set DataReport1.DataSource = rst
DataReport1.Show 1

End Sub





____________________________
vbboy
18-12-2007 at 10:29 PM
View Profile Send Email to User Show All Posts Visit Homepage | Quote Reply
AndreaVB Forum : Reporting tools : DataGride Vs Datareport
Previous Topic (Is It Possible?)Next Topic (missing items) New Topic New Poll Post Reply
Surf To:


Not Logged In? Username: Password: Lost your password?
Partners: Download Actual Software | Free Software Download
borderAndreaVB free resources for Visual Basic developersborder

borderAndreaVB Visual Basic and VB.NET source code resources - Copyright © 1999-2010 Andrea Tincaniborder