Saya memerlukan skrip VB untuk menekan kotak peringatan "APLIKASI UNKNOWN"

0

Saya perlu bantuan dalam menekan kotak dialog ini untuk menjalankan aplikasi pihak ketiga atau menggunakan CD-ROM

masukkan deskripsi gambar di sini

Joe J.
sumber
Apa yang terjadi jika Anda menghapus centang 'Selalu tanya sebelum membuka file ini'?
simon di rcl
Saya bisa menghapusnya tetapi lain kali saya menjalankannya muncul lagi. Aku tidak sebodoh itu.
Joe J.
IIRC dialog peringatan ini hanya muncul ketika file ditandai sebagai diunduh (diimplementasikan sebagai Aliran Data Alternatif NTFS).
Daniel B

Jawaban:

0

Script ini akan menekan peringatan (itu akan mengklik "Run").

@ECHO OFF

REM External app to launch
CALL E:\file_from_external_location.exe

REM Make a VBS-script that will switch to the warning and press "Run"
ECHO ^

CreateObject("WScript.Shell").AppActivate "Open File - Security Warning"^

WScript.Sleep 500^

CreateObject("WScript.Shell").SendKeys "%%R"^

>vbs.vbs
CALL vbs.vbs
DEL vbs.vbs

Tidak yakin apakah semua ini diperlukan. Jika saya memanggil aplikasi dari skrip, sepertinya tidak ada peringatan untuk membuka program.

REM External app to launch
CALL E:\file_from_external_location.exe
Klinghust
sumber
Bisakah kita menentukan% username% di bidang ini?
Joe J.
@ JoJ. tidak yakin apa yang Anda maksud, tapi mungkin ya.
Klinghust