SANJAY.DESHMUKH 0 Newbie Poster

subreport

Dear friend

    pl help me how to call crystal subreport in vb6 backend sql

!) I created two report report1 & report 2 both r working fine with below code.
2)I linked two reports by subreport concept of crystal but how to make coding in visual basic 6.

                Rep_form.CR1.Reset
                Rep_form.CR1.LogonInfo(0) = rep_con
                Rep_form.CR1.WindowShowPrintSetupBtn = True
                Rep_form.CR1.WindowShowExportBtn = True
                Rep_form.CR1.WindowShowGroupTree = True
                Rep_form.CR1.WindowShowSearchBtn = True
                Rep_form.CR1.WindowShowRefreshBtn = True
                Rep_form.CR1.WindowShowZoomCtl = True
                Rep_form.CR1.WindowState = crptMaximized
                Rep_form.CR1.DiscardSavedData = True
                Rep_form.CR1.SQLQuery = ""
                
                Rep_form.CR1.SQLQuery = " SELECT   SAN_BOM_ITMCCOST_BILLCOST.IDRWG, SAN_BOM_ITMCCOST_BILLCOST.IDITEM, SAN_BOM_ITMCCOST_BILLCOST.ID_FACT, " & _
                                        " From   SAN_BOM_ITMCCOST_BILLCOST SAN_BOM_ITMCCOST_BILLCOST,   Mfg_ITMMAST Mfg_ITMMAST " & _
                                        " Where   SAN_BOM_ITMCCOST_BILLCOST.IDITEM = Mfg_ITMMAST.IMPN  AND MACHINE='" & MACHINE_NAME & "'" & _
                                        " Order By    SAN_BOM_ITMCCOST_BILLCOST.IDRWG Asc "
                                        
                                          
                 Rep_form.CR1.ReportFileName = MRCREPORT & "BOM_RAW_BILL_COST.rpt"
                 Rep_form.CR1.WindowTitle = "R_COST"
                 Rep_form.CR1.ReportTitle = " ITEM MATERILA RAW COST "
                 Rep_form.CR1.Action = 1
                 Screen.MousePointer = 0
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.