+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع (/showthread.php?tid=8641)
برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع - VB_Coder - 26-04-13
السلام عليكم ورحمة الله وبركاته
- هذا برنامج خاص بتحويل تقارير الداتا ريبورت DataReport إلى تقارير أكتف ريبورت2 ActiveReport2 . والخاصه بالفيجول بيسك6 .
- طريقة الإستعمال سهله فقط قم بإختيار ملفات الداتا ريبورت عن طريق الضغط على زر "إضافة ملفات" ثم بعد ذلك قم بتحديد مجلد الإخراج والذي سيتم وضع التقارير المحوله بداخله وبعد ذلك قم بالضغط على زر "إبدأ عملية التحويل" . وبعد إنتهاء التحويل سيتكون ثلاثة ملفات لكل تقرير كلها بنفس إسم التقرير المحول ولكن بإمتدادت مختلفة حيث الأول سيكون بإمتداد dsr وهو الملف الأساسي للتقرير والمف الثاني بإمتداد dsx وهذا خاص بالكائنات الموجودة في التقرير كالأيقونات والصور وغيرها والملف الثالث بإمتداد rpx وهو خاص بما يحتويه التقرير من أداوت مرسومه عليه مع بياناتها وأماكن مواقعها وغيرها .
- ماذا تفعل بعد عملية التحويل :- أفتح مشروع الفيجول بيسك6 الخاص بك والذي تريد إضافة التقارير المحوله فيه ثم إذهب لقائمة "مشروع" أو "Project" ثم أختار الأمر "إضافة ملف" أو "Add File" ثم إختر ملف الديزاين أو الملف الأساسي للتقرير المحول والذي هو بإمتداد dsr وبعد إضافته للمشروع أفتح التقرير ثم من قائمة "ملف" أو "File" في التقرير أختر الأمر "فتح" أو "Open" ثم أختار الملف الذي بإمتداد rpx ثم أضفط "موافق" أو "OK" وبعد ذلك سترى أن جميع مكونات التقرير أضيفت إلى تقرير الأكتف ريبورت كما كانت في تقرير الداتا ريبورت .
- تحميل البرنامج :
- النسخة العربية :
DataReportToActiveReport2-Ar-Setup.exe - 5.23 MB
- النسخة الإنجليزية :
DataReportToActiveReport2-Setup.exe - 5.22 MB
- أرجو أن يستفيد منه الجميع . كما أرجو ممن يستخدم البرنامج ويستفيد منه أن يدعوا لي ولوالدي . وشكرا لكم .
- تحياتي للجميع .
- تم تحديث روابط التحميل .
برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع - mamas1 - 26-04-13
جزاك الله خيرا
اللهم إرحمه و من علمه و من رباه جزاك الله خيرا
برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع - 3amo - 30-04-13
بارك الله فيك وجزاك الله خيرا
اللهم إرحمه وارحم من علمه و من رباه و جزاك الله خيرا
برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع - VB_Coder - 30-04-13
السلام عليكم
- مشكورين إخواني الإعزاء . جزاكم الله خير . وأتمتى أن يفيدكم البرنامج .
- تحياتي لكما .
برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع - exo7 - 30-04-13
يا شباب ممكن مساعدة ......
اكتب برنامج لادخال عدد ما وطباعة العوامل الاولية له يعني مثلا العدد 24 عوامله الاولية = 2*2*2*3
بس يطبع 2 و 3
وشكرا ^___^
برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع - exo7 - 30-04-13
حد يعرف؟؟؟؟؟؟ ^_@ وينكم يا شباب
برنامج تحويل تقارير الداتا ريبورت إلى أكتف ريبورت2 - إهداء للجميع - اسلام الكبابى - 17-05-13
إقتباس :اكتب برنامج لادخال عدد ما وطباعة العوامل الاولية له يعني مثلا العدد 24 عوامله الاولية = 2*2*2*3تفضل أخى
كود :
[align=left][b][SIZE=2][SIZE=4]
Dim I As Integer
Dim X As Integer
Dim DEV As Single
Private Sub Command1_Click()
Cls
X = InputBox("أدخل العدد المطلوب تحليله", I)
10 For I = 2 To X
DEV = X / I
If Int(DEV) <> DEV Then GoTo 20
X = DEV: Print I: GoTo 30
20 Next I
30 If X > 1 Then GoTo 10
End Sub[/SIZE][/SIZE][/b]
[/align]ان أعجبتك مشاركتي
... فلا تنسى تقييمي 