|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了,怎样在ASP中完成PING
利用WSH挪用体系的Ping命令,将Ping的了局重定向到一个文本文件中往,再把文本文件显现到网页中
详细做法以下:
起首,建一个.BAT文件(比方:myPing.BAT:),这个文件要在ASP中挪用,文件代码以下:
ping-a%1>d:INetPubcgi-bin\%2.txt
(%1)是未来要ping的地点,(%2)是存储ping了局的文件.以下是ASP的代码:
<%
SetFileSys=Server.CreateObject("Scripting.FileSystemObject")
FileName=FileSys.GetTempName
SetWShShell=Server.CreateObject("WScript.Shell")
IP="xxx.xxx.xxx.xxx"’你要ping的地点
RetCode=WShShell.Run("d:Inetpubcgi-binmyPing.bat"&IP&""&FileName,1,True)
ifRetCode=0Then
’没有毛病
else
Response.Redirect"PingErrors.htm"
endif
SetTextFile=FileSys.OpenTextFile("d:InetPubcgi-bin"&FileName&".txt",1)
TextBuffer=TextFile.ReadAll
Fori=1toLen(TextBuffer)
IfMid(TextBuffer,i,1)=chr(13)Then
Response.Write("
")
else
Response.Write(Mid(TextBuffer,i,1))
endif
Next
TextFile.Close
FileSys.DeleteFile"d:Inetpubcgi-bin"&FileName&".txt"
%>
ASP脚本是采用明文(plaintext)方式来编写的。 |
|