Chạy Runas ứng dụng trong VBA

Chia sẻ bởi:hands

★★★★★

‹ Tự động chèn code vào sheet của... Làm sao đóng được cửa sổ VBA... ›

Quảng cáo

Kính gửi: mọi người trên diễn đàn!
Em đang có nhu cầu sử dụng VBA để mở 1 ứng dụng khác (ví dụ: Task manager) bằng user khác (ví dụ: user administrator)
Em sử dụng lệnh:
Shell "runas /u:administrator taskmgr"
sau đó MSDOS hiện ra cửa sổ nhập pass để mình nhập vào.
Vậy có cách nào để công đoạn nhập Pass này thông qua VBA luôn không?
Em cám ơn!

sao không thử qua mấy hàm API
tôi thử dùng hàm sau : ( lưu ý máy mình là win 7 64bits, bạn tự tùy chỉnh cho phù hợp với 32 bits nhé )

Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
            (ByVal hWnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
'-----------------------------------------------------------------------
Sub GPE()
    ShellExecute 0&, "runas", [B]"C:Program Files (x86)TeamViewerVersion9TeamViewer.exe"[/B], "", "", 1
    'Shell "runas /user:administrator taskmgr"
End Sub

p/s : 32 bits thì bỏ ptrsafe và thay longptr = long

Cám ơn bạn hungpecc1, bạn có thể giải thích giúp mình về "công đoạn" điền password cho user thông qua code theo như cách của bạn được không.
cám ơn bạn nhiều.

Hàm Shellexecute của API khác hàm Shell của VBA !
Bình thường khi bạn mở 1 file hay một chương trình(exe) , bạn có thể click trực tiếp, hay chuột phải lên file để chọn các tính năng khác như : run as adimintrator, print, find ….

và hàm shellexecute cho phép bạn làm tất cả các hành động trên một cách tự đông !

Mình hơi dốt khoản này, mình đã chạy hàm bằng API, với runas và máy cho hiện ra hộp thoại để mình chọn user và pass. Còn chạy bằng Shell thì cho ra CMD để nhập pass. Hiện mình muốn việc nhập pass này cũng làm bằng code luôn. Bạn có thể chỉ giúp mình việc như thế nào không.

** bạn dùng hệ điều hành gì //
** Cụ thể bạn muốn mở chương trình gì ?? với quyền run as adminitrator ??

Mình dùng hệ điều hành Window XP. Mình có 1 tập hợp các user khác nhau và password tương ứng của chúng. Nhu cầu của mình là việc mở file hoặc ứng dụng với phân quyền của user đó bằng code (có thể mình đang log on bằng guest, admin hoặc 1 user abc nào đó và chuyển đổi qua lại giữa chúng)
Nói thêm: mình chỉ muốn mở file, ứng dụng chuyển đổi qua lại user theo cách Runas