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

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

قام بنشر

مرحبا بكل الأعضاء في هذا الصرح العظيم، وأود ان اعبر عن شكري و امتناني لهذا المنتدى الرائع ❤️

لدي سؤال لو أمكن ان اسأله هنا، هل يوجد بديل لبرنامج الاكسس ويكون نفس الخصائص به، يعني يكون مشابه أكثر من ٩٥٪ من برنامج الاكسس، من حيث ادراج (الجداول و الاستعلام والنماذج و التقارير و الموديل و الوحدات النمطية) وبنفس الواجهات الرسمية GUI لإنشاء قاعدة بيانات متكاملة، اعتذر مرة أخرى اذا كان بغير الإمكان طرح هذا النوع من الأسئلة هنا🌹🌹

قام بنشر

استاذ @gavan من وجهة نظري كل البرامج تعتمد على تقسيم القاعدة . فأنت هنا بالاكسس يمكنك تقسيم القاعدة أماميه وبها  (الاستعلامات والنماذج و التقارير و الموديلات و الوحدات النمطية

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

  • Like 5
قام بنشر

مشكور اخي خليفة الغالي، 

هل يمكن ارسال فيديو توضيحي لتقسيم قاعدة البيانات بالطريقة الصحيحة؟ بحيث ان كل يوزر ياتي عندي انطيه ملف front end ويذهب و ويعمل عليه مباشرة دون إعادة ربط الجداول من جديد من جهازه، تحياتي يالغالي🌹🌹

قام بنشر

مشكور جدا اخي الغالي خليفة على التوضيح ❤️, حيث قمت بالتقسيم👍 ولكن 😱عندما نقلت النموذجين الى برنامجي  و عند الضغط على استعراض تظهر لي مشكلة🙏 كما في الصورة ادناه ,هل من تفسير  وشكرا للشرح الجيد تحياتي:signthankspin:

Err.png

قام بنشر

شكرا يالغالي لقد تمت و الحمد لله:yes: , ولكن لدي سؤال ان امكن ذلك:clapping: في البرنامج يوجد زر امر يعرض الصور المخزنة معه في الفولدر بطريقة بحث صغيرة , و بالكود ادناه , هل بالامكان تغير المسار بطريقة دون الدخول كل مرة الى اعدادات الفيجول , ولك مني اجمل سلام 

Dim x As String
x = Application.CurrentProject.Path & "\" & Me.TextConv & ".pdf"
Application.FollowHyperlink x
    

 

  • أفضل إجابة
قام بنشر
46 دقائق مضت, gavan said:

شكرا يالغالي لقد تمت و الحمد لله:yes: , ولكن لدي سؤال ان امكن ذلك:clapping: في البرنامج يوجد زر امر يعرض الصور المخزنة معه في الفولدر بطريقة بحث صغيرة , و بالكود ادناه , هل بالامكان تغير المسار بطريقة دون الدخول كل مرة الى اعدادات الفيجول , ولك مني اجمل سلام 

Dim x As String
x = Application.CurrentProject.Path & "\" & Me.TextConv & ".pdf"
Application.FollowHyperlink x
    

 

جرب هذا الكود في حدث عند النقر لاختيار ملف الـ PDF ، وسيتم ادراج مساره في مربع النص

Private Sub btnBrowse_Click()
    Dim fd As Object ' متغير لمربع الحوار
    Dim selectedFile As Variant ' متغير لتخزين المسار المحدد
    
    ' إنشاء مربع حوار لاختيار الملفات
    Set fd = Application.FileDialog(3) ' 3 يعني اختيار ملف
    
    ' عرض المربع الحوار وانتظار اختيار ملف
    If fd.Show = -1 Then
        ' استخراج المسار المحدد وتخزينه في selectedFile
        selectedFile = fd.SelectedItems(1)
        
        ' عرض المسار المحدد في مربع النص
        Me.TextConv.Value = selectedFile
    End If
    
    ' تحرير الموارد
    Set fd = Nothing
End Sub

وشرح الكود موجود داخله 🥰

  • Like 1
قام بنشر

صح اخي الغالي المثال كما قلته ب الضبط , وشكرا على التوضيح و الكود ,:signthankspin:

الان لدي (مجلد1 يحتوي على ال BackEnd وملفات PDF):clapping: ,عندما انشأنا ملف FrontEnd ونقلناه الى جهاز اخر في نفس الشبكة و سوينا اتصال بال backEnd يتصل بصورة طبيعية بالجداول👍 , ما اريد قوله هنا كيف اتصل بملفات ال PDE مع المجلد1:dance1:, يعني كما اتصنا بالجداول نتصل بالملفات المرفقة معه ايظا:yes: ,حسب الكود المرفق:power:  ارجوا ان اكون وفقت في ايصال المعلومة , ولا اكون ازعجتك بالشرح تحياتي يالغالي خليفة 

Dim x As String
x = Application.CurrentProject.Path & "\" & Me.TextConv & ".pdf"
Application.FollowHyperlink x
    

 

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