-
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ẹ ^^