กระทู้เก่าบอร์ด อ.Yeadram
1,304 3
URL.หัวข้อ /
URL
เชื่อมต่อฐานข้อมูลที่ติดรหัสผ่าน
DoCmd.TransferDatabase acLink, "Microsoft Access", DBName, acTable, "custom", "custom"
ต้องต่อท้ายคำของรหัสอย่างไรหรือครับ
หาในนี้แล้วยังไม่เจอ
ต้องต่อท้ายคำของรหัสอย่างไรหรือครับ
หาในนี้แล้วยังไม่เจอ
3 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R13443
ทดลองทำตามแล้ว
แต่ไม่ได้ผลยังเชื่อมต่อไม่ได้
Function DataLink()
Dim DBName As String
DBName = DLookup("BackEnd", "data")
Set dbs = DBEngine.Workspaces(0).OpenDatabase("DBName", False, False, ";pwd=1234")
DoCmd.TransferDatabase acLink, "Microsoft Access", DBName, acTable, "custom", "custom", False, True
มันผิดตรงใหนมั่งครับ
แต่ไม่ได้ผลยังเชื่อมต่อไม่ได้
Function DataLink()
Dim DBName As String
DBName = DLookup("BackEnd", "data")
Set dbs = DBEngine.Workspaces(0).OpenDatabase("DBName", False, False, ";pwd=1234")
DoCmd.TransferDatabase acLink, "Microsoft Access", DBName, acTable, "custom", "custom", False, True
มันผิดตรงใหนมั่งครับ
3 @R13449
DBName เป็นตัวแปร อย่าไปใส่ ดับเบิลโควตให้มันครับ
Time: 0.3278s
จริงๆ ถ้าค้นดีๆ จะเจอเยอะกว่านี้ครับ
http://www.thai-access.com/yeadram_view.php?topic_id=1334