منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مثال تمرير الباراميتر في الكريستال ريبورت لايعمل في مشروعي - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مثال تمرير الباراميتر في الكريستال ريبورت لايعمل في مشروعي (/showthread.php?tid=22298)



مثال تمرير الباراميتر في الكريستال ريبورت لايعمل في مشروعي - nassery99 - 29-10-17

اخذت المثال المرفق من المنتدى, عندما اشغله يعمل بشكل جيد,لكن عندما اضيفه الى مشروعي مثل ماهو تماما لا اغير الا اسماء المعطيات,تظهر لي الرساله المرفقه.
ارجوا ايجاد حل لذلك.


RE: مثال تمرير الباراميتر في الكريستال ريبورت لايعمل في مشروعي - a.ahmed - 29-10-17

PHP كود :
Imports System.Data.OleDb

Public Class Form1

    Dim olecon 
As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\DB.accdb;")

    Private 
Sub BtnPrint_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles BtnPrint.Click

        Dim da 
As New OleDbDataAdapter("SELECT Tbl_Customers.CustID, Tbl_Customers.CustName FROM Tbl_Customers WHERE [Tbl_Customers.CustID]=@CustID;"olecon)
        
da.SelectCommand.Parameters.AddWithValue("@CustId"TextBox1.Text)

        
Dim dt As New DataTable
        da
.Fill(dt)

        
Dim rpt As New CrystalReport1
        rpt
.SetDataSource(dt)
        
CrystalReportViewer1.ReportSource rpt

    End Sub

End 
Class 



RE: مثال تمرير الباراميتر في الكريستال ريبورت لايعمل في مشروعي - nassery99 - 29-10-17

الف شكر على الرد السريع.

للاسف ظهرت رسالة الخطاء التالية


RE: مثال تمرير الباراميتر في الكريستال ريبورت لايعمل في مشروعي - a.ahmed - 29-10-17

app.config
PHP كود :
<?xml version="1.0"?>
<configuration>
  <startup useLegacyV2RuntimeActivationPolicy="true"/>
</configuration>