l' input te lo do, ma non chiedermi di + perchè conosco pochissimo vbs
(non uso linguaggi proprietari e mal digerisco quella sintassi), cmq sicuramente passerà di qui qualcuno che ti potrà dare un aiuto maggiore

es x leggere e stampare a video il contenuto di un file di testo
codice:
<script language="VBScript">
<!--
  Set fso = CreateObject("Scripting.FileSystemObject")
  file="c:/file_da_leggere.txt"
  if fso.FileExists (file)then
    Set OggFile = fso.GetFile (file)
    Set OggTextStream1 = OggFile.OpenAsTextStream(1)
      Do While Not OggTextStream1.AtEndOfStream
        stringa = OggTextStream1.ReadLine
        document.write stringa & "
"
      loop
    OggTextStream1.Close
  else document.write "non trovo il file"
  end if
//-->
</script>