کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

به اشتراک گذاری اطلاعات کسب شده در اکسس از سایت آفیس و سایت های تخصصی خارجی
کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

به اشتراک گذاری اطلاعات کسب شده در اکسس از سایت آفیس و سایت های تخصصی خارجی

تغییر سورس جدول لینکی



Set tdef = New DAO.TableDef

tdef.Name = strLinkedTableName

tdef.Connect = strConnect

tdef.SourceTableName = strSourceTableName

ساخت شی TabelDef ( جدول در اکسس )

ایجاد شی در حافظه ی موقت 

Set tdfRoyalties= dbsCurrent.CreateTableDef("Royalties")

ایجاد کانکشن

=tdfRoyalties.Connect 

" ODBC;DATABASE=pubs;DSN=Publishers"

تنظیم منبع شی ایجادشده 

" tdfRoyalties.SourceTableName ="roysched

اضافه کردن جدول از دیتابیس دیگربه دیتابیس جاری

dbsCurrent.TableDefs.Append tdfRoyalties

خالی کردن از حافظه ی موقت

Set tdfRoyalties=Nothing






مثال دیگر دیتابیس اکسس با پسورد


  & tblDef.Connect = "MS Access;DATABASE=" &  RemoteDbName

 "PWD=YourPassword"


cnX = "ODBC;DRIVER=SQL Server;SERVER=" & vServer   & ";DATABASE=" & vDatabase & ";UID=" & vUserName

 PWD=" & vPassword;" & 


CurrentDb.CreateTableDef(vLocalTable,dbAttachSavePWD, vRemoteTable, cnX



TableDef 

Attributes