ورود

View Full Version : کپی structural Only جدول لینک شده



hamid-nice
پنج شنبه 23 آبان 1392, 19:24 عصر
با سلام
با دستور زیر می توان کپی Structrual Only از یک جدول Local را ایجاد کرد اما در Office 2010 نمی توان از یک جدول لینک شده کپی بدون اطلاعات (Structrual Only ) را ایجاد کرد
strPath = "C:\database.accdb"
DoCmd.TransferDatabase acImport, "Microsoft Access", strPath, acTable, "table1", "copy of table1",true

با چه کدی میشه اینکار را انجام داد ؟
با تشکر

hamid-nice
دوشنبه 27 آبان 1392, 11:03 صبح
با سلام
اهمیت این مساله در صورت نیاز بسیار مهم است زیرا کپی جداول لینک شده حاوی اطلاعات مخصوصا وقتی که تعداد جداول زیاد باشد چشمگیر می شود لذا راه حل زیر برای جداول لینک شده حتی پسورد دار بسیار مطلوب خواهد بود

p = "password"
strPath = "address of back end File"
Dim dbs As DAO.Database
Set dbs = DAO.OpenDatabase(strPath, False, False, ";pwd=" & p)
DoCmd.TransferDatabase acImport, "Microsoft Access", strPath, acTable, "table1", "copy of table1", True
dbs.Close
Set dbs = Nothing

موفق باشید