Các bạn cho mình hỏi 2 vấn đề sau:
1. Mình có 1 form, 1 nút là opencmd, làm sao để khi bấm vào nút opencmd thì mở 1 file click.exe ngoài đường dẫn có sẵn. Đường dẫn đó là cố định (dạng C:\......) hay có thể không có tên ổ đĩa được không?
2. Mình có 1 nút cmdstart, làm sao để khi bấm vào nút đó thì máy tính hiểu đã nhấn tổ hợp phím Ctrl+Alt+R ?
Mong các bạn giúp mình với nhé! mình rất cảm ơn !

(21-10-12, 03:15 PM)quyvt1993 Đã viết: Các bạn cho mình hỏi 2 vấn đề sau:
1. Mình có 1 form, 1 nút là opencmd, làm sao để khi bấm vào nút opencmd thì mở 1 file click.exe ngoài đường dẫn có sẵn. Đường dẫn đó là cố định (dạng C:\......) hay có thể không có tên ổ đĩa được không?
2. Mình có 1 nút cmdstart, làm sao để khi bấm vào nút đó thì máy tính hiểu đã nhấn tổ hợp phím Ctrl+Alt+R ?
Mong các bạn giúp mình với nhé! mình rất cảm ơn !

Mở 1 file exe có tên cố định:

Private Sub opencmd_Click()
Dim MyAppID, ReturnValue
MyAppID = Shell("D:\CCleaner.EXE", 1)' Sửa lại đường dẫn cho hợp lệ
End Sub

Nếu không có tên thì dùng phím tắt là: Windown + E cho nó nhanh và có thể thực hiên bất cứ lúc nào cũng được mà không cần đến Access chi cho mệt.Còn nếu muốn dùng phím tắt cho nút lệnh thực thi gì đó thì tại caption của nút đó sử dụng dấu & với chữ mà ta cần sử dụng.ví dụ có nút Luu thì caption đặt là &Luu, khi đó có phím tắt là Alt + L.
Nếu không có tên file trên ổ đĩa thì chắc chắc là file đó phải đặt trên 1 thư mục riêng vì nếu không nó không biết bạn đang muốn mở file nào rồi cho mở hàng loạt.

Mở tất cả các file có trong Folder:

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.NameSpace("D:\QLPT\New Folder")
Set colItems = objFolder.Items
For Each objItem In colItems
objItem.InvokeVerbEx ("Open")'có thể thay từ Open = Open, Print, Edit, Cut, Copy, Delete tuỳ bạn muốn làm gì.
Next

Cảm ơn bạn, nhưng mà ý mình thì khác
Hàm mở tập tin thì mình được rồi
Còn ý thứ 2 của mình là: khi mình mở file .exe ra rồi, nó muốn chạy thì cần tổ hợp phím Ctrl+Alt+R, vậy mình có thể dùng access để giống như nhấn tổ hợp phím đó luôn. Vì .exe của mình cứ nhấn Ctrl+Alt+R thì nó chạy (AutoClick 2.2) nên các bạn có hàm nào tương đương với việc nhấn tổ hợp phím Ctrl+Alt+R không ?

(21-10-12, 08:29 PM)quyvt1993 Đã viết: Cảm ơn bạn, nhưng mà ý mình thì khác
Hàm mở tập tin thì mình được rồi
Còn ý thứ 2 của mình là: khi mình mở file .exe ra rồi, nó muốn chạy thì cần tổ hợp phím Ctrl+Alt+R, vậy mình có thể dùng access để giống như nhấn tổ hợp phím đó luôn. Vì .exe của mình cứ nhấn Ctrl+Alt+R thì nó chạy (AutoClick 2.2) nên các bạn có hàm nào tương đương với việc nhấn tổ hợp phím Ctrl+Alt+R không ?

Bạn thử sử dụng lệnh như sau: