فتح نموذج في قاعدة بيانات أخرى

[JABERXP]

الأعزاء..

لدي عدد من قواعد البيانات تحتوي عدد من النماذج ، أريد من خلال زر أمر فتح نموذج في قاعدة بيانات أخرى لسجل محدد .

وقد جربت الطريقة التالية لكن أعطتني خطأ ..

Sub OpenNewForm()

Dim objAccess As Access.Application

Dim strMDB , strForm as String

Set objAccess = New Access.Application

StrMDB = "D:\Employees.mdb"

StrForm= "FrmAbsent"

With objAccess

.OpenCurrentDatabase strMDB

.DoCmd.OpenForm strForm

End With

End Sub

[Force]

السلام عليكم

الكود صحيح وليس به اي مشكلة

المشكلة في خصائص النموذج الذي تريد فتحه

لذا اذهب الى قاعدة البيانات التي بها النموذج المراد فتحه

افتح النموذج في عرض التصميم ومن خائص النموذج اختر

التبويب -غير ذلك- وغير خيارات البند - منبثق - الى نعم

وخيارات البند - شكلي او مشروط - الى نعم

ثم اغلق قاعدة البيانات ثم اذهب الى قاعدة البيانات التي تريد فتح ذلك النموذج منها وضع الكود الذي كتبته في زر امر على النموذج عندها سيفتح النموذج كما تريد

وهذا الكود تنقله كما هو فقط غير اسم مسار قاعدة البيانات

واسم النموذج .

Dim objAccess As Access.Application
Dim strMDB, strForm As String

Set objAccess = New Access.Application
strMDB = "c:\DataBase.mdb"
strForm = "Form1"

With objAccess
.OpenCurrentDatabase strMDB
.DoCmd.OpenForm strForm
End With

[أبو تماضر]

مشكور أخي Force

المثال شغال تمام الله يكثر خيرك

لكن إن أردت أن أجعل مصدر بيانات لنموذج في القاعدة المفتوحة من جدول أو استعلام بقاعدة خارجية , هل من طريقة ؟

لم تفلح محاولاتي

تم تعديل أكتوبر 24, 2005 بواسطه أبو تماضر

[Force]

نعم اخي الكريم يمكن ذلك عن طريق ربط الجداول بين قواعد البيانات

يعني لو عندك نموذج في القاعدة المفتوحه تريد ان يكون مصدر بياناته من جدول في قاعدة بيانات

اضغط بزر الفاره الايمن على اطار الاكسس الداخلي اختر منها الخيار ربط جداول

ستفتح لك نافذه تحديد قاعدة البيانات التي تريد ربط الجدول بالقاعدة المفتوحة

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

الان اذهب الى النموذج واجعل مصدر بياناته هذا الجدول المرتبط فقط

اذا رغبت ان يكون المصدر استعلام انشأ استعلام مصدره الجدول المرتبط او استورد الاستعلام من القاعدة الخارجيه واسند النموذج اليه

[أبو تماضر]

مشكور أخي على الرد السريع

جاري التجريب

[التقني]

الأخ JABERXP

أين انت :(

هل تريد طريقة فتح نموذج من قاعدة أخرى ؟

اطلع بارك الله بك الى موضوع الأخ ابن مسقط حفظه الله :

http://www.officena.net/ib/index.php?showtopic=9453

[عمرو العاصى]

موضوع مميز

بارك الله فيك اخى الكريم

وجعله في ميزان حسناتك