09-07-18, 01:26 PM
السلام عليكم
اخوان انا كملت التقارير والحمد لله وبعد متابعة الدروس في هذا المنتدى الرائع لكن اجهتني مشلة اليوم
وهي اني لما اقوم بالاستعلام عن حقلين في من قاعدة البيانات واقوم بتشغيل البرنام بيطلب مني باسوورد وكلمة المرور عند النقر على زر الطباعة ولا اعرف السبب علما انا جربت كل لطرق والحلول لكن لم تنفع اليكم الكود
بانتظر حلولكم يا اخاني الاعزاء
اخوان انا كملت التقارير والحمد لله وبعد متابعة الدروس في هذا المنتدى الرائع لكن اجهتني مشلة اليوم
وهي اني لما اقوم بالاستعلام عن حقلين في من قاعدة البيانات واقوم بتشغيل البرنام بيطلب مني باسوورد وكلمة المرور عند النقر على زر الطباعة ولا اعرف السبب علما انا جربت كل لطرق والحلول لكن لم تنفع اليكم الكود
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Application.DoEvents()
Dim ConInfo As New CrystalDecisions.Shared.TableLogOnInfo
ConInfo.ConnectionInfo.ServerName = Application.StartupPath & "\DB.mdb"
ConInfo.ConnectionInfo.DatabaseName = "DB.mdb"
ConInfo.ConnectionInfo.UserID = "Admin"
ConInfo.ConnectionInfo.Password = "yazsys.com1234"
Dim rpt1 As New CrystalReport9
rpt1.Database.Tables(0).ApplyLogOnInfo(ConInfo)
rpt1.SetDataSource(DataSetInvoices)
Dim frm As New FormPrint
frm.CrystalReportViewer1.ReportSource = rpt1
frm.CrystalReportViewer1.LogOnInfo(0).ConnectionInfo.Password = "yazsys.com1234"
frm.ShowDialog()
End Sub
End Class