• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Lỗi khi dùng CSDL qua Link Table

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Hỏi] Lỗi khi dùng CSDL qua Link Table
• Lỗi khi dùng CSDL qua Link Table

• Lỗi khi dùng CSDL qua Link Table

  xndt > 27-09-16, 04:22 PM

  Tôi có đoạn code sau:
  Private Sub MaHS_AfterUpdate()
     Dim A01 As Recordset
      Set A01 = CurrentDb.OpenRecordset("T11HoSo", dbOpenTable)
      A01.Index = "PrimaryKey": A01.Seek "=", MaHS
      If A01.NoMatch Then
          MsgBox "MaHS này không tồn tại, xin kiểm tra lại !", vbInformation + vbDefaultButton1, "Chú ý"
          DoCmd.RunCommand acCmdUndo
      End If
      A01.Close
      If MaHS <> "" Then
          MaPAKD = "PAKD" & Right(MaHS, 4) & "." & Currec
      End If
  End Sub
  Khi chạy với CSDL trực tiếp thì ok, nhưng khi chạy với CSDL qua Link Table (dùng trong mạng lan) thì báo lỗi dòng này Set A01 = CurrentDb.OpenRecordset("T11HoSo", dbOpenTable), Gips tôi với!

• RE: Lỗi khi dùng CSDL qua Link Table

  ongke0711 > 27-09-16, 04:48 PM

  Bạn đổi dbOpenTable -> dbOpenDynaset

• RE: Lỗi khi dùng CSDL qua Link Table

  xndt > 27-09-16, 04:56 PM

  (27-09-16, 04:48 PM)ongke0711 Đã viết: Bạn đổi dbOpenTable -> dbOpenDynaset

  Đã được rồi nhưng nó tiếp tục báo lỗi dòng A01.Index = "PrimaryKey" bác ơi, giúp tôi với?

• RE: Lỗi khi dùng CSDL qua Link Table

  xndt > 27-09-16, 05:30 PM

  Không bác nào giúp với, tôi cần quá!

• RE: Lỗi khi dùng CSDL qua Link Table

  ongke0711 > 27-09-16, 07:30 PM

  Khi bạn đổi qua dùng linked table thì một số phương thức dùng cho local table sẽ không còn chạy được.
  Cách chuyển:
  - Khai báo Dim db As DAO.Databse; rs As DAO.Recordset
  - Phương thức SEEK cũng không xài được nên cái INDEX cũng báo lỗi luôn. Thay SEEK thành FINDFIRST.
   
  ----------------------
      Dim A01 As DAO.Recordset
      Set A01 = CurrentDb.OpenRecordset("T11HoSo", dbOpenDynaset)
      A01.FindFirst "MaHS = " & Me.cboMaHS
      If A01.NoMatch.....
  -----------------------
  MaHS là Primary key
  cboMaHS là cái combobox (hay textbox) mà bạn nhập mã HS. Nếu MaHS kiểu TEXT thì phải bỏ nó vào giữa 2 dấu nháy đơn. 
  VD: A01.FindFirst "MaHS = '" & Me.cboMaHS & "'"

• RE: Lỗi khi dùng CSDL qua Link Table

  xndt > 28-09-16, 08:22 AM

  (27-09-16, 07:30 PM)ongke0711 Đã viết: Khi bạn đổi qua dùng linked table thì một số phương thức dùng cho local table sẽ không còn chạy được.
  Cách chuyển:
  - Khai báo Dim db As DAO.Databse; rs As DAO.Recordset
  - Phương thức SEEK cũng không xài được nên cái INDEX cũng báo lỗi luôn. Thay SEEK thành FINDFIRST.
   
  ----------------------
      Dim A01 As DAO.Recordset
      Set A01 = CurrentDb.OpenRecordset("T11HoSo", dbOpenDynaset)
      A01.FindFirst "MaHS = " & Me.cboMaHS
      If A01.NoMatch.....
  -----------------------
  MaHS là Primary key
  cboMaHS là cái combobox (hay textbox) mà bạn nhập mã HS. Nếu MaHS kiểu TEXT thì phải bỏ nó vào giữa 2 dấu nháy đơn. 
  VD: A01.FindFirst "MaHS = '" & Me.cboMaHS & "'"

  Cám ơn bạn ongke0711 rất nhiều, nhờ có bạn tôi đã giải quyết được vấn đề.
• Bài trước Bài tiếp