Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan
Etiketler
Yazar: gitarc - Cevaplar: 1 - İzleme: 3012
VB6 ile Ping atmak.
[vb]Option Explicit

Const SOCKET_ERROR = 0
Const MAX_IP = 10

Private Type WSAdata
wVersion As Integer
wHighVersion As Integer
szDescription(0 To 255) As Byte
szSystemStatus(0 To 128) As Byte
iMaxSockets As Integer
iMaxUdpDg As Integer
lpVendorInfo As Long
End Type

Private Type Hostent
h_name As Long
h_aliases As Long
h_addrtype As Integer
h_length As Integer
h_addr_list As Long
End Type

Private Type IP_OPTION_INFORMATION
TTL As Byte
Tos As Byte
Flags As Byte
Option
Yazar: accessman - Cevaplar: 3 - İzleme: 2677
ping atmak
Kod:
Sub Test()
    Shell "cmd /C" & "ping www.msdn.com"
End Sub
Sub Test2()
    Shell "cmd /C" & "ping 207.46.130.108"
End Sub
Sub Test3()
    Shell "command.com /c ping www.msdn.com", 1
End Sub
Sub Test4()
    Shell "command.com /c ping 207.46.130.108", 1
End Sub
Private Sub CommandButton1_Click()
    Shell "command.com /c ping " & TextBox1.Text, 1
End Sub
Yazar: chevy - Cevaplar: 3 - İzleme: 2668
Ping Uygulaması
Access veri tabanından TextBox a bir IP adresi çekiyorum. Bu IP adresine ping çekip sonuçları yine aynı formda bir TEXTBOX ekranında (CMD ekranında değil) görmek istiyorum. Eğer ping başarılı ise HAT VAR değil ise HAT YOK mesajı yazsın. Tüm işlemler bittiğinde de yeni bir sorgulama yapmak için TEMIZLE ve ping işlemini durdurmak için DURDUR butonu gerekli...

Şu kodlarla işlemi ve mesajları hallettim ancak sonuç ekranı ver durdurma işini CMD olmadan halledemedim.

Private Sub Button2_Click(B
Yazar: cazcaz678 - Cevaplar: 2 - İzleme: 921
Sorguda Sql İle Ping Attırmak
Tablomda kayıtlı IP numaralarına modül üzerinden ping attırabiliyorum.

Bunu direk sorgudan yapabilir miyiz. Sorguya yazdığımız Sql kod ile yada formdan değil de direk sorgudan modül çağırılabilir mi?
Yazar: tamer duran - Cevaplar: 11 - İzleme: 1765
Ping Atma
Merhaba iyi akşamlar.Hazırladığım tablomda kayıtlı güvenlik kameralarından formda,  yön tuşları ile yada sorgu neticesi ekrana getirdiğim kamera ip adresine buton yardımı ile ping atmak istiyorum.İncelendiğinde görüleceği üzere tek butona tek ip yazarsam sonuç alıyorum ama 500-600 kamera için çok yer lazım. Bu konuda bana yardım ederseniz sevinirim. İlginiz için şimdiden teşekkür ederim.
Task