اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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


frozen

الردود الموصى بها

السلام عليكم ورحمة الله وبركاته

====================

أساتذتى الكرام , أخوانى فى الله

أسال الله المساعدة فى الاجابة على سؤال لم اجد له حلا فترة كبيرة من الزمن

ولقد اتخذت المتاح لى من الاسباب لاتمكن من الوصول الى اجابة ولكن الله لم يأذن حتى تلك اللحظة

فهلا وجدت عندكم الاجابة

----------------------------------------------------------------------

السؤال هو :-

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

.....................................................................

وحتى تكون الصورة واضحة

قمت بعمل ملف مساعد لقاعدة البيانات التى أعمل عليها

وهذا الملف له الامتداد chm.

قمت بوضع قاعدة البيانات والملف المساعد فى مجلد وتلك المحتويات قمت بعمل (setup ) لها

إذا قمت بتحديد مسار الملف المساعد على أنه مسار ثابت

ففى تلك الحالة من الممكن ان لا يكون الملف موجود فى جهاز المستخدم فى المكان الذى حددته

-----------------------------------------------------------------------

الملخص

=====

إذا كان عندى قاعدة بيانات هى frozen.mdb

وكان عندى ملف مساعدة هو help.chm

فالذى أريده هو متغير يرجع مسار (help.chm)

بالنسبة لقاعة البيانات (frozen.mdb)

بحيث أن الملفين معا فى مجلد واحد فمهما نقلت المجلد من أى مكان على جهاز الكمبيوتر فبواسطة زر فى(frozen.mdb) قاعدة البيانات يتم فتح ملف (help.chm)

*****************************************

معذرة أخوتى فى الله على هذا التطويل ولكن نظرا لاهمية الموضوع بالنسبة لى أرجو أن تسامحونىوأرجو من الله عز وجل ان يتسع صدركم للاجابة

ولكن نظرا لاهمية الموضوع بالنسبة لى فاردت ان يكون الموضوع واضح من كل الجوانب

أتمنى من الله عز وجل أن يوفقنى للاجابة عن طريقكم

والسلام عليكم ورحمة الله وبركاته

  • Thanks 1
رابط هذا التعليق
شارك

أخي الكريم

السلام عليكم وبعد

إذا قمت بكتابة اسم الملف في متغير ملف التعليمات الموجود في خصائص النموذج فإن أكسس سوف يتعرف عليه على أنه موجود في نفس مسار القاعدة

ليست هذه هي المشكلة بل المشكلة هي أن أكسس لا يستطيع التعرف على ملفات المساعدة من النوع chm ومثله في ذلك مثل الفيجوال بيسك والنوع الوحيد الذي يستطيعان التعرف عليه حسب علمي هي ملفات المساعدة ذات الامتداد hlp

تحياتي

رابط هذا التعليق
شارك

للتعرف علي المجلد الذي به القاعدة

يمكنك استخدام الكود التالي

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

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information