Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
<%
Option Explicit
Dim WshShell, pngExec, strComputer
Set WshShell = Server.CreateObject("wscript.shell")
strComputer = "localhost"
'Ping Computer
set pngExec = WshShell.exec("ping -n 4 " & strComputer)
Response.Write "<pre>"
do until pngExec.StdOut.AtEndOfStream
Response.Write pngExec.StdOut.Read(1)
Response.Flush
loop
Response.Write "</pre>"
%>
<%
Option Explicit
Dim WshShell, pngExec
Set WshShell = Server.CreateObject("wscript.shell")
set pngExec = WshShell.exec("C:\Perl\perl.exe C:\myPerlFiles\perl1.pl")
Response.Write "<pre>"
do until pngExec.StdOut.AtEndOfStream
Response.Write pngExec.StdOut.Read(1)
Response.Flush
loop
Response.Write "</pre>"
%>