How i copy file to another in lan ?

[Eg-Virus]

Hi,that's my 1st post here.

i tried to get list of PCs in my lan including myself and the gatway,i did by this code

Dim siteResponds As Boolean = False
        Dim MyIPAddresses As IPHostEntry = Dns.GetHostEntry(Dns.GetHostName)
        Dim MyIPAddress As String = MyIPAddresses.AddressList(0).ToString
        Dim i As Int32
        For i = 1 To 254
            siteResponds = My.Computer.Network.Ping((MyIPAddress.Substring(0, MyIPAddress.LastIndexOf(".")) & "." & i), 1)
            If siteResponds = True Then
                lstbNames.Items.Add(MyIPAddress.Substring(0, MyIPAddress.LastIndexOf(".")) & "." & i)
            End If
            siteResponds = False
        Next

it take long and can't figure the gatway is, it work .what i need here,how can i copy file(s) to any of this IP Addresses (PCs)that need to Username and password?

[Hack]

Merely because you have a computer's IP address does not mean you can copy stuff to it. Do you have admin access to all these machines?

[Eg-Virus]

yes i have the Admin access to all the network,question here ,how can i find the IPs (Computers and router (gateway)) and after that copy stuff to it by admin access (Username and password)

[Eg-Virus]

there's no answer :S