GVKun编程网logo

怎么搜索局域网中的电脑（怎么搜索局域网中的电脑文件）

1

如果您对怎么搜索局域网中的电脑和怎么搜索局域网中的电脑文件感兴趣，那么这篇文章一定是您不可错过的。我们将详细讲解怎么搜索局域网中的电脑的各种细节，并对怎么搜索局域网中的电脑文件进行深入的分析，此外还有

如果您对怎么搜索局域网中的电脑和怎么搜索局域网中的电脑文件感兴趣，那么这篇文章一定是您不可错过的。我们将详细讲解怎么搜索局域网中的电脑的各种细节，并对怎么搜索局域网中的电脑文件进行深入的分析，此外还有关于everything怎么搜索局域网共享文件、ping不通局域网内的电脑怎么办？、VB.Net程序设计：多线程处理，搜索局域网的计算机、Win10专业版在局域网中搜索不到打印机的实用技巧。

本文目录一览：

怎么搜索局域网中的电脑（怎么搜索局域网中的电脑文件）

怎么搜索局域网中的电脑（怎么搜索局域网中的电脑文件）

　　在使用局域网的时候，很多人不知道怎么搜索局域网中的电脑。学习啦小编为大家整理了相关内容，供大家参考阅读!

　　搜索局域网中电脑的方法

　　1. 检查此电脑的网络连接。确保此电脑可以连接到局域网。

　　2. 查看此电脑与网络打印机或局域网其他电脑是否是在同一工作组。

　　开始菜单右键点击;计算机”，选择;属性”;

怎么搜索局域网中的电脑

　　点击;高级系统设置”;

怎么搜索局域网中的电脑

　　选择左上角的;计算机名”里面右下角的;更改”;

怎么搜索局域网中的电脑

　　在更改里面就可以查看及更改计算机名和域，把工作组修改为你的局域在的工作组，重启后，再进行一下操作。

怎么搜索局域网中的电脑

　　3. 检查Netbios设置是否启用。

　　4. 启用网络发现功能。点击;开始”，然后打开;控制面板”，如下图：

怎么搜索局域网中的电脑

　　打开控制面板后在查看方式里选择;类别”，如下图:

怎么搜索局域网中的电脑

　　之后选择;网络和Internet”，如下图：

怎么搜索局域网中的电脑

　　然后选择;网络和共享中心”，如下图

怎么搜索局域网中的电脑

　　点击;更改高级共享设置”，如下图：

怎么搜索局域网中的电脑

　　选择;启用网络发现”然后点击;保存修改”即可，如下图

怎么搜索局域网中的电脑

　　11如果问题还没有解决，请继续往下....

　　5. 关闭防护软件及Windows防火墙

　　6. 检查以下和网络相关服务是否开启。

　　Computer BrowserNetwork ConnectionsNetwork List ServiceServerTCP/IP NetBIOS Helper

everything怎么搜索局域网共享文件

everything怎么搜索局域网共享文件

电脑使用时间长了，难免积累过多的文件和文件夹，想找的时候需要花费很多的时间，不妨试试everything。everything是一款功能强大的文件搜索软件，搜索速度快，还能搜索电脑共享后的文件夹内容。那么everything怎么搜索局域网共享文件？方法不是很难，下面就来一起看看吧。方法/步骤打开everything软件，点击工具→选项 ，或者按快捷键ctrl+p。

everything怎么搜索局域网共享文件

弹出的窗口上，左侧单击文件夹，右侧单击添加。

everything怎么搜索局域网共享文件

在浏览文件夹窗口里，选择网络，这时会有点卡顿，可能会有2-3分钟，才会显示局域网内的电脑。

everything怎么搜索局域网共享文件

选择经常要搜索的共享文件夹，这里我选择XS电脑共享的linshi文件夹，选择完成后，点击下方确定。

everything怎么搜索局域网共享文件

继续点击选项窗口的确定，退出选项设置窗口。

everything怎么搜索局域网共享文件

在everything主界面的搜索框里，先输入两个反斜杠\，这时就会只搜索共享里的内容了。

everything怎么搜索局域网共享文件

以上就是everything怎么搜索局域网共享文件的详细内容，更多请关注php中文网其它相关文章！

ping不通局域网内的电脑怎么办？

ping不通局域网内的电脑怎么办？

Ping是一个非常常用的命令，一般用来检查是否可以通过网络和其他电脑或服务器通信。有时会遇到无法与局域网内其他电脑ping通的情况，这是怎么回事呢？

操作过程：

1、首先要确保各设备软硬件正常工作，如电脑都可以正常连接互联网，如果没有外网可以检查是否与本机IP：127.0.0.1通信：

2、之后在无法ping通的对方的电脑上的控制面板中打开“windows defender 防火墙”：

3、打开左侧的“高级设置”：

4、在“入站规则”中找到“文件和打印机共享（回显请求-ICMPv4-ln）”，并鼠标单击右键该项，选择“启用规则”：

VB.Net程序设计：多线程处理，搜索局域网的计算机

VB.Net程序设计：多线程处理，搜索局域网的计算机

VB.Net程序设计：多线程处理。

最近要用到多线程程序，来处理一些数据。
在网上找了许多文章。现在会用多线程处理数据了，感觉程序灵活性增强了。
VB.Net-C#多线程Thread-代理委托delegate编程

搜索局域网的计算机

源代码下载地址：http://download.csdn.net/source/1159770


界面：

http://album.hi.csdn.net/app_uploads/linjimu/20090106/162454028.png

1.使用：多线程Thread-代理委托delegate编程来处理。

代码：

Imports System.Net
Imports System.Threading
Public Class FrmlanPC
    Private LanHost As String(,)
    Private thread As Thread()
    Private LocalIPStr As String
    Private Delegate Sub SetTextDelegate(ByVal txt As String)
    Private Delegate Sub SetListViewDelegate(ByVal lv As ListViewItem)
    Private Event FList()
    Private Sub InitLanHost()
        LanHost = New String(254,1) {}
        For i As Integer = 0 To 254
            LanHost(i,0) = ""
            LanHost(i,1) = ""
        Next
    End Sub
    Private Sub SetTextFunc(ByVal str As String)
        Me.TextBox1.Text = str
    End Sub
    Private Sub AddLvFunc(ByVal lv As ListViewItem)
        Me.ListView1.Items.Add(lv)
    End Sub
    'listview1 显示搜索主机 
    Private Sub ListLanHost()
        Dim SetTxtInst As New SetTextDelegate(AddressOf SetTextFunc)
        Me.TextBox1.Invoke(SetTxtInst,LanHost.GetLength(0).ToString)
        Dim AddLvInst As New SetListViewDelegate(AddressOf AddLvFunc)
        Dim lv As ListViewItem
        For i As Integer = 0 To 254
            If LanHost(i,0) <> "" Then
                lv = New ListViewItem()
                lv.Text = LanHost(i,1)
                lv.SubItems.Add(LanHost(i,0))
                ListView1.Invoke(AddLvInst,lv)
            End If
        Next
    End Sub
    Private Sub FrmlanPC_Load(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles MyBase.Load
        InitLanHost()
        '开始就注册事件
        'AddHandler Me.FList,AddressOf Me.listLanHost
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
        Me.ListView1.Items.Clear()
        Dim th As Thread = New Thread(AddressOf LanSearch)
        th.IsBackground = False
        th.Name = "SearchLanPC"
        th.Start()
        '用下面的语句。要等th执行完毕后才显示。不好。
        'th.Join()
        '这样。就可以在线程运行完毕后，就更新控件数据。
        If th.ThreadState = ThreadState.Stopped Then
            listLanHost()
        End If
    End Sub
    Private Sub LanSearch()
        thread = New Thread(254) {}
        Dim localhost As String = (Dns.GetHostEntry(Dns.GetHostName())).AddressList(0).ToString()
        '本地主机IP地址 
        LocalIPStr = localhost.Substring(0,localhost.LastIndexOf("."))
        Dim threadMethod As ThreadStart
        For i As Integer = 0 To 254
            '建立255个线程扫描IP 
            threadMethod = New ThreadStart(AddressOf LanSearchThreadMethod)
            thread(i) = New Thread(threadMethod)
            thread(i).Name = i.ToString()
            thread(i).Start()
            If Not thread(i).Join(100) Then
                'Thread.Join(100)不知道这处这么用对不对，感觉没什么效果一样 
                thread(i).Abort()
            End If
            '用到委托来更新PrgsBar
            ShowProgress(i)
            Me.TSLab1.Text = String.Format("搜索IP:{0}.{1}",LocalIPStr,i.ToString)
            'Me.TSPrgsBar.Value = i
        Next
        'using  event or thread  to access the serach result
        'RaiseEvent FList()  
        '注意注册事件or用线程
        Dim th As Thread = New Thread(AddressOf ListLanHost)
        th.Start()
    End Sub
    ''' 多线程搜索方法 
    Private Sub LanSearchThreadMethod()
        Dim Currently_i As Integer = Convert.ToInt32(Threading.Thread.CurrentThread.Name.ToString)
        '当前进程名称 
        Dim ScanIP As IPAddress = IPAddress.Parse((LocalIPStr & ".") + Convert.ToString(Currently_i + 1))
        '获得扫描IP地址 
        Dim ScanHost As IPHostEntry = nothing
        ScanHost = Net.Dns.GetHostEntry(ScanIP)
        '获得扫描IP地址主机信息 
        If ScanHost IsNot nothing Then
            LanHost(Currently_i,0) = ScanIP.ToString()
            LanHost(Currently_i,1) = ScanHost.HostName
        End If
    End Sub
    Delegate Sub ShowProgressDelegate(ByVal newPos As Integer)
    Private Sub ShowProgress(ByVal newPos As Integer)
        ' 判断是否在线程中访问 
        If Not Me.Invokerequired Then
            ' 不是的话直接操作控件 
            Me.TSPrgsBar.Value = newPos
            Me.progressBarSearch.Value = newPos
        Else
            ' 是的话启用delegate访问 
            Dim showProgressDl As New ShowProgressDelegate(AddressOf ShowProgress)
            ' 如使用Invoke会等到函数调用结束，而BeginInvoke不会等待直接往后走 
            Me.BeginInvoke(showProgressDl,New Object() {newPos})
        End If
    End Sub
End Class

2.使用：BackgroundWorker 组件来处理。

Imports System.Net
Imports System.Threading
Public Class FrmBgWorker
    Private LanHost As String(,)
    Private thread As Thread()
    Private LocalIPStr As String
    '初始化数组
    Private Sub InitLanHost()
        LanHost = New String(254,1) = ""
        Next
    End Sub
    '查询主机
    Private Sub LanSearch()
        thread = New Thread(254) {}
        Dim localhost As String = (Dns.GetHostEntry(Dns.GetHostName())).AddressList(0).ToString()
        '本地主机IP地址 
        LocalIPStr = localhost.Substring(0,localhost.LastIndexOf("."))
        Dim threadMethod As ThreadStart
        For i As Integer = 0 To 254
            '建立255个线程扫描IP 
            threadMethod = New ThreadStart(AddressOf LanSearchThreadMethod)
            thread(i) = New Thread(threadMethod)
            thread(i).Name = i.ToString()
            thread(i).Start()
            If Not thread(i).Join(100) Then
                'Thread.Join(100)不知道这处这么用对不对，感觉没什么效果一样 
                thread(i).Abort()
            End If
            Me.BgWorker.ReportProgress(0,i.ToString)
        Next
        'using  event or thread  to access the serach result
        'RaiseEvent FList()  
        '注意注册事件or用线程
        'Dim th As Thread = New Thread(AddressOf ListLanHost)
        'th.Start()
    End Sub
    ''' 多线程搜索方法 
    Private Sub LanSearchThreadMethod()
        Dim Currently_i As Integer = Convert.ToInt32(Threading.Thread.CurrentThread.Name.ToString)
        '当前进程名称 
        Dim ScanIP As IPAddress = IPAddress.Parse((LocalIPStr & ".") + Convert.ToString(Currently_i + 1))
        '获得扫描IP地址 
        Dim ScanHost As IPHostEntry = nothing
        ScanHost = Net.Dns.GetHostEntry(ScanIP)
        '获得扫描IP地址主机信息 
        If ScanHost IsNot nothing Then
            LanHost(Currently_i,1) = ScanHost.HostName
        End If
    End Sub
    '搜索后，显示到listview里面，因为是用BackGroundWorker组件。所以在
    Private Sub ListLanHost()
        'Dim AddLvInst As New SetListViewDelegate(AddressOf AddLvFunc)
        Dim lv As ListViewItem
        For i As Integer = 0 To 254
            If LanHost(i,0))
                ' ListView1.Invoke(AddLvInst,lv)
                Me.ListView1.Items.Add(lv)
            End If
        Next
        Me.TextBox1.Text = String.Format("搜索完毕:{0}，共找到主机:{1}台。",LanHost.GetLength(0).ToString,Me.ListView1.Items.Count.ToString)
    End Sub
    Private Sub FrmBgWorker_Load(ByVal sender As Object,ByVal e As System.EventArgs) Handles Me.Load
        InitLanHost()
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
        Me.BgWorker.RunWorkerAsync()
    End Sub
    Private Sub BgWorker_DoWork(ByVal sender As System.Object,ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BgWorker.DoWork
        LanSearch()
    End Sub
    Private Sub BgWorker_ProgressChanged(ByVal sender As System.Object,ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles BgWorker.ProgressChanged
        Me.TextBox1.Text = String.Format("搜索IP:{0}.{1}",e.UserState.ToString)
        Me.PrgsBar.Value = CInt(e.UserState.ToString)
    End Sub
    Private Sub BgWorker_RunWorkerCompleted(ByVal sender As System.Object,ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BgWorker.RunWorkerCompleted
        ListLanHost()
    End Sub
End Class

Win10专业版在局域网中搜索不到打印机

Win10专业版在局域网中搜索不到打印机

很多小伙伴打印文档的时候，文档发送到打印机后，打印机却没有任何动静。明明打印机已经还亮着灯，街而过没有进行打印。下面就给大姐姐分享一下Win10专业版中局域网搜索不到打印机是怎么如何操作的。

Win10专业版中局域网搜索不到打印机的解决方法：

1、这里以win10系统为例（win7系统差别不大），首先用B电脑在运行中输入cmd按回车键打开命令行窗口，输入ping A电脑内网ip地址，例如：ping 192.168.0.122，确保两台电脑是在同一局域网。

2、A电脑打开【控制面板】》【所有控制面板项】》【网络和共享中心】》【更改高级共享设置】，在“专用”和“来宾或公用”中都勾选【启用网络发现】和【启用文件和打印机共享】。

3、A电脑打开【打印机和扫描仪】，找到指定的打印机，点【管理】》【打印机属性】》【共享】，勾选【共享这台打印机】，最后点【确定】。

4、B电脑连接打印机有2种方法。

5、方法1：在B电脑的运行中输入 A电脑内网ip，例：192.168.0.122 ，然后点【确定】。

6、方法2：B电脑打开【打印机和扫描仪】。

7、【添加打印机或扫描仪】》【我需要的打印机不在列表中】。

8、【按名称选择共享打印机】。

输入A电脑内网ip打印机名称，例如：192.168.0.122Canon MG2400 series Printer，然后点【下一步】就添加成功了。如果提示输入账号密码，可以输入账号guest，密码不用输入（A电脑要打开guest用户）。

以上就是Win10专业版中局域网搜索不到打印机的解决方法了，系统之家还有更多关于Win10系统的内容噢~

我们今天的关于怎么搜索局域网中的电脑和怎么搜索局域网中的电脑文件的分享就到这里，谢谢您的阅读，如果想了解更多关于everything怎么搜索局域网共享文件、ping不通局域网内的电脑怎么办？、VB.Net程序设计：多线程处理，搜索局域网的计算机、Win10专业版在局域网中搜索不到打印机的相关信息，可以在本站进行搜索。

本文标签：

上一篇电脑装完系统连不上网（装完系统连接不了网络）

下一篇两台电脑怎么弄局域网（两台电脑怎么弄局域网 win10）

相关文章