regsvr32 scrrun.dll
regsvr32 wshom.ocx
regsvr32 jscript.dll regsvr32 scrobj.dll regsvr32 scrrun.dll regsvr32 vbscript.dll regsvr32 wsext.dll regsvr32 wshom.ocx
Pertama, anda boleh membuat tweak berikut untuk menyelesaikan masalah. Sila berhati-hati untuk tidak mengubah maksud kandungan asal: Mula-mula, semak sama ada sistem melarang menjalankan skrip. Anda boleh membuka tab "Keselamatan" bagi "Pilihan INTERNET" dan lihat pilihan "Kawalan dan Pemalam AktifX" dalam "Tahap Tersuai". Pastikan pilihan yang dilumpuhkan tidak dipilih. Seterusnya, jalankan arahan regsvr32 scrrun.dll, yang akan mendaftarkan semula fail yang diperlukan untuk menjalankan skrip. Akhir sekali, semak pendaftaran untuk lokasi HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindows Script HostSettings. Cari nilai kunci DWORD bernama Enabled dalam tetingkap kanan. Jika nilai kunci wujud, anda boleh memadamkannya atau menukar nilainya kepada 1 supaya skrip akan berjalan seperti biasa. Langkah-langkah ini akan membantu menyelesaikan isu dengan pelaksanaan skrip terhad. Sila ikuti langkah di atas dan pastikan anda mengikut prosedur yang betul.
Bunian kunci gagal mencipta fail Bagaimana untuk menyemak sama ada kebenaran skrip VBS dilumpuhkan dalam sistem?
UserVar MoShi=DropList=0 "Tetapkan mod simulasi"
UserVar str1=""Ini adalah ayat pertama jeritan automatik""Sila masukkan ayat pertama jeritan automatik"
UserVar str2=""Ini adalah ayat kedua bagi jeritan automatik""Sila masukkan ayat kedua jeritan automatik"
UserVar str3=""Ini adalah ayat ketiga jeritan automatik""Sila masukkan ayat ketiga jeritan automatik"
UserVar str4=""Ini adalah ayat ke-4 bagi jeritan automatik""Sila masukkan ayat ke-4 bagi jeritan automatik"
UserVar str5=""Ini adalah ayat kelima bagi jeritan automatik""Sila masukkan ayat kelima bagi jeritan automatik"
UserVar Yanshi=3000 "Masa menunggu antara dua jeritan, 1 saat ialah 1000"
//****************Tamat Persediaan******************
Jika MoShi=0 Maka
SetSimMode 0
Lain Jika MoShi=1 Kemudian
SetSimMode 2
Lain Jika MoShi=2 Kemudian
SetSimMode 1
Tamat Jika
Lengah 500
Hwnd = Plugin.Window.MousePoint()
Sementara 1
Panggil Plugin.Bkgnd.SendString(Hwnd, str1)
Panggil Plugin.Bkgnd.KeyPress(Hwnd, 13)
Lengahkan Yanshi
Panggil Plugin.Bkgnd.SendString(Hwnd, str2)
Panggil Plugin.Bkgnd.KeyPress(Hwnd, 13)
Lengahkan Yanshi
Panggil Plugin.Bkgnd.SendString(Hwnd, str3)
Panggil Plugin.Bkgnd.KeyPress(Hwnd, 13)
Lengahkan Yanshi
Panggil Plugin.Bkgnd.SendString(Hwnd, str4)
Panggil Plugin.Bkgnd.KeyPress(Hwnd, 13)
Lengahkan Yanshi
Panggil Plugin.Bkgnd.SendString(Hwnd, str5)
Panggil Plugin.Bkgnd.KeyPress(Hwnd, 13)
Lengahkan Yanshi
//Setelah menunggu setengah minit, teruskan ke pusingan jualan seterusnya
Lengah 29000
Wend
Atas ialah kandungan terperinci Selesaikan masalah kegagalan untuk mencipta objek: semak sama ada sistem telah melumpuhkan kebenaran skrip vbs. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!