Удаленный запуск приложений и включение результатов их работы на ASP страницу:
Бывают ситуации, когда на ASP страницу нужно вставить результат работы exe-файла. Типичный пример — включить результат работы CGI-скрипта. Выход из ситуации — использование Windows Scripting Host версии 5.6 или выше. Скачать последнюю версию WSH можно с сайта http://msdn.microsoft.com.
ASP-скрипт, который решает данную задачу:
< %@ Language=VBScript%>
< %option explicit%>
< %Response.Expires = 0%>
< %
Dim WshShell, oExec, inp, path, qu
'воспольз. для примера командой ping
path = "ping.exe"
qu = "127.0.0.1"
Set WshShell = Server.CreateObject("WScript.Shell")
if qu < > «» then
Set oExec = WshShell.Exec(path & » » & qu)
else
Set oExec = WshShell.Exec(path)
end if
inp = «»
‘читаем из стандартного вывода
Do While Not oExec.StdOut.AtEndOfStream
inp = inp & oExec.StdOut.Read(1)
Loop
Set WshShell = Nothing
‘вывод результата на страницу
Response.Write inp
%>