求 根据IP找机器名 的源代码

谢谢了

解决方案 »

  1.   

    Private Sub Command1_Click()
        Shell "cmd.exe /C ping /a 172.16.1.13 >C:\a.txt"
    End Sub//注意 参数 a 必须小写
    //后续处理就是从文本文件中读取的事情了，呵呵
      

  2.   

    记得把ping -a 192.168.0.1>c:\a.txt
    这段命令行放到bat文件中,然后再shell这个bat文件,不然是没法得到正确结果的
      

  3.   

    ping -a 192.168.0.1
    这是什么意思啊？
      

  4.   

    对  boydgmx(梦霄) 一点补充：
    shell执行后，最好不要立即访问TXT文件要先判断：
    do while 文件不存在
        doevent
    loop判断文件是否存在，可先以读方式打开该文件，返回错误就说明不存在
      

  5.   

    shell在VB中是什么东东啊,有什么作用吗?我是VB初学者,请指教~~~!
      

  6.   

    利用Winsock控件
    winsock.host="IP"
    winsock.port=80
    winsock.connect
    debug.pring.winsock.hostname
      

  7.   

    不好意思！
    上面最后一句应该是：debug.pring winsock.hostname
      

  8.   

    不好意思，还是写错了
    Debug.Print winsock.hostname
      

  9.   

    faint，winsock当然可以了，不过要加入一个控件，不觉得太浪费了吗？？