مشاكل بعد تحويل (تكبير)قاعدة البيانات من اكسس 2003 الى اس كيو ال سيرفر2008

Dim BackObj As TableDef, BackDB As Database
Set BackDB = DBEngine.Workspaces(0).OpenDatabase(strPath, False, False, ";PWD=" & strPwd)
For Each BackObj In BackDB.TableDefs
   Left(BackObj.name, 4) <> "MSys 
Then
DoCmd.TransferDatabase acLink, "Microsoft Access", strPath, acTable, BackObj.name, BackObj.name
End If
Next BackObj
Set FrontDB = Nothing
Set BackDB = Nothing

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

هذا الكود يعمل بشكل ممتاز للربط البرتامج ( اكسيس ) بالجدوال 

ولكن تحويل (تكبير)قاعدة البيانات من اكسس 2003 الى اس كيو ال سيرفر2008 بنجاح لايعمل 

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