frozen قام بنشر أكتوبر 2, 2003 قام بنشر أكتوبر 2, 2003 السلام عليكم ورحمة الله وبركاته ==================== أساتذتى الكرام , أخوانى فى الله أسال الله المساعدة فى الاجابة على سؤال لم اجد له حلا فترة كبيرة من الزمن ولقد اتخذت المتاح لى من الاسباب لاتمكن من الوصول الى اجابة ولكن الله لم يأذن حتى تلك اللحظة فهلا وجدت عندكم الاجابة ---------------------------------------------------------------------- السؤال هو :- كيف لى ان اعبر عن مسار ملف موجود مع قاعدة البيانات فى نفس المجلد كمتغير بالنسبة لقاعدة البيانات ..................................................................... وحتى تكون الصورة واضحة قمت بعمل ملف مساعد لقاعدة البيانات التى أعمل عليها وهذا الملف له الامتداد chm. قمت بوضع قاعدة البيانات والملف المساعد فى مجلد وتلك المحتويات قمت بعمل (setup ) لها إذا قمت بتحديد مسار الملف المساعد على أنه مسار ثابت ففى تلك الحالة من الممكن ان لا يكون الملف موجود فى جهاز المستخدم فى المكان الذى حددته ----------------------------------------------------------------------- الملخص ===== إذا كان عندى قاعدة بيانات هى frozen.mdb وكان عندى ملف مساعدة هو help.chm فالذى أريده هو متغير يرجع مسار (help.chm) بالنسبة لقاعة البيانات (frozen.mdb) بحيث أن الملفين معا فى مجلد واحد فمهما نقلت المجلد من أى مكان على جهاز الكمبيوتر فبواسطة زر فى(frozen.mdb) قاعدة البيانات يتم فتح ملف (help.chm) ***************************************** معذرة أخوتى فى الله على هذا التطويل ولكن نظرا لاهمية الموضوع بالنسبة لى أرجو أن تسامحونىوأرجو من الله عز وجل ان يتسع صدركم للاجابة ولكن نظرا لاهمية الموضوع بالنسبة لى فاردت ان يكون الموضوع واضح من كل الجوانب أتمنى من الله عز وجل أن يوفقنى للاجابة عن طريقكم والسلام عليكم ورحمة الله وبركاته 1
abohajr قام بنشر أكتوبر 3, 2003 قام بنشر أكتوبر 3, 2003 أخي الكريم السلام عليكم وبعد إذا قمت بكتابة اسم الملف في متغير ملف التعليمات الموجود في خصائص النموذج فإن أكسس سوف يتعرف عليه على أنه موجود في نفس مسار القاعدة ليست هذه هي المشكلة بل المشكلة هي أن أكسس لا يستطيع التعرف على ملفات المساعدة من النوع chm ومثله في ذلك مثل الفيجوال بيسك والنوع الوحيد الذي يستطيعان التعرف عليه حسب علمي هي ملفات المساعدة ذات الامتداد hlp تحياتي
frozen قام بنشر أكتوبر 3, 2003 الكاتب قام بنشر أكتوبر 3, 2003 السلام عليكم ورحمة الله وبركاته =================== أخى الكريم (abohajr) جزاك الله خيرا كثيرا على إهتمامك وجعله اللـــه فى ميزان حسناتك :yess:
محمد طاهر عرفه قام بنشر أكتوبر 5, 2003 قام بنشر أكتوبر 5, 2003 للتعرف علي المجلد الذي به القاعدة يمكنك استخدام الكود التالي Function GetPath(Name As String) As String Dim i As Integer, pathtemp As String i = 1 Do While i < Len(Name) pathtemp = "" Do While Mid(Name, i, 1) <> "\" And i <= Len(Name) pathtemp = pathtemp & Mid(Name, i, 1) i = i + 1 Loop If Mid(Name, i, 1) = "\" Then GetPath = GetPath & pathtemp & "\" i = i + 1 End If Loop End Function و لاستدعاؤه فى رسالة مثلا من الكود الخاص بالنقر علي زر : Private Sub Command3_Click() MsgBox GetPath(CurrentDb.Name) End Sub
frozen قام بنشر أكتوبر 5, 2003 الكاتب قام بنشر أكتوبر 5, 2003 جزاك اللــه خيرا أستاذى محمــد طاهر على اهتمامكم وجزى اللــه خيرا كل من شارك فى الرد على السؤال وفقكم الله لما يحبه ويرضاه ============================
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.