29-10-17, 08:12 AM
اخذت المثال المرفق من المنتدى, عندما اشغله يعمل بشكل جيد,لكن عندما اضيفه الى مشروعي مثل ماهو تماما لا اغير الا اسماء المعطيات,تظهر لي الرساله المرفقه.
ارجوا ايجاد حل لذلك.
ارجوا ايجاد حل لذلك.
29-10-17, 08:12 AM
29-10-17, 09:07 AM
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.Object, ByVal e As System.EventArgs) Handles 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
29-10-17, 09:12 AM
الف شكر على الرد السريع.
للاسف ظهرت رسالة الخطاء التالية
للاسف ظهرت رسالة الخطاء التالية
29-10-17, 11:57 AM
app.config
PHP كود :
<?xml version="1.0"?>
<configuration>
<startup useLegacyV2RuntimeActivationPolicy="true"/>
</configuration>