RosettaCodeData/Task/Read-entire-file/VBScript/read-entire-file-1.vb

4 lines
104 B
VB.net
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
dim s
s = createobject("scripting.filesystemobject").opentextfile("slurp.vbs",1).readall
wscript.echo s