• Tự động liên kết các table
  • Tự động liên kết các table

    Noname > 13-08-10, 10:07 PM

    Hỏi: Tôi có một cơ sở dữ liệu Access và thực hiện split thành backend

    File QLVB đặt trong thư mục Run (thư mục Run nằm trong thư mục QLVB) chứa form, repost, ...
    File QLVB_en đặt trong thư mục Data (thư mục Data trong thư mục QLVB) chứa các table


    Khi tôi di chuyển (hoặc đồng bộ) thư mục QLVB (từ USB vào máy và ngược lại) là các liên kết của các table không còn nữa.
    Bạn nào rành về Access có thể viết đoạn mã giúp tôi tự động nối lại các liên kết đó không.


    Đáp:


    Với T là tên table, Bạn cho gọi đoạn code sau để link. Có bao nhiêu table thì bạn gọi bấy nhiêu lần với tên table T tương ứng.
    Code:

    Mã:
    Sub LinkTable(T As String)
    ' xoa table link cu~
    DoCmd.DeleteObject acTable, T
    'link lai tablelink moi
    DoCmd.TransferDatabase acLink, "Microsoft Access", CurrentProject.Path & "\" & "QLVB_en.mdb", acTable, T, T
    End Sub
    .

    Chú ý, đọan code này chỉ áp dụng trong trường hợp file chương trình và dữ liệu bạn chung 1 thư mục. Còn khác thư mục thì mình sẽ đưa giải pháp khác. Ví dụ bạn phải khai báo thư mục chứa dữ liệu.
  • RE: Tự động liên kết các table

    mrtoanbin > 30-10-18, 02:15 PM

    Mình đang cần kiểu khai báo thư mục chứa dữ liệu, sẽ linh hoạt hơn khi di chuyển từ chỗ này sang chỗ khác
  • RE: Tự động liên kết các table

    maidinhdan > 03-11-18, 02:44 PM

    (30-10-18, 02:15 PM)mrtoanbin Đã viết: Mình đang cần kiểu khai báo thư mục chứa dữ liệu, sẽ linh hoạt hơn khi di chuyển từ chỗ này sang chỗ khác

    Bạn đang dùng code nào không nói rõ nếu dùng code trên thì thêm tham số sau
    Mã PHP:
    Sub LinkTable(As StringDuongDanFileData as string)
     
    ' xoa table link cu~
    DoCmd.DeleteObject acTable, T
    '
    link lai tablelink moi
    DoCmd
    .TransferDatabase acLink"Microsoft Access"DuongDanFileDataacTableTT
    End Sub 
  • RE: Tự động liên kết các table

    mrtoanbin > 25-02-19, 02:13 PM

    (03-11-18, 02:44 PM)maidinhdan Đã viết:
    (30-10-18, 02:15 PM)mrtoanbin Đã viết: Mình đang cần kiểu khai báo thư mục chứa dữ liệu, sẽ linh hoạt hơn khi di chuyển từ chỗ này sang chỗ khác

    Bạn đang dùng code nào không nói rõ nếu dùng code trên thì thêm tham số sau
    Mã PHP:
    Sub LinkTable(As StringDuongDanFileData as string)
    ' xoa table link cu~
    DoCmd.DeleteObject acTable, T
    '
    link lai tablelink moi
    DoCmd
    .TransferDatabase acLink"Microsoft Access"DuongDanFileDataacTableTT
    End Sub 

    Hiện mình chưa dùng code nào cả, chỉ mới có ý tưởng thế nhưng chưa làm được. File chứa dữ liệu mình sử dụng mỗi máy một đường dẫn khác nên cần có nút chọn đường dẫn và relink lại (file data có pass). BÁC CỤ THỂ DÙM Ạ!!
  • RE: Tự động liên kết các table

    ongke0711 > 25-02-19, 04:41 PM

    (25-02-19, 02:13 PM)mrtoanbin Đã viết: Hiện mình chưa dùng code nào cả, chỉ mới có ý tưởng thế nhưng chưa làm được. File chứa dữ liệu mình sử dụng mỗi máy một đường dẫn khác nên cần có nút chọn đường dẫn và relink lại (file data có pass). BÁC CỤ THỂ DÙM Ạ!!

    Chia sẻ bạn cái demo kiểm tra đường dẫn file data backend, nếu bị thay đổi sẽ hiện hộp thoại để chọn lại.

    link: http://www.mediafire.com/file/ufn34x59h5...d.rar/file

    [Hình: 33330401168_4b5faec3a4_z.jpg]
  • RE: Tự động liên kết các table

    mrtoanbin > 28-02-19, 02:01 PM

    (25-02-19, 04:41 PM)ongke0711 Đã viết:
    (25-02-19, 02:13 PM)mrtoanbin Đã viết: Hiện mình chưa dùng code nào cả, chỉ mới có ý tưởng thế nhưng chưa làm được. File chứa dữ liệu mình sử dụng mỗi máy một đường dẫn khác nên cần có nút chọn đường dẫn và relink lại (file data có pass). BÁC CỤ THỂ DÙM Ạ!!

    Chia sẻ bạn cái demo kiểm tra đường dẫn file data backend, nếu bị thay đổi sẽ hiện hộp thoại để chọn lại.

    link: http://www.mediafire.com/file/ufn34x59h5...d.rar/file

    [Hình: 33330401168_4b5faec3a4_z.jpg]

    Cái này không tùy thuộc vào Data Backend có pass hay không phải k ạ? Nếu nhiều linktable ở nhiều file Backend thì khai báo sao ạ?