PDA

Click to See Complete Forum and Search --> : [RESOLVED] Network access


wussupbuddy
Jun 17th, 2005, 03:47 AM
i'm trying to access a network computer using the shell command. tried accessing the system using "\\systemname" but doesn't work. i cannot use filesystem object or map the drive. how do i go about it

Apollyon255
Jun 17th, 2005, 06:17 AM
hey buddy!

try to create a connection between your computer and the computer you want to access with...

then of course connect them using "listen" and "accept" command in winsock...

then if so, create a module in a client (computer you want to know the systemname) that will run when a trigger or a message from a server (your computer) innitiated..

e.g: (Client)
************************************************
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
dim Msg As String
Winsock1.Getdata Msg

Select Case Left(Msg,12)

Case "CLSystemName" Winsock1.senddata Winsock1.LocalHostName

End Select
End Sub
****************************************************

Then for Server:
****************************************************
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
dim Msg As String
Winsock1.Getdata Msg

Select Case Left(Msg,12)

Case "MySystemName" Msgbox "Your Client's System Name is " & Right(Msg,12)

End Select
End Sub
*************************************************

Juz Create a commandbutton or any procedure for sending data or request for "CLSystemName" in Server (Your computer)...

Thatz oL... Hope i help you a little...

Apocalypse™