Cara Meluncurkan Vbscript dalam Mode yang Ditinggikan (Jalankan sebagai Administrator)

Cara Meluncurkan Vbscript dalam Mode yang Ditinggikan (Jalankan sebagai Administrator)

Caracara.my.id - Dengan diperkenalkannya Kontrol Akun Pengguna (UAC) di Windows Vista, Anda biasanya membuka Command Prompt yang ditinggikan untuk menjalankan file batch dan skrip yang memerlukan hak administratif. Aplikasi dapat menggunakan file manifes (menggunakan tanda RequireAdministrator) untuk menjalankan peningkatan secara otomatis.

Untuk skrip, artikel ini memberi Anda beberapa trik kecil yang rapi yang dapat digunakan untuk meningkatkan secara otomatis menggunakan parameter "runas" ShellExecute.

(Lihat juga Cara Mengangkat file Batch secara Otomatis untuk Menjalankannya sebagai Administrator? untuk metode elevasi otomatis lainnya.)

Luncurkan Vbscript yang ditingkatkan

Terima kasih kepada Jim Barry karena telah memberi tahu saya tentang penggunaan argumen runas dalam metode ShellExecute dari objek Shell.Application. Menggunakan saran Jim, skrip asli saya diringkas menjadi banyak. Gunakan salah satu metode ini untuk menjalankan VBScript yang ditinggikan.

Metode 1

Berikut adalah contoh skrip yang diluncurkan kembali sebagai administrator (ditingkatkan) menggunakan parameter runas, jika skrip tidak memiliki argumen baris perintah yang diteruskan. Saat meluncurkan kembali skrip sebagai administrator, cukup berikan argumen palsu sehingga skrip tidak berjalan dalam lingkaran siklus.

Jika WScript.Arguments.length = 0 Maka

   Setel objShell = CreateObject("Shell.Application")

   'Berikan argumen palsu, katakan [uac]

   objShell.ShellExecute "wscript.exe", Chr(34) & _

      WScript.ScriptNama Lengkap & Chr(34) & " uac", "", "runas", 1

Lain

   'Tambahkan kode Anda di sini

Berakhir jika

Metode 2

Metode ini menggunakan skrip peluncur yang menjalankan VBScript utama yang ditinggikan menggunakan kata kerja runas.

Setel objShell = CreateObject("Shell.Application")

Setel FSO = CreateObject("Scripting.FileSystemObject")

strPath = FSO.GetParentFolderName (WScript.ScriptFullName)

Jika FSO.FileExists(strPath & "\MAIN.VBS") Kemudian

     objShell.ShellExecute "wscript.exe", _

        Chr(34) & strPath & "\MAIN.VBS" & Chr(34), "", "runas", 1

Lain

     MsgBox "File skrip MAIN.VBS tidak ditemukan"

Berakhir jika

Anda akan melihat dialog elevasi UAC.

secara otomatis meningkatkan runas vbscript

Setelah pengguna mengklik Lanjutkan untuk menyetujui, skrip utama diluncurkan sebagai administrator.

TERKAIT: Bagaimana Cara Secara Otomatis Mengangkat file Batch untuk Menjalankannya sebagai Administrator?

  ______ _