فروم تخصصی - پشتیبانی CPSD - به دست آوردن اسامی آبجکت های دیتابیس

ضمن سلام

ممکن است این نیاز پیش بیاید که بخواهید به لیستی از آبجکتهای موجود در یک فایل اکسس دست پیدا کنید
اسامی آبجکت های موجود در یک فایل اکسس در داخل یکی از جدوال سیستمی با نام MsysObjects نگهداری و ثبت و ضبط میشود
بر همین اساس و با تکیه بر عبارات زیر اقدام به برگرداندن لیست تفکیکی اسامی آیجکتها نمایید
جهت انجام این امر SQL statement مربوطه را در مد SQL View و در داخل یک پرس و جوی خام کپی نمایید , با اجرای پرس و جو شاهد لیست آبجکتهای موجود خواهید بود

Tables

کد: 

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>"~") AND 

(Left$([Name],4) <> "Msys") AND (MSysObjects.Type)=1 ORDER BY MSysObjects.Name;

Queries

کد: 

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>"~") AND 

(MSysObjects.Type)=5 ORDER BY MSysObjects.Name;

Forms

کد: 

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>"~") AND 

(MSysObjects.Type)=-32768 ORDER BY MSysObjects.Name;

Reports

کد: 

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>"~") AND 

(MSysObjects.Type)= -32764 ORDER BY MSysObjects.Name;

Modules

کد: 

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>"~") AND 

(MSysObjects.Type)= -32761 ORDER BY MSysObjects.Name;

Macros

کد: 

SELECT MSysObjects.Name FROM MsysObjects WHERE (Left$([Name],1)<>"~") AND 

(MSysObjects.Type)= -32766 ORDER BY MSysObjects.Name;

فروم تخصصی - پشتیبانی CPSD

CPSD Admin