Foxtable(狐表)用户栏目专家坐堂 → [求助] 局域网内如何通过计算机名字链接


  共有2422人关注过本帖树形打印复制链接

主题:[求助] 局域网内如何通过计算机名字链接

帅哥哟,离线,有人找我吗?
15986720145
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:146 积分:1243 威望:0 精华:0 注册:2015/8/7 16:22:00
[求助] 局域网内如何通过计算机名字链接  发帖心情 Post By:2015/10/17 16:45:00 [只看该作者]

程序放在局域网内的某台电脑上,当IP地址发生变化后,用原来设置好的IP就无法连接了。

如何通过 计算机名字 连接局域网内的电脑?帮助中,没有通过计算机名字得到IP地址的例子。
'以下代码放在PC终端,用于打开已经共享的电脑上(IPInput参数为目标PC的局域网地址)的指定程序
Dim Proc As New Process
Proc.File = "\\" & IPInput & "\测试\测试.Table"  'IPInput参数为目标PC的局域网地址
If NetWork.Ping(IPInput) Then
    Proc.Start()
    Forms("Linking").Close()
    Syscmd.Project.Exit(True)
Else
    MessageBox.Show("目标主机没有开机,或网络不通!", "警告",MessageBoxButtons.OK,MessageBoxIcon.Warning)
End If
[此贴子已经被作者于2015/10/17 17:52:24编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
15986720145
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:146 积分:1243 威望:0 精华:0 注册:2015/8/7 16:22:00
  发帖心情 Post By:2015/10/17 17:07:00 [只看该作者]

经过测试,ping命令在局域网内可以直接ping(计算机名)

Dim Proc As New Process
Proc.File = "\\" & 计算机名 & "\测试\测试.Table"  
Proc.Start()

通过测试,OK! 基本解决!

 回到顶部