Pertama buat program PING dahulu
Buka notepad isikan
@echo off
cls
@echo pinging google
ping google.com -t
kemudian save dengan tipe (.bat) misal pinging.bat
Buat vbscript untuk menjalankan file .bat, buka lagi notepad isikan
set Wshell = CreateObject("WScript.shell")
Wshell.Run chr(34) & "pinging.bat" & Chr(34), 0
Set WshShell = Nothing
Simpan dengan tipe (.vbs) misal hidden.vbs
Cara penggunaannya tinggal double klik / jalankan file hidden.vbs
Untuk mengecek apakah ping sudah berjalan bisa menambahkan perintah >> fileping.txt pada pinging.bat untuk menyimpan hasil ping.
@echo off
cls
@echo pinging google
ping google.com -t >> fileping.txt
Contoh bisa di download disini(Dropbox)
No comments:
Post a Comment
Silahkan