How to read a file in VB script

Question

The following code is a vb script that converts text from user input into speech. I want text to be obtained from a txt file.

Dim msg, sapi
msg=InputBox("Hello", "hello")
Set sapi =CreateObject("sapi.spvoice")
sapi.Speak msg

possible duplicate of [Read and write into a file using VBScript](http://stackoverflow.com/questions/1142678/read-and-write-into-a-file-using-vbscript) — Ken White, Jul 16 '13 at 14:35

aphoria · Accepted Answer · 2013-07-16T17:03:51.360

5

Const ForReading = 1
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Dim f
Set f = fso.OpenTextFile("c:\MyTextFile.txt", ForReading)
Dim text
text = f.ReadAll
f.Close

edited Jul 16 '13 at 17:03

answered Jul 16 '13 at 14:33

aphoria

19,796
7
64
73

1

please close the file. – Ekkehard.Horner Jul 16 '13 at 15:09
I agree with Ekkehard.Horner. If you don't want to deal with closing open files, read the file like this: `Dim text : text = fso.OpenTextFile("C:\path\to\your.txt").ReadAll`. – Ansgar Wiechers Jul 16 '13 at 16:29

How to read a file in VB script

1 Answers1