الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال فني ... ؟؟

بدأه sahob في 16 يونيو 2011 · 1 رد · 601 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

عندي برنامج mde يتعذر علي حالياً الإتصال بصاحبه و كان يعمل بشكل جيد على ويندوز xp و هذا الملف يستخدم برنامج ActiveSyc 4.5 و على ما اعتقد ملف rapi.dll ...

لكن الآن بعد انتقالي لويندوز 7 اصبحت بعض اجزاء البرنامج لا تعمل و حتى وظائف عادية مثل Left و Right و اعتقد بسبب ان Refrence التابع لـ ActiveSyc 4.5 ياتي قبل بقية الـ Refrence

و المشكلة ان ActiveSyc 4.5 غير مدعوم في وندوز 7 فحاولت تركيب ActiveSyc 6.1 و لكن المشكلة ما زالت :mellow:

فهل هناك طريقة لإزالة Refrence من ملف mde ام تقترحون حل آخر ؟؟؟ :unsure:

#2

للاسف لن يمكنك التعديل فى مراجع الملف اذا كان mde

عموما هذا الكود تعطيك المراجع التالفة 

Sub ListBrokenReferences()
    Dim loRef As Access.Reference
    Dim intCount As Integer
    Dim intX As Integer
    Dim blnBroke As Boolean

    Dim appAccess As Access.Application
Set appAccess = New Access.Application
appAccess.OpenCurrentDatabase (CurrentProject.Path & "\db.mdb")

    On Error Resume Next
    intCount = appAccess.References.Count
    For intX = intCount To 1 Step -1
      Set loRef = appAccess.References(intX)
      With loRef
        blnBroke = .IsBroken
        If blnBroke = True Or Err <> 0 Then
          MsgBox .name
        End If
       End With
    Next

  Set loRef = Nothing

End Sub

لا تنسى تغيير مسار قاعدة البيانات

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

مواضيع مشابهة