فلتر داتا جريد وكريستال ريبورت

PHP كود :

Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click

    Dim dt As New DataTable

    Dim sql As String = "SELECT * FROM [Table1] WHERE ([Sex]=@sex) AND ([Birthday] BETWEEN @d1 AND @d2)" 
    Using da As New OleDbDataAdapter(sql, Con)
        da.SelectCommand.Parameters.AddWithValue("@sex", Me.ComboBox1.Text)
        da.SelectCommand.Parameters.AddWithValue("@d1", CDate(Me.DateTimePicker1.Value.Date))
        da.SelectCommand.Parameters.AddWithValue("@d2", CDate(Me.DateTimePicker2.Value.Date))
        da.Fill(dt)
    End Using

    dgvList.DataSource = dt


    Dim rep As New allReport1

    rep.SetDataSource(dt)
    rep.SetParameterValue("start_date", Me.DateTimePicker1.Value.Date)
    rep.SetParameterValue("end_date", Me.DateTimePicker2.Value.Date)

    CrystalReportViewer1.ReportSource = rep
    CrystalReportViewer1.Refresh()

End Sub 

كود :

<?xml version="1.0"?>

<configuration>

   <configSections>

   </configSections>

   <connectionStrings>

       <<add name="SavingDate.My.MySettings.dsreport" connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\alma\Desktop\6\SavingDate\db1.mdb" providerName="System.Data.OleDb"/>

   </connectionStrings>

   <system.diagnostics>

       <sources>

           <!-- This section defines the logging configuration for My.Application.Log -->

           <source name="DefaultSource" switchName="DefaultSwitch">

               <listeners>

                   <add name="FileLog"/>

                   <!-- Uncomment the below section to write to the Application Event Log -->

                   <!--<add name="EventLog"/>-->

               </listeners>

           </source>

       </sources>

       <switches>

           <add name="DefaultSwitch" value="Information"/>

       </switches>

       <sharedListeners>

           <add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter"/>

           <!-- Uncomment the below section and replace APPLICATION_NAME with the name of your application to write to the Application Event Log -->

           <!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->

       </sharedListeners>

   </system.diagnostics>

 <startup useLegacyV2RuntimeActivationPolicy="true">

   <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/>

 </startup> <runtime>

<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">

<dependentAssembly>

<assemblyIdentity name="System.Web.Services" publicKeyToken="B03F5F7F11D50A3A" culture="neutral"/>

<bindingRedirect oldVersion="0.0.0.0-4.0.0.0" newVersion="4.0.0.0"/>

</dependentAssembly>

</assemblyBinding>

</runtime>

</configuration>