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

Không chạy được file *.accdb !

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Lỗi] Không chạy được file *.accdb !
• Không chạy được file *.accdb !

• RE: Không chạy được file *.accdb !

  Xuân Thanh > 30-03-13, 12:27 PM

  (30-03-13, 11:15 AM)tmtien261 Đã viết: Mình cũng gán qua biến Mydatabase theo trình tự như sau:
  1. Trước khi chạy các Form "thực thi", chương trình mở Form gán đường dẫn (Form1). Sau khi nhất nút Button trình duyệt trên Form1 sẽ tìm đến và chọn file Mydata.accdb; Gán đường dẫn của file này vào Listbox.
  2. Gán biến toàn cục Mydatabase vào đường dẫn vừa tìm được trong Listbox bằng lệnh: Mydatabase = Me.Listbox.RowSource
  3. Tại "Private Sub" của chương trình khai báo:
  ...
  Dim db as Database
  Set db = OpenDatabase(Mydatabase)
  ...
  Kết quả chương trình chạy nhưng vẫn báo bị lỗi như đã nêu. Không biết mình còn thiếu trình tự gì không ? Nhờ Xuân Thanh chỉ giúp !

  
  1/ Đã nói là không gán Database nữa vì lệnh OpenDatabase không mở được Database
  2/ Nếu trong cùng một máy thì dùng DAO kết nối. Nhớ chọn DAO3.6 hoặc cao hơn (Tools\Reference). Nếu chạy trong mạng, cách tốt nhất là dùng ADODB để kết nối
  Thân mến

• RE: Không chạy được file *.accdb !

  Minh Tiên > 31-03-13, 11:11 AM

  (30-03-13, 12:27 PM)Xuân Thanh Đã viết: 1/ Đã nói là không gán Database nữa vì lệnh OpenDatabase không mở được Database
  2/ Nếu trong cùng một máy thì dùng DAO kết nối. Nhớ chọn DAO3.6 hoặc cao hơn (Tools\Reference). Nếu chạy trong mạng, cách tốt nhất là dùng ADODB để kết nối
  Thân mến

  
  Cảm ơn xt nhiều ! Xuân Thanh có thể hướng dẫn mình cách dùng ADODB để kết nối trong mạng Lan hoặc chỉ cho mình đường dẫn đến tài liệu dễ học tí hoặc file demo đc ko ? Mình đã Search Google nhưng khó hiểu quá. Làm phiền bạn hơi nhiều, chịu khó giúp nhé ! Thanks

• RE: Không chạy được file *.accdb !

  Xuân Thanh > 31-03-13, 12:39 PM

  (31-03-13, 11:11 AM)tmtien261 Đã viết: Cảm ơn xt nhiều ! Xuân Thanh có thể hướng dẫn mình cách dùng ADODB để kết nối trong mạng Lan hoặc chỉ cho mình đường dẫn đến tài liệu dễ học tí hoặc file demo đc ko ? Mình đã Search Google nhưng khó hiểu quá. Làm phiền bạn hơi nhiều, chịu khó giúp nhé ! Thanks

  
  Tham khảo tài liệu của tác giả Lê Văn Duyệt tại đây http://www.giaiphapexcel.com/forum/showt...3%ACnh-ADO
  Thân mến

• RE: Không chạy được file *.accdb !

  Minh Tiên > 31-03-13, 01:29 PM

  (31-03-13, 12:39 PM)Xuân Thanh Đã viết: Tham khảo tài liệu của tác giả Lê Văn Duyệt tại đây http://www.giaiphapexcel.com/forum/showt...3%ACnh-ADO
  Thân mến

  Thanks XT ! Mình sẽ nghiên cứu sau. Nhưng không biết trước mắc khắc phục lỗi như trên như thế nào đây ? Nguyên nhân sinh ra lỗi là gì ? Có pro nào từng bị như thế ko nhỉ ? Hay vẫn cứ phải làm như "Noname" hướng dẫn !

• RE: Không chạy được file *.accdb !

  Thanh Phương > 01-04-13, 11:10 AM

  1/ Đưa đường dẫn chứa MyDatabase vào table
  2/ Tạo sub kết nối đến đường dẫn trên
  3/ Trong các thủ tục, sự kiện sẽ không set lại Database nữa
  Theo hướng này bạn thử làm xem, kết hợp với hướng dẫn của bác XT nữa nhé

• RE: Không chạy được file *.accdb !

  Minh Tiên > 05-04-13, 10:58 AM

  Xuân Thanh ơi làm phiền tí tí nhé !
  Mình đã nghiên cứu DAO và ADO mấy ngày nay nhưng mình thật là "Khó đào tạo quá" chắc do "N lâu, D bên" nên vẫn chưa vận dụng được. Nhờ bạn "Khai sáng" tí nhé !
  Mình có 1 Sub như thế này:
  
  Private Sub LuuHangxuat()
  
  Dim rs As Recordset
  Dim db As Database
  Set db = CurrentDb()
  Set rs = db.OpenRecordset("tblHangxuat", dbOpenTable)
  rs.Index = "Primarykey"
  rs.Seek "=", Me.txtMahangxuatX
  If rs.NoMatch Then
  rs.AddNew
  rs!SophieuxuatID = Me.txtSophieuxuatID
  rs!MahangX = Me.txtMahangxuatX
  rs!Mahang = Me.cboMahangxuat.Column(0)
  rs!Tenhang = Me.cboMahangxuat.Column(1)
  rs!Soluongxuat = 1
  rs!Giaxuat = Me.cboMahangxuat.Column(2)
  rs!Tienxuat = rs!Soluongxuat * rs!Giaxuat
  rs.Update
  Else
  rs.Edit
  rs!Soluongxuat = rs!Soluongxuat + 1
  rs!Tienxuat = rs!Soluongxuat * rs!Giaxuat
  rs.Update
  End If
  rs.Close
  Set db = Nothing
  End Sub
  
  Khi chạy theo dạng Link Data hoặc dùng Split để tách table và ... thì phải khai báo địa chỉ db bằng địa chỉ tuyệt đối (Thay cho CurrentDB), xong lại bị xung đột liên tục như tmtien261 đã nêu.
  Xuân Thanh chỉ giúp mình cách dùng DAO khai báo và kết nối với CSDL cụ thể với Sub này đển Sub này hoạt động OK.
  Rất mong được chỉ dẫn ! Cảm ơn nhiều.

• RE: Không chạy được file *.accdb !

  Minh Tiên > 07-04-13, 11:07 AM

  Thanks XT. Mình đã làm được với DAO cho Sub trên rồi. Thay đổi một vài câu trúc SQL. Xin chia sẽ cho các ac như mình:
  1.Phần khai báo:
  Dim rs As DAO.Recordset
  Dim db As DAO.Database
  
  2. Phần thiết lập Connect:
  Set db = OpenDatabase(Application.CurrentProject.Path + "\Tên csdl.accdb") hoặc ghi đường dẫn cụ thể.
  hoặc Set db = CurrentDb() (Nếu là csdl hiện hành)
  Set rs = db.OpenRecordset("tblXuathangban", dbOpenTable)
  
  3. Phần thực thi:
  rs.AddNew hoặc rs.Edit hoặc ...
  rs.Fields("Sophieuxuat") = ...
  rs.Fields("Tên fields") = ...
  rs.Update
  rs.Close
  Set db = Nothing
  
  Xin XT giải thích thêm: Hạn chế của DAO khi dùng trong mạng LAN là gì ? Tại sao phải dùng ADODB. Trường hợp chỉ sử dụng csdl Acccess trong mạng LAN thì sử dụng DAO vẫn OK chứ ?

• RE: Không chạy được file *.accdb !

  Xuân Thanh > 08-04-13, 10:49 AM

  Bạn thử đi rồi sẽ biết. Có thế mới hiểu sâu được
  Thân mến

• RE: Không chạy được file *.accdb !

  Minh Tiên > 23-04-13, 04:35 PM

  "XT" ơi !
  Bạn có thể chỉ giúp mình cách tạo 1 function connection bằng ADODB được không ?
  Mục đích để khi muốn Connection chỉ cần gọi function ra thôi.
  Cảm ơn nhiều !
• Bài trước Bài tiếp