majidsoft
پنج شنبه 16 اردیبهشت 1389, 02:18 صبح
با سلام خدمت دوستان عزیز
من در برنامه هام با کریستال کار می کردم و تازه می خواهم با stimul کار کنم من از این کد برای فیلتر کردن اطلاعاتم وارسال آن به کریستال استفاده می کردم ولی هر کاری می کنم در stimule نمی توانم اگه ممکنه این کد را برام ارسال کنید
با تشکر
Dim cnn As SqlConnection = Fn_Get_SqlConnection()
Dim ds As New DataSet
Dim Cmd1 As SqlDataAdapter = New SqlDataAdapter("Select * from rest where (pri=" & 1 & ") and ((code=" & txtcode.Text & "))", cnn)
Cmd1.Fill(ds, "rest") : Dim rpt As New cry2 : rpt.SetDataSource(ds)
frmreport.CrystalReportViewer1.ReportSource = rpt : frmreport.Show()
من در برنامه هام با کریستال کار می کردم و تازه می خواهم با stimul کار کنم من از این کد برای فیلتر کردن اطلاعاتم وارسال آن به کریستال استفاده می کردم ولی هر کاری می کنم در stimule نمی توانم اگه ممکنه این کد را برام ارسال کنید
با تشکر
Dim cnn As SqlConnection = Fn_Get_SqlConnection()
Dim ds As New DataSet
Dim Cmd1 As SqlDataAdapter = New SqlDataAdapter("Select * from rest where (pri=" & 1 & ") and ((code=" & txtcode.Text & "))", cnn)
Cmd1.Fill(ds, "rest") : Dim rpt As New cry2 : rpt.SetDataSource(ds)
frmreport.CrystalReportViewer1.ReportSource = rpt : frmreport.Show()