السلام عليكم
مبروك عليكم وعلينا االهيئة الجديدة للمنتدى وكل عام وانتم بخير
في المثال المرفق قاعدتين اريد التعديل على الكود الموجود في القاعدة (اظهار) لكي يتم اظهار الجدول الموجود في القاعدة (db1)
جزاكم الله خيرا ،،
أخي الكريم
اليك التعديل
Dim wrkSpace As Workspace Dim tdf As TableDef Dim dbs As Database Set wrkSpace = DBEngine.Workspaces(0) Set dbs = wrkSpace.OpenDatabase(txtDbName)
وافر التحيه ،،،
مشكوررررر ولكن ماضبطت معي
لو تكرمت وارفقت مثالي الذي اجريت عليه التعديل .
للرفع
للرفع