เปิดฐานข้อมูลใหม่จากฐานข้อมูลเดิมในโหมด Run-time

สืบเนื่องมาจากมีคำถามไว้ที่ http://www.utteraccess.com/forum/OpenCurrentDatabase-retu-t1943718.html ว่าโค้ดที่เขาใช้มีปัญหาถ้าแปลงไฟล์ให้เป็น Run-time (accdr) ผมเลยลองทำดู พบว่ามีเทคนิคตรงที่ ต้องสร้าง code ไว้ใน module ก่อน แล้วถึงจะเรียกใช้โค้ดนั้นในปุ่มของฟอร์มเป้าหมาย

โค้ดใน module ชื่อ modOpenAnotherDB

Option Compare Database
Option Explicit

Dim Nacc As Access.Application

Sub subOpenAnotherDB()

Set Nacc = _
CreateObject("Access.Application")

Nacc.OpenCurrentDatabase CurrentProject.Path & "\Test.accdb", False, "MyPassword"
Nacc.Visible = True

End Sub

ในฟอร์มชื่อ frmOpenAnotherDB ผมสร้างปุ่มชื่อ cmdOpenAnotherDB แล้วใช้โค้ด OnClick ดังแสดงข้างล่าง

Private Sub cmdOpenAnotherDB_Click()

Call subOpenAnotherDB

End Sub

ลองดูวิดีโอแสดงการทำงานของโค้ดได้ที่ http://www.youtube.com/watch?v=rAKTInuoBCw ครับ

ศึกษาการใช้คำสั่ง OpenCurrentDatabase Method ได้ที่ http://msdn.microsoft.com/en-us/library/bb238012.aspx ครับ

Anchoring Tool: Optimized feature in Access 2010

ตั้งแต่เวอร์ชัน 2007 เป็นต้นมา จะมีความสามารถใหม่เรียกว่า Anchoring Tool มาให้ เพื่อแก้ปัญหาในการแสดงผลของ Forms ที่มักจะเกิดในเครื่องคอมฯ ที่มีการตั้งความละเอียดของจอขนาดต่างๆ กัน ช่วยให้เราสามารถออกแบบ Forms ได้ดียิ่งขึ้น และใช้พื้นที่หน้าจอไดัเต็มที่

ในเวอร์ชัน 2010 ที่จะเปิดตัวในราวเดือน พ.ค. 53 นี้จะปรับปรุงให้ทำงานได้ดีกว่าเดิมมาก เช่น สามารถเพิ่มคอลัมน์ได้ รวมแถวหรือคอลัมน์เข้าด้วยกันได้ บางครั้งต้องใช้ Header/Footer ของ Forms ช่วย เพื่อให้การใช้งานของส่วน Detail ของ Forms ทำได้ดียิ่งขึ้น

ของดูตัวอย่างที่ผมทำเป็นภาพเคลื่อนไหวไว้ใน YouTube ดูครับ