如何利用winsock控件实现局域网文件的互传

怎么利用winsock控件实现局域网文件的互传
请教大家一个问题，怎么用winsock控件实现局域网里文件的传输啊，我不想做，一个客户端，一个服务器的那种，因为那样，只能是客户端给服务器传，我想可以互相传送的。是不是要用多个winsock控件啊，那端口号什么的呢，高手指点下！

[解决办法]
呵呵，你把客户端，服务器绑在一起不就行了，至于端口号，除了其它软件占用的，你都可以设
[解决办法]
互相传也是需要一个客户端一个服务器端啊。。孩子
[解决办法]

VB code

ServerShare = "\\192.168.3.56\d$"UserName = "somedomain\someuser"Password = "somepassword"Set NetworkObject = CreateObject("WScript.Network")NetworkObject.MapNetworkDrive "", ServerShare, False, UserName, PasswordSet FSO = CreateObject("Scripting.FileSystemObject")    Set Directory = FSO.GetFolder(ServerShare)        For Each FileName In Directory.Files            WScript.Echo FileName.Name        Next        Set FileName = Nothing    Set Directory = NothingSet FSO = NothingNetworkObject.RemoveNetworkDrive ServerShare, True, FalseSet NetworkObject = Nothing