منتديات جريت بلينز العربية Great Plains For Arab

منتديات جريت بلينز العربية Great Plains For Arab (http://www.gp4arab.com/forum/index.php)
-   منتدى أكواد فيجوال بيسك VBA (http://www.gp4arab.com/forum/forumdisplay.php?f=7)
-   -   ماهي طريقة استدعاء subreport بالكرستال من vba (http://www.gp4arab.com/forum/showthread.php?t=72)

mobawafi 03-Jul-2011 10:31 AM

ماهي طريقة استدعاء subreport بالكرستال من vba
 
السلام عليكم ورحمة الله وبركاته
لقد قمت بتصميم ربيوت وربيوت فرعي له suprepot
وعندما قمت بااستدعاءه كالعادة في اي ريبوت معمول بالكريستال ظهر لي خطأ فهل هناك طريقة أخرى لاستدعاء ال supreport
وجزاكم الله خيرا

صلاح السيد 04-Jul-2011 04:21 PM

اخى الكريم
شكرا لمشاركتك معنا
ولكنى اريد تفصيل اكثر عن المشكله
مثلا اذا استطعت ان ترسل
print screen
لما يظهر على الشاشه هذا سوف يساعد على معرفة المشكله بوضوح
ولكنى لدى كود vb يمكن ان يساعدك فى استدعاء التقرير من داخل ال vb سواء كان تقرير واحد او له تقارير مساعده
كود:


Call Form_Resize
Dim ReportFile As String
 
ReportFile = App.Path & "\main report name.rpt"
 
Set m_Report = m_Application.OpenReport(ReportFile)
m_Report.Database.Tables(1).ConnectionProperties("password") "sa"
CrViewer.ReportSource = m_Report
CrViewer.Zoom 1
CrViewer.ViewReport
Screen.MousePointer = vbDefault

ويكون التقريرين الاصلى والمساعد معا فى
حافظه واحدهfolder
ونسأل الله ان يفيدك
وشكرا

صلاح السيد 04-Jul-2011 04:24 PM

كود:

Option Explicit
Dim m_Application As New CRAXDRT.Application
Dim m_Report As New CRAXDRT.Report
 
 
Private Sub Form_Load()
 
Call Form_Resize
Dim ReportFile As String
 
ReportFile = App.Path & "\Customer List With Control Accounts.rpt"
 
Set m_Report = m_Application.OpenReport(ReportFile)
m_Report.Database.Tables(1).ConnectionProperties("password") = "sa"
CrViewer.ReportSource = m_Report
CrViewer.Zoom 1
CrViewer.ViewReport
Screen.MousePointer = vbDefault
End Sub

هذا هو الكود كاملا

Monzer Osama 04-Jul-2011 04:34 PM

شكرا مشرفنا المبدع صلاح...

mobawafi 05-Jul-2011 09:35 AM

جزاك الله خيرا يااخي صلاح
والله كان ودي ارسلك المشكلة كصورة ولكن بعد ان طرحت الموضوع وتأخر الرد عليه فكرت بطريقة ثانية في التقرير غير التقرير الفرعي
ولكن ايضا لم تنفع فكان الحل الأخير انني اتصل بشركة لجعلهم هم يصصمموا التقرير بعد ان عجزت عن التقرير المطلوب مني

hishamglal65 07-Jan-2013 07:05 AM

شكرا على الاهتمام
 
نشكركم على اهتمامكم بالردود

walidzak 10-Jan-2013 10:46 AM

جزاك الله خيرا

hishamglal65 15-Mar-2013 12:24 AM

شكرا لك على مساعدتك لنا
:)


جميع الأوقات بتوقيت GMT +3. الساعة الآن 12:39 PM.

Powered by vBulletin® Version 3.8.3

الموقع والمنتدى من تطوير » شركة المنذر للاستضافة والتصميم


الموقع لا يمثل أي جهة رسمية بل هو جهد شخصي يرمي الى تجميع القدرات في برنامج جريت بلينز