Forum
Aktif konular
Üyeler
Kurallar
Arama
Asp İle Ping Atma Asp İle Ping Atma
-
Asp ile bir IP numarasına ping atma örneği. Ayrıca asp ile .bat dosyasının nasıl çalıştırıldığını da görebilirsiniz.
ping.bat dosyasının kodları :
-------------------------
ping -a %1 > C:\Inetpub\wwwroot\%2.txt
-------------------------
asp sayfasını kodları :
-------------
Set FileSys = Server.CreateObject("Scripting.FileSystemObject")
FileName = FileSys.GetTempName
Set WShShell = Server.CreateObject("WScript.Shell")
IP = "127.0.0.1" 'ping atılacak ip
RetCode = WShShell.Run("C:\Inetpub\wwwroot\ping.bat " & IP & " " & FileName, 1, True) '
If RetCode = 0 Then
'hatasız
Else
Response.Write "Hata Oluştu :S :)"
End If
Set TextFile = FileSys.OpenTextFile("C:\Inetpub\wwwroot\" & FileName & ".txt", 1)
TextBuffer = TextFile.ReadAll
For i = 1 to Len(TextBuffer)
If Mid(TextBuffer,i,1) = chr(13) Then
Response.Write("<br>")
Else
Response.Write(Mid(TextBuffer,i,1))
End If
Next
TextFile.Close
FileSys.DeleteFile "C:\Inetpub\wwwroot\" & FileName & ".txt"
----------------------- -
IIS 6 ile birlikte, parametreli executable file calıştırma işlemi Microsoft iptal edilmiştir,
yani bu çalışmaz hocam :)
Mevcut işletim sistemleri ve programlarla, bu işlemi ancak mssql in xp_cmdshell stored proceduresi ile yapabilrisin, fakat bu da system accountunda çalışır...
Kısayol
Şikayet
Özel Mesaj
Alıntı yap
Cevapla