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

giúp đở về code vba

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thủ thuật VBA
  • [Help] giúp đở về code vba
• giúp đở về code vba

• giúp đở về code vba

  http2 > 22-07-19, 05:19 PM

  em có 1 file quản lý bán hàng . khi em link tables hết tables ra 1 file mdb khác ( để tránh dữ liệu quá lớn ) thì khi em di chuyển qua máy khác hoặc thư mục khác thì nó báo lõi không tìm được file chứa tables trong khi em di chuyển luôn cả 2 file 1 lượt . và có một số lệnh em viết add dữ liệu vào table thì không thể add được . mà lệnh chỉ add được khi tables cùng trong 1 file . ( anh có cách nào giải quyết không ạ. 2 cái đó làm em đau đầu .)
  em ví dụ :
  Private Sub CmdSave_Click()
  On Error GoTo Err_CmdSave_Click
  Dim DB As Database
  Dim KH As Recordset
  
  Set DB = CurrentDb
  
  Set KH = DB.OpenRecordset("T_KHangLogin", dbOpenTable)
  KH.AddNew
  KH.Fields("ID") = ID
  KH.Update
  KH.Close
  Set DB = Nothing
  DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
  Me.Refresh
  
  Exit_CmdSave_Click:
  Exit Sub
  
  Err_CmdSave_Click:
  MsgBox Err.Description
  Resume Exit_CmdSave_Click
  End Sub
  
  2. về phần lưu anh trong table mà link động là thế này . em muốn tạo 1 forder rồi lưu ảnh em cần vào đó . và trong form khi em chọn 1 mặt hàng nào thì file ảnh đó sẽ hiện lên . để em giảm bớt phần lưu ảnh nhị phân vào file mdb vì vậy sẽ tăng dung lượng file . anh có hướng giải quyết không anh . em xin .

• RE: giúp đở về code vba

  ongke0711 > 23-07-19, 12:03 AM

  1. Việc tách Table (Split Database) ra thành file .mdb (.accdb) khác mục đích chính không phải là để tránh dữ liệu quá lớn mà là để phục vụ các mục tiêu sau:
  - Khai thác tính năng thiết kế đa người dùng của Access. Nhiều người có thể cùng truy cập, thao tác trên file dữ liệu Back end (chỉ chứa Table).
  - Dễ phát triển, nâng cấp ứng dụng Font End (giao tiếp với ngừoi dùng) mà không làm ảnh hưởng dữ liệu gốc, không làm gián đoạn quá trình sử dụng ứng dụng Access.
  - Thuận tiện cho viêc sao lưu dữ liệu.
  
  2. Khi phân phối ứng dụng cho máy khác, bạn chỉ cần copy cái file FE cho họ, còn file dữ liệu  BE thì lưu vào một máy nào đó tạm gọi là máy chủ trong mạng LAN và Share full để các máy con có thể kết nối tới file này.
  Ứng dụng từ máy con bắt buộc phải kết nối - Linked table lại với file dữ liệu vì đã có sự thay đổi đường dẫn. Click phải chuột vào một linked table nào đó -> chọn Linked table manager -> Select All -> OK -> sẽ chọn đường dẫn tới file dữ liệu ở máy chủ.
  
  3. Đối với Linked table, không thể dùng "dbOpenTable" --> phải đổi qua "dbOpenDynaset" và phải khai báo dùng thư viện DAO 3.6 (khai báo trong Reference)
  
  Dim DB As DAO.Database
  Dim KH As DAO.Recordset
  
  Set DB = CurrentDb
  
  Set KH = DB.OpenRecordset("T_KHangLogin", dbOpenDynaset)
  KH.AddNew
  ...

• RE: giúp đở về code vba

  http2 > 23-07-19, 09:58 AM

  [b][b]rất cám ơn  ongke0711[/b][/b] !
  
  Mình đã hiểu .  vấn đề về hình ảnh bạn có cách nào không . chứ lưu kểu nhị phân trong database luôn thì nặng lắm có cách nào khắc phục không . 
  vi dụ : khi load form thì hình ảnh mới load bằng link theo và hiển thị lên img . (chỉ lưu link trên table )

• RE: giúp đở về code vba

  ongke0711 > 23-07-19, 10:32 AM

  Bạn download Demo ở bài này: https://thuthuataccess.com/forum/post-29...l#pid29691

• RE: giúp đở về code vba

  http2 > 23-07-19, 12:04 PM

  Vô cùng cám ơn Ông Kẹ . đã giải quyết xong hết vấn đề trước mắt ^^ . rảnh nhậu không ông kẹ ^^
• Bài trước Bài tiếp