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

Demo hàm Giải nén file *.zip

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư Viện Hàm
  • [Hàm] Demo hàm Giải nén file *.zip
• Demo hàm Giải nén file *.zip

• Demo hàm Giải nén file *.zip

  maidinhdan > 16-04-15, 09:01 PM

  Hôm trước mình đã giới thiệu Demo hàm nén mọi file thành file zip. Hôm nay xin nói về hàm giải nén file *.zip
  
  Tác dụng: Giải Nén file *.zip
  
  Hình mình họa:
  
  
  Demo đính kèm.
  
  Bài thứ 5 mình sẽ giới thiệu đó là: Hàm mở mọi loại file gồm file:
  + Mọi loại file Office 2003,2007,2010,2013
  + Mọi loại file Âm nhạc, Video.....
  + Mọi loại file Nén: zip, rar, iso.....
  
  Nói chung là muốn mở file nào cũng được, chỉ cần 1 hàm thôi

• RE: Demo hàm Giải nén file *.zip

  tronghieu9792 > 16-07-15, 10:39 AM

  Chào bác  maidinhdan bạn có thể giúp mình tạo đường dẫn cố định đến một tập tin và khi ta click nút nén zip thì nó cứ nén thôi không, có thể mặc định file đó khi ta di chuyển cơ sở dữ liệu dang máy tính khác không. Rất cảm ơn bác!!

• RE: Demo hàm Giải nén file *.zip

  maidinhdan > 16-07-15, 08:09 PM

  (16-07-15, 10:39 AM)tronghieu9792 Đã viết: Chào bác  maidinhdan bạn có thể giúp mình tạo đường dẫn cố định đến một tập tin và khi ta click nút nén zip thì nó cứ nén thôi không, có thể mặc định file đó khi ta di chuyển cơ sở dữ liệu dang máy tính khác không. Rất cảm ơn bác!!

  
  Bạn chụp hình file trên máy bạn + tên cụ thể nào đó (càng cụ thể càng tốt). Mình viết code hỗ trợ.

• RE: Demo hàm Giải nén file *.zip

  tronghieu9792 > 17-07-15, 09:12 AM

  1. Cảm ơn bác maidinhdan, mình đã làm được khi tập tin Database và file chương trình chung một thư mục cố định, nếu mình lưu tập tin Database chỗ khác thì không thực hiện được, cụ thể thư mục D:\QTBH\Database, trong đó QTBH là tên thư mục lưu tại ổ đĩa D, file chương trình và Database cùng lưu trong thư mục trên.
  

  2. Sẳn đây bác giúp mình code này luôn ha, code là nút lệnh liên kết Database với chương trình, code này cũng chỉ thực hiện được khi Databsae cùng chung thư mục. Đọc trên diễn thấy có chỉ kết nối Database có pasword mà không báo link từng bảng (dù file Database nằm khác thư mục, khác máy trong mạng Lan thế nhưng mình làm chưa được, bạn chỉ mình cách link dabase có pasword khi không chung thư mục hay khi share lên một máy khác nhé.

  Private Sub cmdKetNoi_Click()

  On Error Resume Next

   Cancel = False

  Dim db As Dao.Database

  Dim strPath As String

  Dim strPwd As String

  strPwd = "404040"

  strPath = Application.CurrentProject.Path & "\DATABH.mdb"

  Set db = DBEngine.Workspaces(0).OpenDatabase(strPath, False, False, ";pwd=" & strPwd)

   

  LinkTable "tbl_BaoGia", txtPath

  …

  End sub

  Mình làm chương trình này cho bà xã bán những mặt hàng điện thoại linh tinh, đúng ra không cần sử dụng tới chương trình, nhưng một phần cũng thích access riết rồi cũng mê nên làm luôn. Cảm ơn bác!

• RE: Demo hàm Giải nén file *.zip

  maidinhdan > 17-07-15, 09:44 AM

  Trả lời:
  
  Câu 1: Mình vẫn chưa hiểu ý của bạn làm Nén file lại: để lưu cùng thư mục của Database hay bạn muốn tạo ra một thư mục mới để lưu?
  
  Câu 2: Code có thể viết nhưng không có file dữ liệu để test e rằng..sợ bị lỗi.
  
  Thân mến

• RE: Demo hàm Giải nén file *.zip

  tronghieu9792 > 17-07-15, 11:09 AM

  Ý mình là từ thư mục D:\QTBH\Database, sau khi nén file từ chương trình của maidinhdan thì file Database nó sẽ lưu ở D:\Database (file đã nén không nắm trong thư mục  D:\QTBH\Database nữa). cảm ơn maidinhdan.

• RE: Demo hàm Giải nén file *.zip

  maidinhdan > 17-07-15, 08:23 PM

  Có lẽ bạn trong bài này không tiện trả lời.
  
  Bởi bài này là hàm Giải nén, bạn qua chuyên mục hàm nén file thảo luận tiếp nhé.
  
  Link bài viết cho câu hỏi của bạn nè:
  
  http://thuthuataccess.com/forum/thread-8...l#pid26987
• Bài trước Bài tiếp