منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : ارجو التعديل على كود الطباعه
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
الكود التالى يقوم بفتح تقرير اكسيس من خلال فيجوال بيسك6  من اوفيس 2007

Dim raid As Access.Application
Set raid = New Access.Application
raid.Visible = True
raid.OpenCurrentDatabase App.Path & "\files.mdb"
raid.DoCmd.OpenReport "contracteur_q", acViewPreview, acViewNormal

raid.DoCmd.Maximize
raid.Visible = Tru



 المطلوب 
التعديل على هذا الكود ليقوم بعرض تقرير اكسيس --اوفيس 2010
اسم التقرير فى اكسيس contacteur_q
ولكم خالص الشكر 
وعليكم السلام ورحمة الله وبركاته 

أظن أن الكود المناسب هو الكود التالي يعمل مع كل نسخ أوفس :

كود :
Dim raid As Access.Application
Set raid = New Access.Application
raid.OpenCurrentDatabase App.Path & "\files.mdb"
raid.DoCmd.OpenReport "contracteur_q", acViewPreview
raid.DoCmd.Maximize
raid.Visible = True
اتوقع المشكلة في امتداد اكسيس
غيره الى اي
files.accdb
بالتوفيق
شكرا استادنا الكبير / احمد عبد العليم بارك الله فيك