Tùy chọn
Tùy chọn liên kết lại các table từ file data có password
- Tùy chọn liên kết lại các table từ file data có password
-
RE: Tùy chọn liên kết lại các table từ file data có password
hugox03 > 13-02-14, 11:32 PM
mình mới học Access !
Các bạn chỉ mình cách đặc pass file access (.mdb)
-
RE: Tùy chọn liên kết lại các table từ file data có password
hugox03 > 15-02-14, 01:36 AM
Nghiên cứu ra rồi !
-
RE: Tùy chọn liên kết lại các table từ file data có password
mrsiro > 09-12-14, 03:16 PM
Bị báo lỗi ở dòng này bạn ơi :
con = DLookup("[Connect]", "MSysObjects", "[name]='" & T & "'")
Mình có kiểm tra lại là mặc dù báo lỗi nhưng vẫn link thành công, table mới vẫn dc cập nhật nhưng báo lỗi: run time error "904", invalid use of null.
Đã thử tạo một file mdb mới rồi import toàn bộ của file cũ vào thì chạy không báo lỗi nữa, nhưng vấn đề ở chỗ là custom menu bar tự tạo thì ko import qua được, giờ làm lại cái menu bar chắc cũng tèo luôn.
Vậy vấn đề ở đây là do bị gì vậy bạn noname -
RE: Tùy chọn liên kết lại các table từ file data có password
thiennamlong > 03-05-15, 10:30 AM
Tôi cũng gặp lỗi này:
run-time error 94
invalid use of Null
và báo lỗi ở dòng:
con = DLookup("[Connect]", "MSysObjects", "[name]='" & T & "'")
Sao không có hướng dẫn nào khắc phục vậy các tiền bối?: 021: -
RE: Tùy chọn liên kết lại các table từ file data có password
maidinhdan > 03-05-15, 05:37 PM
(03-05-15, 10:30 AM)thiennamlong Đã viết: Tôi cũng gặp lỗi này:
run-time error 94
invalid use of Null
và báo lỗi ở dòng:
con = DLookup("[Connect]", "MSysObjects", "[name]='" & T & "'")
Sao không có hướng dẫn nào khắc phục vậy các tiền bối?: 021:
Tôi đã test và sử dụng không hề phát sinh lỗi nào khác, có 2 vấn đề bạn cần làm
Lấn đầu tiên: Bạn phải link bằng tay + điền Pass bằng tay.
Kể từ lần sau: Bạn link bằng nút command ( lưu ý rằng chúng ta cần phải link đúng đường dẫn file data có pass)
Bạn tham khảo thêm demo này của mình: Demo Liên kết Data có Pass qua LAN
Ghi chú: nhấn đè phím shift khi mở.
Thân ái. -
RE: Tùy chọn liên kết lại các table từ file data có password
thiennamlong > 04-05-15, 11:15 AM
Cảm ơn bạn maidinhdan đã phản hồi. Tôi cũng đã khắc phục được lỗi bằng cách sau: khi refresh link báo lỗi thì xóa hết các link liên kết Tables đi. Mở lại file vào form nhắp nút Relink nó sẽ báo là Relink file thành công. Sau đó mới link lại các tables bằng tay là OK. -
RE: Tùy chọn liên kết lại các table từ file data có password
thiennamlong > 10-05-15, 12:11 PM
(03-05-15, 05:37 PM)maidinhdan Đã viết: Lấn đầu tiên: Bạn phải link bằng tay + điền Pass bằng tay.
Tôi có một lượng tables phải link khá nhiều mỗi lần cập nhật mới cứ phải xóa bằng tay từng cái một hơi bất tiện.
Kể từ lần sau: Bạn link bằng nút command ( lưu ý rằng chúng ta cần phải link đúng đường dẫn file data có pass)
Thân ái.
Đề nghị bác Nomane hay tiền bối cho thêm nút xóa linhk (Code) khi phải cập nhật bằng tay.
Thanks! -
RE: Tùy chọn liên kết lại các table từ file data có password
maidinhdan > 10-05-15, 11:12 PM
(10-05-15, 12:11 PM)thiennamlong Đã viết: Tôi có một lượng tables phải link khá nhiều mỗi lần cập nhật mới cứ phải xóa bằng tay từng cái một hơi bất tiện.
Đề nghị bác Nomane hay tiền bối cho thêm nút xóa linhk (Code) khi phải cập nhật bằng tay.
Thanks!
Demo trên mình gửi không hề nói là phải link từng cái nhé.
Lần đầu link bằng tay chọn All table ( điền pass 1 lần nếu có), Kề từ đó về sau chỉ cần link bằng code, cũng chẳng cần xóa table củ đi, nó tự động đè lên table trước đó, với đường dẫn mới mà bạn chọn.
Còn bạn muốn xóa link table thì xem phần dưới đây:
Riêng việc xóa nhiều link table chỉ cần lệnh này là đủ.
Tạo hàm xóa table:
Mã PHP:Sub DelTable(T As String)
Docmd.DeleteObject acTable, T
End Sub
* Sau đó Tạo 1 nút gọi là xóa link table, sau đó chép code sau:
Mã PHP:DelTable "tbl_1"
DelTable "tbl_2"
DelTable "tbl_n"
Với tbl_1 là tên table...Có bao nhiêu table liệt hết vào nút lệnh là xong
Thân mến. -
RE: Tùy chọn liên kết lại các table từ file data có password
thiennamlong > 11-05-15, 09:01 AM
(10-05-15, 11:12 PM)maidinhdan Đã viết: Còn bạn muốn xóa link table thì xem phần dưới đây:
Tôi có một file nó bị lỗi phát sinh ra cả ngàn link liên kết tables muốn xóa bằng một code ngắn gọn vì không thể liệt kê hết tên từng table.
Riêng việc xóa nhiều link table chỉ cần lệnh này là đủ.
Tạo hàm xóa table:
Mã PHP:Sub DelTable(T As String)
Docmd.DeleteObject acTable, T
End Sub
* Sau đó Tạo 1 nút gọi là xóa link table, sau đó chép code sau:
Mã PHP:DelTable "tbl_1"
DelTable "tbl_2"
DelTable "tbl_n"
Với tbl_1 là tên table...Có bao nhiêu table liệt hết vào nút lệnh là xong
Tôi đã phải lựa chọn là Export hết các phần tử sang file mới, xóa file cũ đi. Nếu có code xóa hết link thì tốt quá không phải làm như vậy vừa nhanh nữa. Tôi không rành về VBA không biết có Code như vậy không nhờ tiền bối chỉ dùm.
Thanks! -
RE: Tùy chọn liên kết lại các table từ file data có password
maidinhdan > 11-05-15, 10:59 AM
(11-05-15, 09:01 AM)thiennamlong Đã viết: Tôi có một file nó bị lỗi phát sinh ra cả ngàn link liên kết tables muốn xóa bằng một code ngắn gọn vì không thể liệt kê hết tên từng table.
Tôi đã phải lựa chọn là Export hết các phần tử sang file mới, xóa file cũ đi. Nếu có code xóa hết link thì tốt quá không phải làm như vậy vừa nhanh nữa. Tôi không rành về VBA không biết có Code như vậy không nhờ tiền bối chỉ dùm.
Thanks!
Làm ứng dụng gì mà đến 1000 link table, ghê thế bạn. Cái này chắc ra thêm 1000 query , 1000 form quá.
Nhưng cũng xin gửi bạn 1 code, tạo 1 nút command tạm đặt tên là cmdxoatable, rồi dán code này vào
Mã PHP:Private Sub cmdxoatable_Click()
Dim r As Recordset
Dim s As String
s = "SELECT ForeignName FROM MSysObjects WHERE ForeignName Is Not Null"
Set r = CurrentDb.OpenRecordset(s)
If r.RecordCount > 0 Then
r.MoveFirst
Do Until r.EOF
DoCmd.DeleteObject acTable, r!ForeignName
r.MoveNext
Loop
End If
r.Close
Set r = Nothing
End Sub
Đã test thành công, chỉ cần nhấn là ban xác 1000 table link của bạn.
Thân ái!