Бывают ситуации, когда на ASP страницу нужно вставить результат работы exe-файла. Типичный пример - включить результат работы CGI-скрипта. Выход из ситуации - использование Windows Scripting Host версии 5.6 или выше. Скачать последнюю версию WSH можно с сайта http://msdn.microsoft.com.
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 &#038; " " &#038; qu)
else
Set oExec = WshShell.Exec(path)
end if 

inp = "" 

'читаем из стандартного вывода
Do While Not oExec.StdOut.AtEndOfStream
inp = inp &#038; oExec.StdOut.Read(1)
Loop 

Set WshShell = Nothing 

'вывод результата на страницу 

Response.Write inp 

%>



Постоянные ссылки

При копировании ссылка на TeaM RSN обязательна!

URI

Html (ЖЖ)

BB-код (Для форумов)

Оставить комментарий

Вы должны войти, чтобы оставить комментарий.