Why does this VBScript give me an error

vbscript

I saved this VBScript script to my local machine as c:\test.vbs:

WScript.StdOut.WriteLine "This is a test"

When I run it from the command line, I get this error:

---------------------------
Windows Script Host
---------------------------
Script: C:\test.vbs
Line:   1
Char:   1
Error:  The handle is invalid. 
Code:   80070006
Source:     (null)

---------------------------
OK   
---------------------------

I get this under Windows Vista (SP1) and Windows XP Pro (SP3).

Best Answer

This link may help you:

http://www.tech-archive.net/Archive/Scripting/microsoft.public.scripting.vbscript/2004-07/0979.html

It appears that the handle StdOut is only available when using a console host (cscript.exe) and not a windowed host (wscript.exe). If you want the code to work, you have to use cscript.exe to run it.

The post also describes how to change default behavior to run scripts with cscript and not wscript.

Related Solutions

VBScript Invalid Character 800A0408 compilation error

A possible problem is how your file was encoded; try to save it as ANSI and run it again.

Vbscript error 800A004C

This line in your script is incorrect:

Set MyFile = fso.CreateTextFile("objFolderItem.Path & OSCPATH\listfile.txt", True)

To insert variables and object properties into a string, you need to concatenate them using the & operator, like this:

Set MyFile = fso.CreateTextFile(objFolderItem.Path & OSCPATH & "\listfile.txt", True)

Note that it is recommended to use the BuildPath method to combine multiple parts of the path, as it frees you from adding the necessary path separators (\) manually:

strFileName = fso.BuildPath(objFolderItem.Path, OSCPATH)
strFileName = fso.BuildPath(strFileName, "listfile.txt")

Set MyFile = fso.CreateTextFile(strFileName, True)

Best Answer

Related Solutions

VBScript Invalid Character 800A0408 compilation error

Vbscript error 800A004C

Related Topic