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™
vbforums.com
Copyright Internet.com Inc., All Rights Reserved.