Бывают ситуации, когда на ASP страницу нужно вставить результат работы exe-файла. Типичный пример - включить результат работы CGI-скрипта. Выход из ситуации - использование Windows Scripting Host версии 5.6 или выше. Скачать последнюю версию WSH можно с сайта http://msdn.microsoft.com.
ASP-скрипт, который решает данную задачу:
HTML
Текст
- Бывают ситуации, когда на 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 обязательна!
Оставить комментарий
Вы должны войти, чтобы оставить комментарий.