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

Demo Hàm mở mọi loại file ( Access)

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư Viện Hàm
  • [Hàm] Demo Hàm mở mọi loại file ( Access)
• Demo Hàm mở mọi loại file ( Access)

• Demo Hàm mở mọi loại file ( Access)

  maidinhdan > 19-04-15, 10:10 PM

  Giới hạn của code mở file là phải xác định file đó có phần mềm được cài trên máy hay chưa, sau đó ta phải xác đinh nó được cài trên ổ đĩa nào...sau đó dùng hàm Shell để gọi đến ứng dụng đang cài đặt trên máy...Rất phiền phức, đôi khi lại bất tiện.
  
  Hôm nay
  
  Đây là 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, không cần biết ứng dụng nó được cài lên ổ nào cũng có thể mở nó lên....
  
  Hình mình họa.
  
  
  Demo đính kèm.
  
  Ghi chú: Đường dẫn đến file phải không được có tiếng việt.
  
  Bài thứ 6: Tạo hàm + form lấy tin Rss từ các trang Web.
  
  Rất mong các ý kiến đóng góp của các anh/chị cùng các bạn.

• RE: Demo Hàm mở mọi loại file ( Access)

  maidinhdan > 06-07-15, 06:08 PM

  từ: Nguyễn Nam Hùng <namhung88qb@gmail.com>
  tới: maidinhdan@gmail.com
  
  Hỏi : của Hùng
  Chào bác, em có tham khảo cái Demo mở mọi loại file của Bác trên trang thuthuataccess.com. Tuy nhiên nút lệnh Xem file k hoạt động được. Em đang làm một bài tập tương tự nhiw cái đề mo của bác, có gì bác chỉ giáo giúp e với ah
  
  Đáp: của maidinhdan
  Không mở được bạn kiểm tra lại đường dẫn đến tập tin đó có Tiếng việt có dấu, nếu có sẽ không mở được bạn ạ. File này đã được Test đưa vào sử dụng và được các thành viên đánh giá là rất tốt.
  
  Bạn cần đọc kỹ các chú thích của mình trên đó khi triển khai. Hoặc cần thiết bạn chụp lại hình báo lỗi cho mình (nếu có).
  
  Hỏi : của Hùng
  + Chào bác! Đúng là hôm trước em đã không đọc kỹ bài của bác. Em đã thử lại và chạy rất ok rồi.
  
  + Tuy nhiên có trường hợp sau e không hiểu nó như thế nào:
  Em dùng Word 2010 tạo ra 2 tệp "kiem tra 1.doc" và"kiem tra 2.docx"
  
  thì khi đưa vào chương trình không mở tệp "kiem tra 1.doc".
  Còn tệp "kiem tra 1.docx" thì mở được bình thường.Trình độ em gà quá nên Mong bác xem xét chỉ giáo giúp e với ạ.
  Xinh chân thành cảm ơn!
  
  Đáp: của maidinhdan
  Bạn Hùng thân mến, ứng dụng được viết trên Access 2003 nên mình chưa test trên các phiên bản cao hơn nên bạn chờ mình vài ngày để mình xem lại.

• RE: Demo Hàm mở mọi loại file ( Access)

  tieuphung88 > 06-07-15, 09:13 PM

  Vâng, bác xem lại rồi có gì chia sẻ cho anh em học hỏi,

• RE: Demo Hàm mở mọi loại file ( Access)

  kieu manh > 07-07-15, 01:37 PM

  Code sau đơn giản tùy chỉnh các kiểu cũng mở mọi loại File Ok ..xúc tích ngắn gọn dễ nhớ ...còn Mấy cái hàm API cả một rừng code nhớ được chết liền chỉ có nước Copy thôi 
  

  Mã PHP:

  Public Sub Open_ALLFile()
    Dim FileOpen As String
    FileOpen = "D:\Text.rar"
    With CreateObject("Shell.Application")
        .Open (FileOpen)
    End With
End Sub 


• RE: Demo Hàm mở mọi loại file ( Access)

  maidinhdan > 07-07-15, 05:30 PM

  (07-07-15, 01:37 PM)kieu manh Đã viết: Code sau đơn giản tùy chỉnh các kiểu cũng mở mọi loại File Ok ..xúc tích ngắn gọn dễ nhớ ...còn Mấy cái hàm API cả một rừng code nhớ được chết liền chỉ có nước Copy thôi 
  

  Mã PHP:

  Public Sub Open_ALLFile()
    Dim FileOpen As String
    FileOpen = "D:\Text.rar"
    With CreateObject("Shell.Application")
        .Open (FileOpen)
    End With
End Sub 


  
  Đã Test đoạn code này, rất Ok. Ngắn gọn, xúc tích. Phù hợp với mọi địa hình..

• RE: Demo Hàm mở mọi loại file ( Access)

  tieuphung88 > 08-07-15, 09:27 AM

  Cảm ơn các bác nhiều lắm....

• RE: Demo Hàm mở mọi loại file ( Access)

  zinzin8x > 26-05-16, 12:17 AM

  (07-07-15, 01:37 PM)kieu manh Đã viết: Code sau đơn giản tùy chỉnh các kiểu cũng mở mọi loại File Ok ..xúc tích ngắn gọn dễ nhớ ...còn Mấy cái hàm API cả một rừng code nhớ được chết liền chỉ có nước Copy thôi 
  

  Mã PHP:

  Public Sub Open_ALLFile()
    Dim FileOpen As String
    FileOpen = "D:\Text.rar"
    With CreateObject("Shell.Application")
        .Open (FileOpen)
    End With
End Sub 


  
  Cái này là modul hả bạn. vậy vào code gọi nó uh.

• RE: Demo Hàm mở mọi loại file ( Access)

  lmthu > 26-05-16, 10:53 AM

  Xin đóng góp 1 dòng mã lệnh để xem mọi loại tập tin
  Application.FollowHyperlink <Filepath>
  <Filepath>: đường dẫn đầy đủ+tên file cần xem
  Ưu điểm của cách này là ngắn gọn dễ hiểu, không cần phải truy xuất sâu tới các hàm API của Windows

• RE: Demo Hàm mở mọi loại file ( Access)

  phuong.ayunpa > 08-02-17, 04:36 PM

  Code mở mọi loại file  trên, mình lấy code trên bỏ vào đâu hả bạn, Bạn hướng dẫn chi tiết cách làm được không ?Không có Demo hả bạn ?

• RE: Demo Hàm mở mọi loại file ( Access)

  ongke0711 > 08-02-17, 09:49 PM

  (08-02-17, 04:36 PM)phuong.ayunpa Đã viết: Code mở mọi loại file  trên, mình lấy code trên bỏ vào đâu hả bạn, Bạn hướng dẫn chi tiết cách làm được không ?Không có Demo hả bạn ?

  
  - Bạn copy đoạn code của bạn lmthu vào module nào đó sau đó gọi Sub này từ form bạn thiết kế.
  Vd: Private Sub cmdOpenFile_Click()
              Open_ALLFile
        End Sub
  - Bạn nên chú ý là đoạn code này chỉ là demo cách dùng lênh Shell.Application để mở file. Nếu bạn dùng trong thực tế thì phải xử lý cái đoạn khai báo biến chuỗi FileOpen để nó tùy chọn lấy được đường dẫn tới file cần mở. Để làm việc này thì bạn xem lại demo của bác maidinhdan - phần code cho nút lệnh "Chọn đường dẫn...".
• Bài trước Bài tiếp