Cara membaca isi file teks dengan VBScript

Gunakan VBScript untuk membuka dan membaca file teks.

Langkah 1

Jalankan Notepad dan buat file teks. Tulis pesan berikut di file teks:

Jika Anda menerima pesan ini, Anda telah berhasil menyelesaikan penjadwalan tugas ini.

Langkah 2

Simpan file yang baru saja Anda buat di folder "C: \ Temp" pada hard drive Anda dan masukkan nama "TextToRead.txt".

Langkah 3

Buat dokumen teks baru kedua di Notepad.

Langkah 4

Salin dan sisipkan kode berikut ke dalam file yang Anda buat di langkah sebelumnya:

Opsi Eksplisit

Const conForReading = 1

'Deklarasikan variabel Dim objFSO, objReadFile, isi

'Set Objects Set objFSO = CreateObject ("Scripting.FileSystemObject") Atur objReadFile = objFSO.OpenTextFile ("C: \ Temp \ TextToRead.txt", 1, Salah)

'Baca isi isi file = objReadFile.ReadAll

'Tutup file objReadFile.close

'Tampilkan hasil isi wscript.echo

'Bersihkan objek Set objFSO = Tidak Ada Set objReadFile = Tidak Ada

'Keluar dari skrip WScript.Quit ()

Langkah 5

Klik "File" di toolbar Notepad dan pilih "Save" di menu konteks. Simpan file dengan kode VBScript Anda sebagai "C: \ Temp \ ReadTextFile.vbs" dan kemudian keluar dari Notepad.

Langkah 6

Jalankan VBScript Anda dengan mengakses folder "C: \ Temp" pada hard drive Anda dan klik dua kali pada file "ReadTextFile.vbs". Pesan yang Anda tulis dalam file teks di langkah 1 akan muncul di jendela pop-up kecil, yang mengonfirmasi bahwa program VBScript Anda telah berhasil membuka dan membaca file tersebut. Klik "OK".