怎樣使用ASP實現Ping (轉)
怎樣使用ASP實現Ping (轉)[@more@]
怎樣使用實現 This article presents a simple way to ping an address and get the results of the ping using ASP. The a
was supplied by Bart Silverstein.
First, a .BAT file needs to be created that will be run from the Active Server Page. Let's call this file
DoPing.BAT. It will contain only one statement, which will ping a passed in address. Here is the code
for DoPing.BAT:
ping -a %1 > d:Pubcgi-bin%2.txt
This will, if you can't tell, ping the address passed in as the first command line argument (%1), and
redirect the results to a text file named hy the second command line argument (%2). Now, let's look how we
would call this from an ASP file:
Set FileSys = Server.Create("Scripting.FileSystemObject")
FileName = FileSys.GetTempName
Set WSh = Server.CreateObject("WScript.Shell")
IP = "204.123.54.1" ' or whatever you want to ping
RetCode = WShShell.Run("d:Inetpubcgi-binDoPing.bat " & IP & " " & FileName, 1, True)
if RetCode = 0 Then
'There were no errors
else
Response.Redirect "PingErrors.htm"
end if
Set TextFile = FileSys.OpenTextFile("d:InetPubcgi-bin" & FileName & ".txt", 1)
TextBuffer = TextFile.ReadAll
For i = 1 to Len(TextBuffer)
If Mid(TextBuffer,i,1) = chr(13) Then
Response.Write("
")
else
Response.Write(Mid(TextBuffer,i,1))
end if
Next
TextFile.Close
FileSys.DeleteFile "d:Inetpubcgi-bin" & FileName & ".txt"
%>
Before you go hog wild and implement this code or use similar techniques on your site, there are a few
things you should be wary of. From a secutiry standpoint, this is really dangerous, for any time you let
someone run an application on your server there is always the potential that it will come back to haunt
you. One suggestion to lessen the threat: make a separate folder with no script or execute priviledges,
and have your DoPing.bat output its results to that folder.
I hope this article was informative an interesting. Happy Programming!
怎樣使用實現 This article presents a simple way to ping an address and get the results of the ping using ASP. The a
was supplied by Bart Silverstein.
First, a .BAT file needs to be created that will be run from the Active Server Page. Let's call this file
DoPing.BAT. It will contain only one statement, which will ping a passed in address. Here is the code
for DoPing.BAT:
ping -a %1 > d:Pubcgi-bin%2.txt
This will, if you can't tell, ping the address passed in as the first command line argument (%1), and
redirect the results to a text file named hy the second command line argument (%2). Now, let's look how we
would call this from an ASP file:
Set FileSys = Server.Create("Scripting.FileSystemObject")
FileName = FileSys.GetTempName
Set WSh = Server.CreateObject("WScript.Shell")
IP = "204.123.54.1" ' or whatever you want to ping
RetCode = WShShell.Run("d:Inetpubcgi-binDoPing.bat " & IP & " " & FileName, 1, True)
if RetCode = 0 Then
'There were no errors
else
Response.Redirect "PingErrors.htm"
end if
Set TextFile = FileSys.OpenTextFile("d:InetPubcgi-bin" & FileName & ".txt", 1)
TextBuffer = TextFile.ReadAll
For i = 1 to Len(TextBuffer)
If Mid(TextBuffer,i,1) = chr(13) Then
Response.Write("
")
else
Response.Write(Mid(TextBuffer,i,1))
end if
Next
TextFile.Close
FileSys.DeleteFile "d:Inetpubcgi-bin" & FileName & ".txt"
%>
Before you go hog wild and implement this code or use similar techniques on your site, there are a few
things you should be wary of. From a secutiry standpoint, this is really dangerous, for any time you let
someone run an application on your server there is always the potential that it will come back to haunt
you. One suggestion to lessen the threat: make a separate folder with no script or execute priviledges,
and have your DoPing.bat output its results to that folder.
I hope this article was informative an interesting. Happy Programming!
來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/10752043/viewspace-988719/,如需轉載,請註明出處,否則將追究法律責任。
相關文章
- Asp.net編寫的PING工具 (轉)ASP.NET
- vc實現ping
- win10怎麼ping ip地址_win10怎樣ping本機ip地址Win10
- Asp.Net2.0實現自定義樣式ASP.NET
- windows下ping程式使用C語言實現WindowsC語言
- QT實現ping功能QT
- epoll實現快速ping
- ASP實現多語言支援 (轉)
- ASP智慧搜尋的實現 (轉)
- 用ASP實現電子賀卡 (轉)
- asp實現批次錄入資料的實現 (轉)
- ASP實現語音分時問候 (轉)
- Python實現ping指定IPPython
- 怎樣在遊戲設計製作中實現指令碼控制(轉)遊戲設計指令碼
- 用ASP實現論壇的UBB功能 (轉)
- 【asp.net core 系列】- 11 Service層的實現樣板ASP.NET
- 怎麼實現像這樣草稿功能
- jivejdon是怎樣實現login的
- 怎麼利用PHP去ping一個地址 (轉)PHP
- 在Oracle中怎樣才能使用索引(轉)Oracle索引
- 怎樣在PB中實現檔案的複製與刪除 (轉)
- 向高手請教?怎樣實現這樣的DAO模式模式
- ASP + Serv-u 實現FTP的程式碼 (轉)FTP
- 怎樣發現專案的真正價值(轉)
- 怎樣用Nacos實現Raft演算法Raft演算法
- 怎樣實現填報表定時提交
- 幻影成像的實現原理是怎樣的?
- 請教:oscache中怎麼樣實現更新
- 如何設定讓Win10可以ping通_怎樣讓win10系統可以ping通Win10
- 《怎樣實現通過shell指令碼將使用者踢出系統》指令碼
- 技術債! 怎樣簡潔高效的實現多個 Enum 自由轉換
- 怎樣在C++Builder中建立使用DLL (轉)UI
- Windows7/10實現ICMP(ping命令)Windows
- Asp.Net Mvc使用Autofac實現依賴注入ASP.NETMVC依賴注入
- 使用asp.net FtpWebRequest 實現FTP常用功能ASP.NETFTPWeb
- 使用 Ninject and ASP.Net Web API 實現Domain EventsASP.NETWebAPIAI
- 在ASP.NET裡輕鬆實現縮圖 (轉)ASP.NET
- ping原始碼(轉)原始碼