Pengantar VB Script: Panduan Pemula: 11 Langkah

2024 Pengarang: John Day | [email protected]. Terakhir diubah: 2024-01-30 09:59

***((((ALERT: Meskipun ada banyak langkah. ini sebenarnya cukup mudah. Saya hanya menjelaskan semuanya secara detail untuk pemula. Jika Anda hanya ingin kode melompat ke langkah terakhir dan Anda akan menemukan yang lengkap kode di sana.))))*** Saya memainkan banyak Xbox live dan selalu harus menonaktifkan internet di komputer saya karena menghabiskan bandwidth. Terutama karena saya mengunduh atau mengunggah sesuatu sepanjang waktu. Masalahnya bukan mematikannya tetapi menyalakannya kembali yang saya lupa, membuatnya ke tempat saya kehilangan semua waktu unggah/unduh itu. Jadi saya memutuskan untuk membuat program untuk melakukannya untuk saya. Saya akan menulisnya di Vb.net tetapi saya baru-baru ini harus mematikan dan membuka sistem operasi saya di komputer saya karena badai yang buruk menggoreng hard drive saya, dan belum menginstal ulang VB.net jadi saya pikir ini akan terjadi beri saya alasan untuk bermain dengan vbscript. Saya juga membuat gambar di cat untuk ditampilkan di latar belakang jadi saya tahu itu sedang berjalan.

Langkah 1: Cari Tahu Apa yang Ingin Anda Lakukan

Hal pertama yang selalu saya lakukan adalah membuat rencana. Apa yang saya ingin program lakukan? A) Saya ingin dapat membuka skrip dan secara otomatis akan mematikan koneksi. B) Saya ingin menampilkan layar raksasa di latar belakang sehingga tidak ada kesalahan bahwa internet mati, dengan cara ini saya tidak lupa untuk menyalakannya kembali. C) Saya ingin memberi saya pilihan untuk menyalakannya kembali dan kemudian menunggu tanggapan. D) Saya ingin memastikan saya menyalakannya kembali jadi saya tidak lupa. E) Kemudian setelah saya benar-benar mengatakan ya untuk menyalakannya kembali, skrip menyalakannya kembali dan kemudian menutup latar belakang. F) Keluar dari semuanya.

Langkah 2: Hal yang Saya Gunakan Tapi Tidak Benar-benar Dibutuhkan

Yang Anda butuhkan hanyalah editor teks seperti notepad. Segala sesuatu yang lain adalah opsional. Saya menggunakan Notepad ++ ketika saya melakukan skrip VB jadi karena memperlakukannya seperti yang dilakukan vb.net dengan warna dan tahu bahasanya. Ini membantu untuk menghindari kesalahan. Ini juga memberi nomor baris sehingga Anda dapat mendiagnosis apa masalahnya ketika Anda mendapatkan kode kesalahan. Dapat diperoleh dari sini notepad ++

Langkah 3: Mulai Pemrograman

Hal pertama yang ingin Anda lakukan adalah membuat file teks dan menyimpannya ke apa pun yang Anda inginkan untuk diberi nama dengan ekstensi file.vbsContoh: NetworkShutOffScriptThatShutsOffTheInternetSoIcanPlayGamesOnMyXboxAndNotGetLag.vbsExample 2: games.vbsYang penting adalah Anda menamainya dengan ekstensi file.vbsSaya biasanya melakukan ini di desktop karena saya membukanya sekitar satu miliar kali saat saya sedang mengerjakannya. Sekarang klik kanan file dan tekan edit atau edit dengan notepad++

Langkah 4: Langkah 1: Membuka Jendela Prompt Perintah

Jadi saya memutuskan untuk melakukan sebagian besar pekerjaan saya hanya akan menggunakan program yang sudah tersimpan di komputer untuk melakukan apa yang saya inginkan. Pengodean lebih sedikit dan tidak ada unduhan…Woohoo. Paling mudah adalah command prompt. jadi kami ingin membuka jendela command prompt untuk melakukannya, kami ingin membangun sebuah objek untuk melakukannya, kami mengetik: set shellobj = CreateObject("WScript. Shell")Apa fungsinya: Setel instance shellobj agar sama dengan membuat objek w skrip shell. Dengan cara ini yang harus kita lakukan adalah mengetik shellobj daripada CreateObject("WScript. Shell") setiap kali kita membutuhkan perintah baru. Sekarang kita telah membuat objek, kita menginstruksikan objek untuk membuka jendela command prompt.untuk melakukannya kita ketik: shellobj.run "cmd"Apa yang dilakukannya: Ini sama dengan mengetikkan CMD ke dalam kotak run di menu mulai. Jika kita tidak menyetel variabel shellobject, kita harus mengetik: CreateObject("WScript. Shell").run "cmd"… lihat betapa lebih mudahnya sekarang. Lebih sedikit ruang untuk kesalahan. Klik file… lalu Simpan… lalu buka desktop dan klik dua kali vbsfile yang Anda buat seharusnya dijalankan Jika semuanya berjalan dengan benar, Anda akan mendapatkan prompt perintah windows untuk muncul…..yaaaaaa!!!jika tidak centang pengkodean Anda, sejauh ini Anda harus memiliki:set shellobj = CreateObject("WScript. Shell")shellobj.run "cmd"Anda dapat menambahkan komentar ke dalam skrip Anda sehingga Anda ingat apa yang Anda lakukan nanti dengan meletakkan koma di depan baris seperti this:'ini untuk membuka prompt perintah. Ketika saya mengkode berkali-kali, saya akan melakukan ini, jadi saya ingat apa yang saya lakukan nanti ketika saya mencarinya. Script hanya mengabaikan baris itu dan melanjutkan. Jika Anda melihat mereka, Anda dapat melakukan hal yang sama.

Langkah 5: Langkah 2: Menyiapkan Timer

Ok sekarang kita memiliki jendela baru yang keren, kita perlu mengisinya dengan perintah sehingga kita bisa membuatnya melakukan apa yang kita inginkan. Masalahnya adalah beberapa komputer membutuhkan waktu lebih lama daripada yang lain untuk membuka jendela sehingga kita ingin skrip menunggu sebentar sedikit untuk memulai. jika dimulai terlalu cepat, komputer akan mengisi bagian yang kosong sebelum Anda membuka jendela dan Anda akan mendapatkan perintah sebagian atau tidak sama sekali. Jadi, kita perlu mengatur pengatur waktu. Untuk melakukan ini, kita ketik:wscript.sleep 200Apa yang dilakukannya: Ini memberitahu skrip untuk menunggu sejumlah X waktu sebelum mengeksekusi perintah berikutnya. 1000 sama dengan satu detik jadi milikku menunggu seperlima detik. Anda mungkin menemukan komputer Anda perlu menunggu lebih lama atau kurang. Jika Anda menonton komputer dan tidak mengetikkan perintah dengan benar, ubah angka ke angka yang lebih tinggi seperti 2000 akan menjadi 2 detik dan mungkin banyak waktu. Simpan file sekarang kode Anda pada titik ini seharusnya: set shellobj = CreateObject("WScript. Shell")shellobj.run "cmd"wscript.sleep 200

Langkah 6: Langkah 3: Buat Gambar

Saya baru saja membuka paint dan mengetik "Internet Diconected" ke dalamnya dan membuatnya menjadi 800x600 dan menyimpannya sebagai id.bmp dan menyimpannya di direktori root saya, dalam kasus saya k:\ tetapi milik Anda mungkin c:

Langkah 7: Langkah 4: Mengirim Perintah, Membuka Gambar

Ok sekarang kita memiliki jendela perintah yang menunggu perintah yang harus kita lakukan adalah mengetikkan perintah ke dalam jendela menggunakan perintah sendkeys. Ketika kita menggunakan perintah sendkeys itu seperti mengetik tetapi akan mengetik apa pun yang kita inginkan. Apa pun yang dapat kita ketik, kita dapat mengirim termasuk tombol enter yang diperlukan untuk menjalankan program. Sekarang setelah kita mengetahui cara mengirim tombol, mari kita buka gambar yang baru saja kita buat, lalu masukkan kata penutup pengatur waktu lain sehingga memberikan waktu untuk memuat gambar. Untuk melakukan ini, kita ketik:shellobj.sendkeys "k:\id.bmp{enter}"wscript.sleep 200Apa yang dilakukannya: Ini sama dengan mengetik k:\id.bmp ke dalam kotak run. Ini harus membuka gambar Anda di penampil gambar default untuk bmp … dalam kasus saya ini adalah jendela gambar dan penampil faks tetapi kebanyakan orang menginstal program after market yang melakukan ini juga jadi siapa yang tahu apa yang akan Anda buka. Sekarang simpan file Anda dan jalankan. Anda harus mendapatkan prompt perintah dan gambar untuk muncul. so far so good!!!kode Anda sejauh ini seharusnya:set shellobj = CreateObject("WScript. Shell")shellobj.run "cmd"wscript.sleep 200shellobj.sendkeys "k:\id.bmp{enter}"wscript. tidur 200

Langkah 8: Langkah 5: Mengirim Perintah, Matikan Internet

Pada titik ini jika Anda belum melakukannya, unduh file pdf di bagian akhir jadi jika Anda gagal, Anda memiliki unduhan Instructable tentang cara memperbaikinya. Sekarang di sinilah kesenangan dimulai. Ok jadi kita akan menggunakan ipconfig untuk melepaskan alamat IP kita. Tanpa alamat IP kita tidak bisa mendapatkan lalu lintas internet karena router tidak tahu ke mana mengirimkannya ke komputer. Untuk melakukan ini, kita ketik: shellobj.sendkeys "ipconfig /release{enter}"Apa yang dilakukannya: Ini menginstruksikan program IPCONFIG untuk melepaskan alamat IP. {enter} memberi tahu komputer bahwa Anda menekan tombol enter. ini akan seperti mengetik ipconfig /release ke jendela run dan tekan enter. Biasanya setelah Anda melakukan ini, jika Anda menjalankan ipconfig, ia akan memberi tahu Anda bahwa alamat IP Anda adalah 0.0.0.0 Inilah yang kami inginkan. Tanpa alamat IP, router tidak tahu bahwa kita ada di sini dan tidak ada program yang dapat "dial out" sehingga untuk berbicara. Sekarang kita telah berhasil menyelesaikan mematikan IP, kita ingin menutup jendela. Sekarang kita bisa menulis baris lain yang mengatakan: shellobj.sendkeys "exit{enter}"Tetapi akan lebih mudah untuk mengedit baris di atas dan menambahkannya ke akhir sehingga Anda memiliki:shellobj.sendkeys "ipconfig /release{enter}exit {enter}"Sekarang simpan tetapi jangan jalankan karena Anda akan mematikan koneksi internet Anda. Jika Anda menjalankannya, dan internet Anda mati, cukup ubah sakelar dari ipconfig /release ke ipconfig /renew dan jalankan lagi dan itu akan menghidupkannya kembali. Dan jika semuanya gagal reboot dan Anda akan baik-baik saja. kode Anda sejauh ini seharusnya: set shellobj = CreateObject("WScript. Shell")shellobj.run "cmd"wscript.sleep 200shellobj.sendkeys "k:\id.bmp{ enter}"wscript.sleep 200shellobj.sendkeys "ipconfig /release{enter}exit{enter}"

Langkah 9: Langkah 6: Membuat Kotak Pesan dan Menunggu Jawaban

Ok, sekarang kita telah berhasil mematikan internet dan menutup jendela command prompt, kita ingin sebuah kotak pesan muncul menanyakan apakah kita ingin menghidupkan kembali internet. Tapi di sinilah masalahnya, kita ingin menunggu untuk ya tetapi jika kita mengklik tidak, kita tidak ingin itu pergi jadi kita akan menggunakan pernyataan while untuk melakukan ini. Pertama kita perlu mendimensi variabel untuk kotak pesan sehingga kita dapat menetapkan variabel nomor. Aku tahu kedengarannya membingungkan tapi sebenarnya tidak. kita sudah melakukannya sekali dengan baris:set shellobj = CreateObject("WScript. Shell") yang ini bahkan lebih mudah untuk mengaturnya, kita cukup mengetik:Dim MyVarApa yang dilakukannya: Sekarang kita telah mengukur variabel bernama MyVarKetika Anda mendapatkan "ya /no" kotak pesan muncul di layar Anda dan Anda mengklik tombol itu memberikan nilai untuk setiap tombol, dalam hal ini "ya" adalah 1 dan "tidak" adalah 2. Kami ingin variabel untuk memulai dengan "tidak" Jadi kami menetapkan nomor 2 secara default, cara ini berhenti sampai tombol diklikUntuk melakukan ini kita ketik:myvar=2Apa yang dilakukannya: sekarang MyVar sama dengan 2, cara ini di baris berikutnya akan berhenti dan menunggu input. Sekarang kita hanya ingin itu duduk di sana dan menunggu sampai kita siap untuk menghidupkan kembali internet. Untuk melakukan ini kita ketik: while myvar=2Apa yang dilakukannya: Dengan melakukan ini kita telah memberitahu skrip bahwa selama nilai myvar =2 lalu terus perulangan kotak pesan sampai kita mendapatkan nilai selain 2, yang dalam hal ini hanya bisa 1Selanjutnya kita sebenarnya ingin membuat kotak pesan muncul dengan tombol ya/tidak. ini kita ketik:MyVar = MsgBox ("Aktifkan koneksi internet", 65, "Aktifkan Koneksi Internet")Apa yang dilakukannya: Sekarang variabel MyVar akan diberikan nilai apa pun yang ditetapkan ke tombol yang diklik pada kotak pesan. bagian pertama dalam tanda kutip adalah apa yang sebenarnya akan dikatakan oleh kotak pesan. 65 menunjuknya sebagai kotak pesan Ya/Tidak. dan bagian terakhir dalam tanda kutip adalah label dari kotak pesan. untuk memeriksa untuk melihat nilai apa yang diberikannya ketika Anda mengklik ya atau tidak, Anda dapat menambahkan baris yang mengatakan msgbox(myVar) dan itu akan mencetak nilai apa pun yang ditetapkan ke myvar di kotak pesan. Sekarang kita memiliki kotak pesan, kita perlu menutup pernyataan while. Segala sesuatu yang berada di antara buka dan tutup pernyataan while akan berjalan setiap kali Anda mengklik no, karena jika Anda mengklik no itu masih bernilai 2 dan mengulang kembali ke bagian pertama. untuk mengakhiri pernyataan while ketik: wendWhat it tidak: Setelah Anda mengakhiri pernyataan while itu akan bertindak sebagai loop sampai argumen tidak lagi terpenuhi. Jadi jika Anda terus menekan no, itu akan berulang tetapi begitu Anda menekan ya, itu akan terlepas dari loop dan melanjutkan dengan skrip. Simpan file tetapi tunggu untuk menjalankannya sampai langkah berikutnya. Kode Anda sejauh ini seharusnya: set shellobj = CreateObject("WScript. Shell")shellobj.run "cmd"wscript.sleep 200shellobj.sendkeys "k:\id.bmp{ enter}"wscript.sleep 200shellobj.sendkeys "ipconfig /release{enter}exit{enter}"Dim MyVarmyvar=2while myvar=2MyVar = MsgBox ("Aktifkan koneksi internet", 65, "Aktifkan Koneksi Internet")lalu

Langkah 10: Langkah 7: Mengaktifkan Kembali Internet

Sekarang seseorang akhirnya mengklik ya dan telah melewati pernyataan while, kita perlu guci di internet. Saya biasanya memunculkan konfirmasi sehingga pengguna akhir tahu apa yang sedang terjadi tetapi itu murni opsional. Untuk memunculkan konfirmasi ketik:msgbox("We now will Turn The Internet Connection back on!!!") Apa yang dilakukannya: ia mengirim kotak pesan yang mengatakan We now will Turn The Internet Connection back on!!! dan memberi Anda tombol ok untuk mengklik. Sekarang yang harus kita lakukan adalah menghidupkan kembali internet dan menutup semuanya. ketik:shellobj.run "cmd"wscript.sleep 200shellobj.sendkeys "ipconfig /renew{enter}"Apa yang dilakukannya: membalikkan perintah matikan dari sebelumnya dan memperbarui alamat IP Anda. Setelah Anda memperbarui alamat IP Anda, Anda sekarang bisa mendapatkan koneksi internet lagi. Sekarang yang harus kita lakukan adalah membersihkan jendela yang terbuka. Sekali lagi kita bisa menggunakan perintah sendkeys tetapi saya hanya akan menambahkan baris terakhir untuk melakukan pembersihan juga. Dalam hal ini saya akan menggunakan program taskkill untuk mematikan program yang menampilkan gambar. Dalam hal ini adalah jendela gambar dan penampil faks dan muncul sebagai rundll32.exe di tab proses dari pengelola tugas sehingga itulah yang perlu kita bunuh. Jika gambar Anda terbuka menggunakan program lain, seperti irfanview, atau acdsee, temukan nama yang digunakan di tab proses dan ganti rundll32.exe dengan nama yang Anda temukan. Perintahnya adalah: taskkill /F /IM rundll32.exeWhat it tidak: taskkill adalah nama program sakelar /F memerintahkannya untuk memaksa pembunuhan dan sakelar /IM memberi tahu itu nama gambarJadi sekarang kita menambahkannya ke baris terakhir, tambahkan enter untuk menjalankan perintah dan kemudian exit perintah dan enter lainnya dan terlihat seperti ini: shellobj.sendkeys "ipconfig /renew{enter}taskkill /F /IM rundll32.exe{enter}exit{enter}" Simpan file Anda.

Langkah 11: Produk Jadi

Jika semuanya berjalan dengan benar, produk jadi Anda akan terlihat seperti ini:set shellobj = CreateObject("WScript. Shell")shellobj.run "cmd"wscript.sleep 200shellobj.sendkeys "k:\id.bmp{enter}"wscript.sleep 200shellobj.sendkeys "ipconfig /release{enter}exit{enter}"Dim MyVarmyvar=2while myvar=2MyVar = MsgBox ("Aktifkan koneksi internet", 65, "Aktifkan Koneksi Internet") wendmsgbox("Kita akan Menghidupkan Internet Koneksi kembali!!!")shellobj.run "cmd"wscript.sleep 200shellobj.sendkeys "ipconfig /renew{enter}taskkill /F /IM rundll32.exe{enter}exit{enter}" _end of script_Sekarang pemrogramannya selesai, Anda dapat menjalankan program. Apa yang harus terjadi: 1.) Anda akan mendapatkan jendela CMD muncul untuk waktu yang sangat singkat kemudian tutup2.) Internet Anda seharusnya tidak lagi berfungsi. tetapi Anda tidak akan melihat ini3.) Gambar Anda akan terbuka.4.) Anda akan mendapatkan pop up yang menanyakan apakah Anda ingin mengaktifkan kembali internet.5.) Tidak peduli berapa kali Anda mengklik tidak, kotak pesan akan berbunyi Anda tetapi buka lagi menanyakan apakah Anda ingin menghidupkan kembali internet.6.) Setelah Anda mengklik ya, kotak pesan akan hilang dan jendela CMD akan muncul kembali7.) Setelah alamat IP diperbarui, jendela CMD dan gambar harus ditutup. Itu dia. VBscript yang sangat mudah untuk menghidupkan dan mematikan internet Anda. Harap Anda menyukainya. Saya sebenarnya membuat skrip lain yang hampir identik dengan skrip ini yang mematikan adaptor jaringan menggunakan program bernama DevCon, yang seperti manajer perangkat baris perintah. Bekerja sangat baik untuk. Script identik dengan yang ini kecuali di mana yang ini memiliki perintah untuk ipconfig yang memiliki perintah untuk DevCon.