วิธีที่ 1: ใช้เมธอด createTeabledef
เมธอด createTeabledef สร้างตารางลิงค์ ในการใช้วิธีนี้ให้สร้างโมดูลใหม่จากนั้นเพิ่มฟังก์ชั่น tatchdsnlestable ต่อไปนี้ลงในโมดูลใหม่
การคัดลอกรหัสมีดังนี้:
'// ชื่อ: tettiondsnlesstable
'// วัตถุประสงค์: CreateAlinkedTableTosqlServerWithOutUsingAdsn
'// พารามิเตอร์
'// stlocaltablename: ชื่อของ thetablethatyourecreeating inthecurrentDatabase
'// stremotetablename: ชื่อของ thetable ที่คุณกำลังเชื่อมโยง toon ฐานข้อมูลเซิร์ฟเวอร์ SQL
'// stserver: ชื่อของเซิร์ฟเวอร์ SQL ที่ youarelinking to
'// stdatabase: ชื่อของฐานข้อมูล SQL Server ที่คุณกำลังเชื่อมโยงไปยัง
'// stusername: ชื่อของผู้ใช้ SQL Server ที่เชื่อมต่อกับ SQL Server, LaveBlank TouseAtrustEdConnection
'// stpassword: sqlserveruserpassword
FunctionAttachdSnlessTable (stlocaltablenameasstring, stremotetablenameasstring, stserverasstring, stdatabaseasstring, onotalstusernameasstring
ONERRORGOTOATTACHDSNlessTable_err
dimtdastabledef
dimstconnectasstring
foreachtDincurrentDb.tabledefs
iftd.name = stlocaltablenamethen
currentdb.tabledefs.deletestlocaltablename
endif
ต่อไป
iflen (stusername) = 0 แล้ว
'// USETTRUSTED AUTHENTICATIONIFSTUSERNAMEINTNONTSUPPLIED
STCONNECT = "ODBC; driver = sqlServer; Server =" & stserver & "; database =" & stdatabase & "trusted_connection = ใช่"
อื่น
'// คำเตือน: สิ่งนี้จะเก็บชื่อ USERNAME และ ThePassword ด้วยข้อมูล thelinkedTable