rafe: Just use vbs. Change Server.CreateObject to CreateObject.

Instead of Response.Write use STDOOUT like so:

dim stdOut, oFS
Set oFS = CreateObject("Scripting.FileSystemObject")
set stdOut = oFS.GetStandardStream(1)

stdOut.write "Writing to the console"

run the program from a command line:

cscript <whatever>.vbs

You should be able to copy and past the ASP code write to VBS.