Бывают ситуации, когда на 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 & " " & 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
%>
О сайте
Постоянные ссылки
При копировании ссылка на TeaM RSN обязательна!
Оставить комментарий
Вы должны войти, чтобы оставить комментарий.