Lỗi khi link table giữa 2 file mdb
Binh > 20-01-11, 10:02 AM
Mình đã tạo một file mdb, bây giờ muốn share cho 1 người khác dùng chung, mình đã copy ra 1 file mdb mới (không có table) và link table với file source. Nhưng khi run thì bị lỗi OpenRecordset trong đoạn code sau:
Public Function suaCTVB(MaVB, MaNXL)
Dim Mautin As Recordset
Set Mautin = CurrentDb.OpenRecordset("QTXL", dbOpenTable)
If Not Mautin.EOF Then
Mautin.MoveFirst
Do Until Mautin.EOF
If (Mautin!ID_VB = MaVB And Mautin!MaNhan = MaNXL) Then
Mautin.Edit
Mautin!DXL = True
Mautin.Update
End If
Mautin.MoveNext
Loop
End If
Mautin.Close
End Function
Help me!
Thanks very much much!