duke65
 
duke65
barisbilgiteknolojileri.com

Editör Adayı

Yaş,29
Bay
Mobese ve İp Kamera Uzmanı
Van
27 Aralık 2007
28 Ocak 2017
16 Puan
11 Mesaj

Asp ile Ping Atmak

Merhabalar Elimde bir proje online görüntü izleme var bunu kendi kullandığımız firmalara tahsis ediyoruz bu yazılımda bir sürü kamera ekliyoruz tek tek cmd ile ping yazıp uğraşmaktansa listelenen kameralarda listenin bir tarafına ping komutu bırakmak istiyorum

örnek olarak

s.n       kamera adı     ip                   ping
1          kamera 1      192.168.1.1     ping at
2          kamera 2      192.168.1.2     ping at

ping at tıkladıdğım zaman direk cmd ile o ip adresini ping etsin


şimdiden teşekkürler

Ataberk
 
Ataberk
webhocam.com

Administrator

Yaş,30
Bay
Bilişim Uzmanı
İstanbul
20 Temmuz 2004
23 Mayıs 2016
28 Puan
1067 Mesaj

Selam Duke65


Kod Alanı:

  <%


    Dim objShell
    Dim strCmd
    set objShell = CreateObject("wscript.Shell" )
    'objShell.Run cmdline,1,False

    strCmd = "%COMSPEC% /c ping -n " & strSeconds & " 192.168.1.1>nul"     
    objShell.Run strCmd,0,1


%>


Bu şekilde ping atabilirsin sonuç ekrana yazacaktır , ama CMD exe ye everyone yetkisi vermelisin sunucu üzerinden.

iyi çalışmalar dilerim

duke65
 
duke65
barisbilgiteknolojileri.com

Editör Adayı

Yaş,29
Bay
Mobese ve İp Kamera Uzmanı
Van
27 Aralık 2007
28 Ocak 2017
16 Puan
11 Mesaj

Ataberk Hocam Değerli Vaktini Ayırıp İlgilendiğin için Yazdığın için çok teşekkür ederim ellerine sağlık

hocam linkini oluşturamadım, bu komutla onu nasıl yapabilirim acaba ?

Ataberk
 
Ataberk
webhocam.com

Administrator

Yaş,30
Bay
Bilişim Uzmanı
İstanbul
20 Temmuz 2004
23 Mayıs 2016
28 Puan
1067 Mesaj

Rica ederim nasıl link oluşturmak istiyorsun biraz detay verebilirmisin

duke65
 
duke65
barisbilgiteknolojileri.com

Editör Adayı

Yaş,29
Bay
Mobese ve İp Kamera Uzmanı
Van
27 Aralık 2007
28 Ocak 2017
16 Puan
11 Mesaj

1          kamera 1      192.168.1.1     ping at

<a href="http://162.168.1.1">ping at </a>

yukarıda yazdığım ping at butonunu tıkladığım zaman cmd açılsın ordaki ip yani 192.168.1.1 ping edilsin

Ataberk
 
Ataberk
webhocam.com

Administrator

Yaş,30
Bay
Bilişim Uzmanı
İstanbul
20 Temmuz 2004
23 Mayıs 2016
28 Puan
1067 Mesaj

Sayfa adı : 1.asp

<a href="http://localhost/ping.asp?pingip=192.168.1.1">ping at </a>

Sayfa adı : ping.asp


Kod Alanı:

<%


pingip = Request("pingip" )

if pingip="" Then
response.write "Ping atacağınız ip adresi boş"
response.end
END IF

Dim objShell

    Dim strCmd

    set objShell = CreateObject("wscript.Shell" )

    'objShell.Run cmdline,1,False



    strCmd = "%COMSPEC% /c ping -n " & strSeconds & " "&pingip&">nul"     

    objShell.Run strCmd,0,1

%>

duke65
 
duke65
barisbilgiteknolojileri.com

Editör Adayı

Yaş,29
Bay
Mobese ve İp Kamera Uzmanı
Van
27 Aralık 2007
28 Ocak 2017
16 Puan
11 Mesaj

Teşekkürler Hocam bunun yaptım fakat herhangi bi sayfa açılmadı benim demek istediğim ping atınca cmd açılsın istediğim ip adresin ping edilsin bu kodlar işlem yapmıyor direk boş sayfada kalıyor

duke65
 
duke65
barisbilgiteknolojileri.com

Editör Adayı

Yaş,29
Bay
Mobese ve İp Kamera Uzmanı
Van
27 Aralık 2007
28 Ocak 2017
16 Puan
11 Mesaj

hocam bi fikriniz var mı konu ile ilgili olarak

Üyelik Giriş

Online Durum

Webhocam'da şu anda toplam 6616 kişi online , bugüne kadar en çok 44931 kişi 11/03/2017 tarihinde ziyaret etti. Üyelerimiz toplam 147536 mesaj attılar. Toplamda 137809 adet kayıtlı kullanıcımız bulunmaktadır.