Duyuruyu Kapat
Facebook Gözat
Twitter Gözat

Crystal report sorgu problemi

Konu, 'Visual Basic .Net' kısmında wallcry tarafından paylaşıldı.

  1. wallcry

    wallcry Üye

    Kayıt:
    26 Haziran 2009
    Mesajlar:
    75
    Beğenilen Mesajlar:
    0
    Şehir:
    Tekirdağ
    Merhaba arkadaşlar. Yaptığım formda girilen iki tarih arasındaki satışları kodla crystal repota dökmek istiyorum. Parameters field ile aslında yapabiliyorum ama her seferinde tablonun tamamı parametreye geldiği için biraz çirkin bir görüntü oluyor. Bunun yerine kendi formumdaki tarih itemiyle seçilen iki tarih arasını kod yazarak rapora dökmem gerekiyor. Yazdığım kodlar aşağıda fakat çözemediğim bir hata var, yardım ederseniz sevinirim.

    Imports CrystalDecisions.Shared
    Imports CrystalDecisions.CrystalReports.Engine
    Imports System.Data.SqlClient
    Imports CrystalDecisions.ReportSource

    Public Class gunluk
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim bas, bit As String
    Try
    If baglan.State = ConnectionState.Closed Then
    baglan.Open()
    End If
    bas = Microsoft.VisualBasic.Left(bastarih.Value, 10)
    bit = Microsoft.VisualBasic.Left(bittarih.Value, 10)
    If bas > bit Then
    MsgBox("Başlangıç tarihi bitiş tarihinden büyük olamaz!!!")
    Exit Try
    End If
    sorgu = "select * from satis where tarih>= ' " & bas & " ' and tarih<=' " & bit & "'"
    komut.Connection = baglan
    Dim da As New SqlDataAdapter(sorgu, baglan)
    Dim ds As New DataSet
    da.Fill(ds, "satis")
    Dim stokrapor As New ReportClass
    stokrapor.SetDataSource(ds)
    satisliste.CrystalReportViewer1.ReportSource = stokrapor
    satisliste.Show()
    Catch ex As Exception
    MsgBox("hata oluştu")
    End Try
    baglan.Close()
    Me.Close()
    End Sub
     
  2. wallcry

    wallcry Üye

    Kayıt:
    26 Haziran 2009
    Mesajlar:
    75
    Beğenilen Mesajlar:
    0
    Şehir:
    Tekirdağ
    Arkadaşlar bir bilen yok mu???